récupéré le code d'une colonne

  • Initiateur de la discussion budbundy81
  • Date de début
B

budbundy81

Guest
je réexplique le problème, j'ai comme point de départ la colonne G, avec un nombre au hasard, je voudrais colorier un certains nombre de cellules.

Exemple :

Colonne G, points de départ
Nombre : 6
Donc je veux que les cellules G+6 soit colorié, c'est à dire jusqu'à la colonne L (G+6=L en code ascii)

Pour sa pas de problème, mais dès que je dépasse Z, sa ne fonctionne plus.

J'ai besoin de récupérer un code quelconque pour les colonnes ayant un nom composé de 2 lettres (AB)
 
S

STéphane

Guest
positionne-toi sur une cellule de ces colonnes et utilise le code ci-dessous de Myrna

'Récupérer la lettre de la ligne ou colonne à l'aide d'instructions VBA :
Function ColumnLetter()
Dim C As Integer, L As Integer
With ActiveCell
C = .Column
If C > 26 Then L = 2 Else L = 1
ColumnLetter = Left$(.Address(0, 0), L)
End With
End Function

Sub dhd()
MsgBox ColumnLetter
End Sub

bye
Stéphane
 

Discussions similaires