Numéro de ligne incorrect

Bonjour à tous,

J'ai un soucis sur mon code sur le userform bon_materiel_userform dans la fonction cmdValider_Click à la ligne 199.

Le nombre de ligne qui est renvoyé est 1048576 alors que j en'ai q'une seule ligne dans mon tableau.

Pouvez-vous m'aider svp ?

Merci d'avance et prenez soin de vous !

Private Sub cmdValider_Click()
    'Détermination variable observation
    Observation = txtObservation.Value
    Agent = cboAgent.Value

    'création variable pour intégration en fin de bdd
    Dim no_ligne As Long, rg As Range
    Set rg = Range("T_Bons_Matériels")

    'n°ligne de la dernière cellule non vide
    no_ligne = rg.End(xlDown).Row
    Debug.Print no_ligne

    'Insertion des valeurs dans la feuille Bon Materiel
    rg.Cells(no_ligne, 1) = Attribution
    rg.Cells(no_ligne, 2) = Article
    rg.Cells(no_ligne, 3) = NoGeniclime
    rg.Cells(no_ligne, 4) = Agent
    rg.Cells(no_ligne, 5) = MaDate
    rg.Cells(no_ligne, 6) = Observation

    Call modif_article

    Call protect

    Unload Me

End Sub

Bonjour,

Si tu changes juste la base de ta recherche de ligne avec :

Set rg = Range("A1")

ça semble marcher.

Cindy

Bonjour,

Effectivement, ça marche !!

Merci