Bonjour
je ne suis pas un bon programmeur, j'essaye d'initialiser une combobox a parir de cellules qui contiennent des caracteres avec la police wingdings
ce que j'ai fait ecrit marche a peu pres si ce n'est que je n'ai dans cette combobox que les valeurs mais pas la police
For i = 1 To 9
Feuil1.ComboBox_marker_style.AddItem ActiveSheet.Cells(i, 4).value
Next i
Feuil1.ComboBox_marker_style.Font.name = "Wingdings"
voici mon "code" (ou tout au moins une partie) , pourriez vous me dire ce qu'il manque ou ce qui est mal fait ?
merci beaucoup
jacky
je ne suis pas un bon programmeur, j'essaye d'initialiser une combobox a parir de cellules qui contiennent des caracteres avec la police wingdings
ce que j'ai fait ecrit marche a peu pres si ce n'est que je n'ai dans cette combobox que les valeurs mais pas la police
For i = 1 To 9
Feuil1.ComboBox_marker_style.AddItem ActiveSheet.Cells(i, 4).value
Next i
Feuil1.ComboBox_marker_style.Font.name = "Wingdings"
voici mon "code" (ou tout au moins une partie) , pourriez vous me dire ce qu'il manque ou ce qui est mal fait ?
merci beaucoup
jacky