VBA - Contar columnas llenas

[hugo180486]

Puedes usar esta funcion y pasarle el Numero de Columna, te devolvera la letra.

Código vb:

Function Letra_Columna(ByVal lCol As Long) As String
    Letra_Columna = Replace$(Cells(1, lCol).Address(False, False), "1", "")
End Function