Bouton ajouter sur formulaire

Bonjour à l'équipe,

Je reviens vers vous pour m'aider à résoudre un problème, une erreur avec mon code associer à mon bouton "Ajouter".

J'ai essayé plusieurs méthode, mais rien à faire.

Merci pour l'aide que vous pourrez m'apporter.

Ci-joint le fichier en question.

Bon courage à vous, pendant ces moments difficiles.

#Riko#

ou est le problème : lorsque je clique sur le bouton l'userform s'active!

Bonsoir,

Je m'explique, lorsque je rentre les données dans mon formulaire de saisie et que j'appuie sur le bouton ajouter il m'indique "confirmez-vous l'ajout des données" et je clic sur Oui et j'ai une Erreur débogage, ligne concerné sur le bouton Ajouter

Erreur ligne :

ligne = Sheets("Feuil1").Range("a456541").End(x1Up).Row + 1

J'espère avoir été compréhensible.

Bonne soirée.

Bonjour toutes et tous

Essaies en remplissant juste la première ligne de ton tableau , enregistre-ton classeur ré-ouvre ton classeur puis, active les macros et ton bouton ajouter de ton userform fonctionnera

Note: il faut toujours alimenter la première ligne de ton tableau, je ne parle pas de l'entête (ici sur l'exemple ci-dessous, il s'agit de la 2ème ligne)

crdlt,

André

Bonjour Andre13,

Je te remercie pour ton aide, malheureusement même en suivant tes recommandations, j'ai toujours la même erreur photo ci-jointe :

Merci quand même.

Bon week-end

Bonjour Riko LEPOLAK, Andre13, Toukoul, le forum,

Essaies:

ligne = Sheets("Feuil1").Range("A" & Rows.Count).End(x1Up).Row + 1

Sinon, une autre façon de faire avec un tableau structuré...

Private Sub CommandButton1_Click()
 Dim ListObj As ListObject, Sh As Worksheet, j As Long
 'click bouton ajouter
             Set Sh = Sheets("Feuil1")
        Set ListObj = Sh.ListObjects("Tableau1")
                  j = Sh.Cells(Rows.Count, 1).End(xlUp).Row

    If ComboBox1.Value = "" Then
       MsgBox "Veuillez renseigner le champs 'Nom/Prénom' "
    Else

     If MsgBox("confirmez-vous l'ajout des données ?", vbYesNo, "confirmation") = vbYes Then
      With ListObj
       Sh.Cells(j, 1) = TextBox1.Value
       Sh.Cells(j, 2) = ComboBox1.Value
       Sh.Cells(j, 3) = TextBox2.Value
       Sh.Cells(j, 4) = TextBox3.Value
       Sh.Cells(j, 5) = TextBox4.Value
       Sh.Cells(j, 6) = TextBox5.Value
       Sh.Cells(j, 7) = TextBox6.Value
      End With
       ListObj.ListRows.Add
       MsgBox "Données enregistrées"
       Unload Me
       UserForm1.Show
     End If
    End If
End Sub

Cordialement,

Bonjour Riko LEPOLAK, le forum,

STP, évites les MP, tu prives les autres membres du forum de la solution proposée mais également de propositions plus pertinentes,

J'aimerais pouvoir rechercher un de mes client à l'aide du menu déroulant "Nom Client" dans le formulaire, et pouvoir renseigner toutes les informations liées à ce client.

Avoir aussi la possibilité de modifier un client enregistré, toujours à l'aide du menu déroulant "Nom Client".

A tester....

Cordialement,

Bonsoir Xorsankukai,

Je te remercie c'est exactement ce que je voulais, tu es un magicien d'EXCEL. Désolé pour le message personnel, il est vrai que le partage est le meilleur moyen d'avancer.

Ce petit programme va considérablement m'aider dans mon activité.

Merci encore je n'hésiterais pas à revenir vers toi, pour d'autre action.

Bonne soirée à tous.

Bonjour à l’équipe,

Je suis de retour pour mon projet de gestion de bon d’intervention.

En 1er j’ai un débogage avec formulaire Client Intervention quand je veux faire une recherche :

En 2eme j’aimerais pouvoir rechercher avec formulaire Saisie Bon Intervention, menu déroulant Client Facturé toutes les infos lié à ce Client.

Si je choisis le menu déroulant Client Intervention alors je privilégie les données du Client Intervention et conserve les informations d’indentification du Client Facturé (N° Client, adresse, Téléphone, etc…)

Il faudrait que je puisse dans la feuille Historque_BI avoir un numéro de rapport qui se crée automatiquement, à partir d’un numéro à définir (exemple partir du numéro 50678 à renseigner sur la première ligne).

Je reviendrais vers vous car je voudrais aussi gérer mon stock véhicule.

Dans l’attente, merci de toute l’aide que vous pourrez m’apporter.

Riko.

Bonjour Riko

Merci d'éviter de faire des doubles post pour la même question

https://forum.excel-pratique.com/viewtopic.php?f=2&t=141547

Bonjour BrunoM45,

Désolé pour le doublon, je voulais revenir sur le message avec question / réponse antérieur, continuité de mon projet.

Je vais voir pour supprimer l'autre.

Riko