Incrémenter ligne VBA (informations manquantes)

Bonjour,

Je fais mes débuts dans le VBA et je suis en train de faire un formulaire pour renseigner 2 champs et les incrémenter dans un tableau.

Le soucis c'est que je n'ai qu'une information (colonne B) qui apparait quand je lance la macro.

Des idées ?

Private Sub CommandButton1_Click()

Dim DL As Integer

    If Txt_ProduitFini = "" Or Txt_DesignationProduit = "" Then
        MsgBox ("Veuillez renseigner toutes les informations du formulaire")
    Else

    DL = Sheets("Gamme de Fabrication").Range("B9999").End(xlUp).Row + 1

    Sheets("Gamme de Fabrication").Range("B" & DL) = Me.Txt_ProduitFini
    Sheets("Gamme de Fabrication").Range("C" & DL) = Me.Label_Indice
    Sheets("Gamme de Fabrication").Range("D" & DL) = Me.Txt_DesignationProduit

    ThisWorkbook.Save

   ' Unload Ajout_ProduitFini

    End If

End Sub

Bonjour,

Si seulement B est renseigné ...

Il manque .caption au label
Me.Label_Indice.Caption 

Me.Txt_DesignationProduit > ou cela est vide ou il y a une erreur dans la nom ou ce n'est pas le bon textbox ...

ric