Option Explicit
Sub test()
Dim n As Integer, i As Integer
n = Asc(UCase("A")) - 64
For i = 1 To n
Cells(1, i) = Chr(n + 64)
Next i
End Sub
=SI(COLONNES($A:A)>CODE($A1)-64;"";$A1)
Bonjour,
Avec tes lettres en A1 et A2, cette formule en A2 :
Code:=SI(COLONNES($A:A)>CODE($A1)-64;"";$A1)
à recopier vers le bas et vers la droite (au moins 26 fois : rang du Z)
@+
Edit : Bing ! salut Pierrot
@+
comment je peux demander à excel, de remettre dans des cellules différentes la lettre autant de fois que sa valeur.
Exemple :
B=2 et je souhaite dans les cellules B B
E=5 et je souhaite dans les cellules E E E E E
=REPT(F1;SOMMEPROD((zone=F1)*LIGNE(zone)))