Erreur 1004 VBA

bonjour

j'ai une erreur 1004 à "nb_lignes = Sheets("liste_PDR_standard").Cells(1, no_colonne).End(xlDown).Row"

Private Sub ComboBox_famille_Change()
Dim no_colonne As Integer, nb_lignes As Integer
    'Zone de liste vidée (sinon les villes sont ajoutées à la suite)
    ListBox_detail_pieces.Clear
    'Numéro de la sélection (ListIndex commence à 0) :
    no_colonne = (ComboBox_Famille.ListIndex) * 3 + 2
    'Nombre de lignes de la colonne du pays choisi :
    nb_lignes = Sheets("liste_PDR_standard").Cells(1, no_colonne).End(xlDown).Row
    For i = 3 To nb_lignes ' => pour lister les pieces de rechange
    ListBox_detail_pieces.AddItem Sheets("liste_PDR_standard").Cells(i, no_colonne)
    Next
End Sub

je cherche mais je n'ai pas touver

merci a tous

26projet-sav.xlsm (49.14 Ko)

Bonsoir Pascal, bonsoir le forum,

J'avais d'abord pensé que la variable num_colonne valait 0 et cela provoquait un bug dans la ligne décrite. Mais je n'ai pas d'erreur chez moi quand je teste ton fichier !...

Bonsoir

Erreur qui arrive si dans la ComboBox tu entres manuellement une donnée qui n'est pas présente dans la liste de la ComboBox

Rechercher des sujets similaires à "erreur 1004 vba"