Dim Mystring as string
Private Combobox1.Clic ()
Mystring=Combobox1.Text
MyString=ApplicatioN.WorkSheetFunction.Replace (MyString," ","_") [COLOR=Red]'ici on remplace le Blanc par "_"[/COLOR]
puis par exemple
[COLOR=Red]'ici on entre coucou dans la plage nommée [/COLOR]
Worksheets("Feuil1").Range(MyString).value="Coucou"
End sub