Utiliser la légende de zone de texte pour remplir un tableau

Bonjour,

Je souhaiterais savoir s'il est possible de remplir un tableau sur une feuille excel en utilisant les labels d'un userform. J'ai en effet créé un formulaire qui me permet de remplir un tableau. Dans ce formulaire, j'effectue des calculs intermédiaires dont les résultats sont affichés dans des labels de mon userform (en utilisant les caption).

Je voudrais utiliser ces résultats pour remplir ma base de données et qu'ils soient en format numérique. Pour info, j'ai tenté d'entrer le code suivant :

Private Sub CommandButton3_Click()
    Dim L As Integer, Lig As Long
        If MsgBox("Confirmez-vous l’ajout de cette FM ?", vbYesNo, "Demande de confirmation d’ajout") = vbYes Then
        L = Sheets("Synthèse").Range("C65536").End(xlUp).Row + 1
        Range("AD" & L) = Label92.Value
        Range("AE" & L) = Label93.Value
        Range("AF" & L) = Label94.Value
        Range("AG" & L) = Label95.Value
        Range("AH" & L) = Label96.Value
        Range("AI" & L) = Label97.Value
        Range("AJ" & L) = Label98.Value
        Range("AK" & L) = Label99.Value
        End If

End Sub

Je suis gratifié d'un message d'erreur quand j'entre cette commande (erreur de compilation - membre de méthode ou de données introuvable). Quelqu'un pourrait-il m'indiquer s'il est possible d'obtenir ce que je recherche et par quel moyen?

Merci d'avance!

Benjamin

Bonjour,

Essaie avec Range("AD" & L) = Label92.Caption

oyobrans a écrit :

Bonjour,

Essaie avec Range("AD" & L) = Label92.Caption

Et ça marche!

Merci!

Rechercher des sujets similaires à "utiliser legende zone texte remplir tableau"