Sub Toto() a = "AB" b = Range(a & "1").Column MsgBox "colonne " & b End Sub
Camille
-----Message d'origine----- Bonjour à tous, amis du forum!!
Existe-t-il un moyen simple et rapide de dire :
La string "AB" correspond à la colonne n°28
Il y a la solution du tableau où chaque case correspond à une lettre, mais
je me demandais s'il n'y avait pas une autre solution.
Merci!! .
MichDenis
Bonjour ReKam
La fonction Split requiert Excel 2002 ou plus récent
Dim A As String A = Split(Columns(28).Address, "$")(1) If Right(A, 1) = ":" Then A = Left(A, Len(A) - 1) End If MsgBox A
'OU
MsgBox Columns("Ab:ab").Column
Salutations!
"Rekam" a écrit dans le message de news:
Bonjour à tous, amis du forum!!
Existe-t-il un moyen simple et rapide de dire :
La string "AB" correspond à la colonne n°28
Il y a la solution du tableau où chaque case correspond à une lettre, mais je me demandais s'il n'y avait pas une autre solution.
Merci!!
Bonjour ReKam
La fonction Split requiert Excel 2002 ou plus récent
Dim A As String
A = Split(Columns(28).Address, "$")(1)
If Right(A, 1) = ":" Then
A = Left(A, Len(A) - 1)
End If
MsgBox A
'OU
MsgBox Columns("Ab:ab").Column
Salutations!
"Rekam" <Rekam@discussions.microsoft.com> a écrit dans le message de news:
012771DD-1BA2-4835-BDAD-455FF9DB1036@microsoft.com...
Bonjour à tous, amis du forum!!
Existe-t-il un moyen simple et rapide de dire :
La string "AB" correspond à la colonne n°28
Il y a la solution du tableau où chaque case correspond à une lettre, mais
je me demandais s'il n'y avait pas une autre solution.
