Identificar número de columna de la celda activa

En esta ocasión vamos a ver cómo identificar el número de la columna en la que se encuentra la celda activa; una vez identificada solo debemos guardar este valor en una variable tal y como vimos en la entrega anterior y presentarlo en un cuadro de texto.

Abrimos el editor de Visual Basic (Alt + F11) y damos doble clic sobre la Hoja1 en el explorador de proyectos para activar el espacio de edición de macros en el editor:

Nos vamos a ubicar en el espacio de edición de macros y copiamos el siguiente código:

Sub IdentificarNumerodeColumnadeCeldaActiva()

'Esta macro identifica el número de Columna de la celda activa, lo guarda en una variable y lo presenta en un cuadro de texto

Dim NroColumna As Integer

NroColumna = ActiveCell.Column

MsgBox "La celda activa se encuentra en la Columna número: " & NroColumna

End Sub

Veamos la interpretación de cada línea.

  1. La primera línea Sub IdentificarNumerodeColumnadeCeldaActiva (), indica el inicio y nombre de la macro IdentificarNumerodeColumnadeCeldaActiva.
  2. La segunda línea que iniciar con una coma sencilla es un comentario informativo para identificar más fácil lo que realizará la macro y en el Editor VB se marcará en color verde toda la línea.
  3. La tercera línea es la tipificación de la variable NroColumna en la cual vamos a guardar el número de la columna de la celda activa y por tanto definimos esta variable como Integer pues vamos a guardar en ella un número entero.
  4. La cuarta línea es donde guardamos en la variable NroColumna el número de la columna de la celda activa (Column).
  5. La quinta línea es donde indicamos mediante un cuadro de mensaje, la columna en la que se encuentra la celda activa
  6. La última línea marca el fin (End) de la Macro o Subrutina (Sub)

Si queremos ejecutar la macro desde el Editor de Visual Basic, es necesario que el cursor este ubicado en cualquiera de las líneas de la macro y luego damos F5. La otra alternativa es vincular la macro a una autoforma en la hoja de Excel. En cualquier de los dos casos, el resultado de la macro es el siguiente:

Descargar archivo de trabajo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc. Lo que no está permitido es insultar o escribir palabras ofensivas o soeces. Si lo hace, su comentario será rechazado por el sistema o será eliminado por el administrador. Por último, trate de no escribir en mayúscula sostenida, resulta muy difícil leerle.