Jump to content

Convertir numero columna a letra


Recommended Posts

Posted (edited)

Hola a todos;

¿Hay algún procedimiento o función que me convierta el numero de una columna a letra?

Ejemplo:

Private Sub btnColumna_Click()
Dim tColumna As String
    Me.TextBox1 = 2
    tColumna =Me.TextBox1  "??????"  <-----Aquí me debería indicar la columna en formato texto
End Sub

 

image.thumb.png.d7ebad691018718c07b04df5c98c40cc.png

Saludos y buen día a todos.

 

 

Edited by Benito Bartolomé
Link to comment
Share on other sites

Hace 1 hora, Antoni dijo:
Letra = Split(Cells(1, Número).Address, "$")(1)

 

Hola Antoni;

Había visto algo con el Split pero no fui capaz de implementar.

Lo he dejado así, a ver que te parece.

Private Sub btnColumna_Click()
Dim tColumna As Integer
    tColumna = Me.TextBox1
    letra = Split(Cells(1, tColumna).address, "$")(1)
    MsgBox letra
End Sub

Saludos y muchas como siempre.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

Privacy Policy