Autres Saisie par userform

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

KRUG WOO

XLDnaute Junior
Bonsoir les amis,
j'ai un fichier que j'aimerai automatiser les saisies des données par userform: valider, supprimer, modifier.
j'utilise le Range("nom du tableau").ListObject.ListRows.Add.Range.... mais ne marche pas, peut être qu'il faut utiliser activecell.entireRow.select ou activecell.entireColumn.select pour que ça marche, enfin je crois 😭
J'espère que je ne fais pas de bêtises pour les structures
Merci 👍
 

Pièces jointes

Solution
Bonjour,
Vous ne pouvez pas utiliser des instructions pour tableau vu que vous n'avez pas de tableau
VB:
activecell.entireRow.select ou activecell.entireColumn.select
Ben, inutile aussi
Vous validez une liste d'infos a la fois donc pas de boucle
VB:
Private Sub CmD_Valider_Click()
    Dim PCV As Long
    
    With Worksheets("feuil1")
        PCV = .Range("B" & .Rows.Count).End(xlUp).Row + 1
        .Cells(PCV, 1) = Reference.Value
        .Cells(PCV, 2) = Nom.Value
        .Cells(PCV, 3) = Prenom.Value
        .Cells(PCV, 4) = Designation.Value
        .Cells(PCV, 5) = Montant.Value
    End With
End Sub
Bonsoir Éric,
Est ce que tu peux voir ce que tu peux faire sur mon nouveau fichier s'il te plaît.
J'arrive pas à trouver le code.
Avec 500 lignes dans listbox, j'aimerais faire une filtre par combobox et taper le mot dans textbox, une fois fait le filtre, je clic sur le mot dans listbox, je modifie le mot et le valider à nouveau.
Merci!
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
365
Retour