Discussion :

[assumel]

Je découvre ce site qui semble très actif.
Je débute en VBA et ne parvient pas à faire fonctionner une macro dans laquelle je veux me positionner sur une cellule (C12), et afficher une combo box qui va chercher les choix possibles dans une feuille Excel; de plus je voudrais que la ComboBox affiche 20 items au lieu des 8 en standard. Qui peut m'aider !!??
Voici le code que j'ai essayé, en vain.
Il semble de plus qu'il faille déclarer dnas la section déclaration la ComboBox ? comment ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub TestCombo()
'
    Range("C12").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, RowSource:="D:\A-R\Dico_C.xls\Feuil1!A1:A10", ListRows:=20
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

[kiki29]

Salut,commence par baliser ton code
ensuite une recherche t'apportera des réponses