Número de columna de Excel del nombre de la columna

Question

¿Cómo obtener el número de columna del nombre de la columna en Excel usando la macro de Excel?

Answer 1

Creo que quieres esto?

Nombre de columna a columna Número

Sub Sample() 
    ColName = "C" 
    Debug.Print Range(ColName & 1).Column 
End Sub 

Editar: También incluyendo la inversa de lo que quiere

Columna Número de columna de nombre

Sub Sample() 
    ColNo = 3 
    Debug.Print Split(Cells(, ColNo).Address, "$")(1) 
End Sub 

SEGUIMIENTO UP

Al igual que si tengo campo de salario en la parte superior permite decir en la celda C (1,1) ahora si alterar el archivo y la columna salario muevo a otro lugar decir F (1, 1) entonces tendré que modificar el código, así que quiero que el código verifique el salario y encuentre el número de columna y luego haga el resto de las operaciones de acuerdo con ese número de columna.

En tal caso yo recomendaría usar .FIND Vea este ejemplo de abajo

Option Explicit 

Sub Sample() 
    Dim strSearch As String 
    Dim aCell As Range 

    strSearch = "Salary" 

    Set aCell = Sheet1.Rows(1).Find(What:=strSearch, LookIn:=xlValues, _ 
    LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ 
    MatchCase:=False, SearchFormat:=False) 

    If Not aCell Is Nothing Then 
     MsgBox "Value Found in Cell " & aCell.Address & _ 
     " and the Cell Column Number is " & aCell.Column 
    End If 
End Sub 

INSTANTÁNEA

Answer 2

Mientras buscaba una solución de VBA, esta fue mi mejor resultado en google cuando buscaba una solución de fórmula, así que agregaré esto para cualquiera que haya venido por eso como lo hice:

fórmula de Excel para devolver el número de una columna con la letra (desde @A. El comentario de klomp arriba), donde la celda A1 contiene la carta de columna (s):

= columna (indirecta (A1 & "1"))

Como la función indirecta es volátil, se vuelve a calcular cada vez cualquier celda se cambia, por lo que si tiene muchas puede ralentizar su libro de trabajo. Considere otra solución, como la función 'código', que le da el número de un carácter ASCII, comenzando con 'A' en 65. Tenga en cuenta que para hacer esto, necesitará verificar cuántos dígitos hay en el nombre de la columna, y altere el resultado según 'A', 'BB' o 'CCC'.

fórmula

Excel para devolver la carta columna de un número (A partir de esta pregunta anterior How to convert a column number (eg. 127) into an excel column (eg. AA), respondida por @Ian), donde A1 tiene su número de columna:

= sustituto (dirección (1, A1 , 4), "1", "")

Tenga en cuenta que ambos métodos funcionan independientemente de la cantidad de letras en el nombre de la columna.

Espero que esto ayude a alguien más.

Answer 3

Puede omitir todo esto y simplemente poner sus datos en una tabla. Luego consulte la tabla y el encabezado, y será completamente dinámico. Sé que esto es de hace 3 años, pero a alguien todavía le puede resultar útil.

código Ejemplo:

Activesheet.Range("TableName[ColumnName]").Copy 

También puede utilizar:

activesheet.listobjects("TableName[ColumnName]").Copy 

Incluso puede utilizar este sistema de referencia en las fórmulas de la hoja de trabajo también. Es muy dinámico.

Espero que esto ayude!

Answer 4

escribir y ejecutar el siguiente código en la ventana Inmediato

?cells(,"type the column name here").column 

Por ejemplo ?cells(,"BYL").column volverá 2014. El código es sensible a las mayúsculas, por lo tanto usted puede escribir ?cells(,"byl").column y la salida seguirá siendo la misma.

Answer 5

En mi opinión la forma más simple para obtener el número de columna es:
Sub Sample() ColName = ActiveCell.Column MsgBox ColName End Sub