XL 2019 Sauvegarder les données de deux Userform dans une feuille

[eCHO]

Bonjour

J'ai plusieurs Userform 1.2.3.4 sur Userform 1 j'ai un 5 textbox nommé: textbix1; textbox2; N_Mag ; nom ; cin et un combobox nommé: cmb_suite
Sur userform 4 j'ai deux textbox 1 et 2 et une commandbutton1
Voici son code

Private Sub CommandButton1_Click()

            If Me.TextBox1.value = "" Or Me.TextBox2.value = "" Then

                        MsgBox "Veuillez entrer le numéro et la date du reçu", vbCritical + vbMsgBoxRight, "Erreur"

            Exit Sub

            End If

            Me.Tag = Sheets("QUITTANCE").Range("a65536").End(xlUp).ROW + 1

            ThisWorkbook.Worksheets("QUITTANCE").Range("b" & Me.Tag).value = UserForm1.N_Mag.value

            ThisWorkbook.Worksheets("QUITTANCE").Range("c" & Me.Tag).value = Me.TextBox1.value

            ThisWorkbook.Worksheets("QUITTANCE").Range("d" & Me.Tag).value = Me.TextBox2.value

            Unload Me

End Sub

Les données d'Userform 4 sont sauvegarder mais
Mon problème c'est que je n'arrive a sauvegarder les données de userform1 dons la feuille (quittance)

Merci d'avance

 

[cp4]

Bonsoir,

Avec un fichier (sans données confidentielles) ça serait plus simple de te répondre.

A+

 

[cp4]

@job75 😉
@eCHO : Job75 à raison. En plus, je trouve qu'on s'embête beaucoup plus qu'on essaie d'aider.
En effet, on passe son temps à rouvrir ton fichier.
Je jette l'éponge.

Bonne journée.

 

[job75]

Bonjour eCHO, cp4,

J'ai supprimé mon 1er post.

Pour nous aider à vous aider pourriez-vous :

- organiser la feuille QUITTANCE afin qu'on sache où placer les données

- indiquer ce qu'il faut faire pour accéder à UserForm4.

A+