Excel VBA: cómo convertir el número de columna en letras

Estás trabajando con Excel en VBA estás tratando de convertir el número de columna a letras pero no sabes como seguir? No te preocupes, sigue leyendo y te explicaré cómo hacerlo.

El funcionamiento es muy sencillo, todo lo que tienes que hacer es llamar a la función que se indica a continuación: ConvertToLetter pasando como un parámetro el número de la columna usted ya sabe.

Si no sabe por dónde empezar, continúe Desarrollo en Excel (en el menú superior) y haga clic en Grabar macro y en la pequeña ventana que aparece haga clic en OK.

Inmediatamente después de hacer clic en la parte superior Para de grabar y presione el icono VISUAL BÁSICO.

En la ventana que se abre, a la izquierda haga clic en Módulo 1 y agregue en la ventana derecha adentro Sub Macro1 () el código para llamar a la función ConverToLetter (en la práctica, copie el código a continuación).

Coltesto = ConvertToLetter (NumCol) ‘NumCol es el número de la columna por la que está pasando.

Agregue inmediatamente después de este comando:

Msgbox Coltesto ‘lo necesitarás para ver la letra de la columna

Después End Sub de Macro1 () copie y pegue la función a continuación:

Función ConvertToLetter (byval iCol como entero) como cadena Dim iAlpha como entero Dim iRemainder como entero iAlpha = Int (iCol / 27) iRemainder = iCol – (iAlpha * 26) Si iAlpha> 0 entonces ConvertToLetter = Chr (iAlpha + 64) Terminara si Si iRemainder> 0 entonces ConvertToLetter = ConvertToLetter y Chr (iRemainder + 64) Terminara siFunción final

Lo necesitará para convertir el número de columna en letras.

¡Buena suerte!

Si quieres seguir las publicaciones de www.informarea.it puedes suscribirte a su RSS Feed.