Erreur de feuille Suite UserForm

Bonjour,

J'aimerai tout simplement que les données de l'userForm soient enregistrées dans un feuille spéciale.

Ici la feuille 2 donc "Bdg" mais les données se mettent sur la feuille 1 .

8testuserform.xlsm (28.75 Ko)

Merci

P.S je dit :" Tout simplement" car pour vous c'est trop facile à faire, mais pas pour moi

Bonjour

J'ai ajouté deux lignes pour le changement de feuille et deux lignes pour éviter le rafraichissement à ta macro

Sub InsererLesDonneesDansLaFeuille(ByVal LeNom As String)

    '*** Déclarations des variables locales ***
    Dim LaDerniereLigne As Integer
    Application.ScreenUpdating = False
    '*** Fin des déclarations des variables locales ***
    Sheets("bdg").Activate
    LaDerniereLigne = Sheets("bdg").Range("A1").SpecialCells(xlCellTypeLastCell).Row + 1
    Range("E" & LaDerniereLigne).Value = LeNom
    Sheets("show").Activate
     Application.ScreenUpdating = True
End Sub

Bonjour CB60,

Super

Merci très Sincèrement

Rechercher des sujets similaires à "erreur feuille suite userform"