Re : Cellule décomposer en plusieurs cellules
j'ai une autre question:
Private Sub CommandButton1_Click()
Dim nbrCaracteresMot As Long
Dim Montant As String
nbrCaracteresMot = Len(Cells(1, 1).Value)
For i = 1 To nbrCaracteresMot
motExplose = Mid(Cells(1, 1).Value, i, 1)...