Supprimer,Modifier Ligne avec Multipage dans un Usf

roro69

XLDnaute Impliqué

• 15 Février 2009

• #2

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Bonjour pas tout compris pour le multipage.........
Mais bon pour les boutons modifier et supprimer voici le code:
Bouton modifier:

If Me.ComboBox5.ListIndex = -1 Then Exit Sub
WS.Range("a" & Me.ComboBox5.ListIndex + 3) = CBxNom
WS.Range("b" & Me.ComboBox5.ListIndex + 3) = TextBox2
WS.Range("c" & Me.ComboBox5.ListIndex + 3) = TextBox1
WS.Range("d" & Me.ComboBox5.ListIndex + 3) = TextBox3
WS.Range("e" & Me.ComboBox5.ListIndex + 3) = TextBox4
'ECT.........................

Cliquez pour agrandir...

Pour le bouton supprimer

If Me.ComboBox5.ListIndex = -1 Then Exit Sub 'ON sort si pas de sélection

With WS
.Rows(Me.ComboBox5.ListIndex + 3).EntireRow.Delete
End With

Cliquez pour agrandir...

A++

 

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #3

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Bonjour roro69

merci pour ta réponse

pour le Btn Supprimer, la, OK

Mais pour le code Modif, ça fonctionne pas

A++++++++++
Cordialement


Roro69 cç y es ,j'y suis arrivé ,
je dois pas être assez réveillé ,
ou le cerveau qui ce ramolli

Merci encore de ton aide
passe un bon dimanche

 

Dernière édition: 15 Février 2009

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 15 Février 2009

• #4

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

RE ;
peut tu me dire dans quelle feuilles tu modifies;est-ce essai ou Modèle
A+++

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 15 Février 2009

• #5

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Rebonjour
Je viens de parcourir un peu ton code;Il faudrait que tu regardes au niveau de ta combo5
Tu la remplis deux fois une fois dans forminitialize et une fois dans la procédure ini.Il faudrait la remplir que depuis ta procédure ini et démarer ta boucle à la bonne ligne!
A++

 

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #6

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

re roro69,
Merci de ton aide
j'avoue vraiment pas y arriver,
ces des codes que j'ai adapté du mieux que j'ai pu, mais la j'avoue
pas comprendre
ce doit être la vieillesse je pense

a+++++++

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 15 Février 2009

• #7

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Re bonjour vaucluse
N'ayant pas vu ton edit j'ai repris un peu ton fichier donc je te le met quand même ;j'ai changer un peu la façon de charger les textbox
A++
Si tu souhaites plus n'hésite pas

 

Pièces jointes

• ModuleListeFournisseurs.zip

  25.8 KB · Affichages: 98

Dernière édition: 15 Février 2009

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #8

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Bonsoir ror69 et le forum

Bravo , superbe modif,
le code est beaucoup plus avec ta version
ça je savais pas faire

Merci beaucoup de ton aide précieuse, et le temps que tu a passé
surtot un dimanche

Pour l'instant , tout est fini pour cette partie Fournisseurs,me rest a gérer
les produits, liste, total stock, stock mini,alerte sur stock mini etc
partie assez compliquée

Si j'ai besoin je te ferais , signe

Bonne soirée a bientôt
Cordialement

 

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #9

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

exciuse moi de te déranger a nouveau,
mais je viens de essayer le classeur dont tu afait des modifs,je viens de voir que la "CBxNom" ne ce valide pas en "Modification"

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 15 Février 2009

• #10

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

Re désolé
A rajouter dans la procédure du bouton modifier:

CBxNom = WS.Range("A" & Me.ComboBox5.ListIndex + 3)

Cliquez pour agrandir...

A++

 

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #11

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

j'ai déja essayé cela , sans résultat

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 15 Février 2009

• #12

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

houla j'ai le cerveau ramolli moi!!!!!!!!!!!
Excuse moi voici le code:

WS.Range("A" & Me.ComboBox5.ListIndex + 3) = CBxNom

Cliquez pour agrandir...

Faire la meme chose pour les autres combos
si on modifie c'est dans la feuille lol!!!!

 

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 15 Février 2009

• #13

Re : Supprimer,Modifier Ligne avec Multipage dans un Usf

merci c'est PK
tu vois tu est comme moi ce matin, le cerveau dans l'au dela

bonne soirée , et merci pour tout
A++

 

Vote positif 0 Vote négatif