¿Cómo seleccionar una columna basada en el encabezado de la columna en Excel?

Supongamos que tienes una hoja de cálculo grande que contiene múltiples columnas, y ahora deseas seleccionar la columna específica basándote en el nombre del encabezado de la columna. Buscar columna por columna en una hoja de cálculo grande puede llevar mucho tiempo; en este artículo, te presentaré un método rápido para resolver esta tarea en Excel.

Selecciona una columna basada en el nombre del encabezado con código VBA

Selecciona una columna basada en el nombre del encabezado con código VBA

El siguiente código VBA puede ayudarte a seleccionar las columnas basadas en un nombre de encabezado específico, sigue estos pasos:

1. Mantén presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.

Código VBA: Seleccionar columna basada en el nombre del encabezado de la columna:

Sub FindAddressColumn()
'Updateby Extendoffcie
    Dim xRg As Range
    Dim xRgUni As Range
    Dim xFirstAddress As String
    Dim xStr As String
    On Error Resume Next
    xStr = "Name"
    Set xRg = Range("A1:P1").Find(xStr, , xlValues, xlWhole, , , True)
    If Not xRg Is Nothing Then
        xFirstAddress = xRg.Address
        Do
            Set xRg = Range("A1:P1").FindNext(xRg)
            If xRgUni Is Nothing Then
                Set xRgUni = xRg
            Else
                Set xRgUni = Application.Union(xRgUni, xRg)
            End If
        Loop While (Not xRg Is Nothing) And (xRg.Address <> xFirstAddress)
    End If
    xRgUni.EntireColumn.Select
End Sub

Nota: En el código anterior, A1:P1 es el rango de encabezados desde donde deseas seleccionar las columnas, y “Nombre” en el script xStr = "Nombre" es el nombre del encabezado según el cual deseas seleccionar las columnas. Por favor, cámbialos según tus necesidades.

3. Después de copiar y pegar el código, presiona la tecla F5 para ejecutar este código, y todas las columnas con el nombre de encabezado específico se habrán seleccionado de una vez, mira la captura de pantalla: