Je souhaiterais, apres validation par un bouton, que les données de ces combobox soient CONCATENER avec un espace entre chaque (un &).
Et que le tout soit renvoyer dans une cellule.
Pouvez vous m'indiquer la marche à suivre s'il vous plait?
Private Sub CommandButton1_Click()
Dim result As String
Dim i As Byte
For i = 1 To 12
result = result & " " & Controls("ComboBox" & i).Value
Next
Sheets(1).Range("A1") = result
End Sub