Numero de colonne en VBA Résolu

Question

Bonjour à tous,

Je débute en VBA et je connais pas beaucoup de fonction.

J'aimerais savoir comment obtenir la lettre associée à un chiffre pour pouvoir manipuler plus facilement mes colonnes.
Par exemple pour 1 j'aimerais une fonction VBA  qui me renvoie A, 
pour 4 elle renvoie D, 
pour 27 elle renvoie AA,

Voila si vous connaissez un fonction qui fait cela ou des astuces je veux bien de votre aide.
Merci d'avance.

ccm81 · Answer

bonjour

 au choix 

celle ci pour une colonne jusqu'à ZZ

Function conum_coalpha(cn As Long) As String    
Dim pln As Long, dln As Long    
Dim cs As String    
  If cn <= 26 Then    
    conum_coalpha = Chr(64 + cn)    
  Else    
    dln = cn Mod 26    
    pln = cn \ 26    
    If dln = 0 Then    
      dln = 26    
      pln = pln - 1    
    End If    
    conum_coalpha = Chr(64 + pln) & Chr(64 + dln)    
  End If    
End Function

ou celle là qui permet d'aller plus loin que 2 lettres pour les colonnes (excel du futur)

Function conum_coalpha(ByVal c As Long) As String    
  If c <= 26 Then    
    If c = 26 Then    
      conum_coalpha = "Z"    
    Else    
      conum_coalpha = Chr(64 + c)    
    End If    
  Else    
    If c Mod 26 = 0 Then    
      conum_coalpha = conum_coalpha(c \ 26 - 1) & conum_coalpha(26)    
    Else    
      conum_coalpha = conum_coalpha(c \ 26) & conum_coalpha(c Mod 26)    
    End If    
  End If    
End Function

bonne suite

Numero de colonne en VBA

1 réponse

Discussions similaires

Newsletters