USERFORM de Gestion d'ajout et de retrait de noms

[belerofon]

Bonjour à tous,
Comme un jour n'est pas suffisant pour en savoir assez sur VB et que j'ai très envie d'en savoir plus, me revoila aujourd'hui pour en apprendre davantage...
Hier j'ai deja appris beaucoup et ca commence a rentrer mais la syntaxe ne s'improvise pas malheureusement , d'ou ce nouveau message...
J'ai préparé un exemple d'un USERFORM dont le bouton se trouve sur un onglet qui permettrait d ajouter et de retirer des noms d'une liste se trouvant dans un autre onglet.
Le formulaire est tres simple, et j'ai annoté le code pour expliciter mes besoins...
Jusqu a present je n'ai pas reussi a mettre en forme les données, comme par exemple les rendre gracieuses avec des lignes pour faire un joli tableau :s ni meme trier mes données par ordre alphabetique via VB.

Merci d'avance les zamis...
PS: Staple si tu me lis, constate a quel point j'évolue lol

 

[roro69]

Re : USERFORM de Gestion d'ajout et de retrait de noms

RE
Cà y est enfin trouvé d'ou venait ton bug rhh
Tu avais ceci dans ton code:

Private Sub UserForm3_Initialize()

Tu dis enlever le 3 à userform et là plus de pb
A++

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

ahhh, j ai cru que tu t etais noyé dans le ptit jura 🙂
Ben pourtant j avais essayé de l enleve et ca marchajt pas quand meme... je fonce reessayer...
Merci l 'ami...

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

Ah ben ca... ca marche du coup ... j devais etre bourré... ca supprime le nom dans la liste mais pas la cellule, mais ca je crois que j vais trouver comment faire 🙂

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

Ca doit etre a cause de :

WS.Range("A" & Me.ComboBox1.ListIndex + 2).ClearContents

Si mon anglais est bon le contents c est juste le contenu...
et si j essaye ClearCells ???

 

[roro69]

Re : USERFORM de Gestion d'ajout et de retrait de noms

RE VOICILA BONNE oups

With WS
.Range("A" & Me.ComboBox1.ListIndex + 2).Delete
End With

A++

 

[roro69]

Re : USERFORM de Gestion d'ajout et de retrait de noms

Je te rajoutes ceci sinon décalage des cellules

With WS
.Range("A" & Me.ComboBox1.ListIndex + 2).Delete Shift:=xlUp
End With

A++

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

Un Vrai chef ce Roro... bon j t ai bien aidé sur le dernier loooool...
Grace à toi j en sais un peu plus sur VB et ses tracasseries 🙂
Mon deuxieme formulaire est donc opérationnel...
Demain j'en attaque un troisieme sur les 6 que doive comporte mon fichier, j ai pris un formulaire simple pour demain vu que j dois aller faire des courses aussi et j ai bon espoir de pas solliciter le forum pour ca avec ce que j ai appris depuis 2 jours...

Gros gros merci Roro, en esperant pouvoir te rendre la pareille un jour prochain
J.
Passes une agreable soirée

 

[hypo78]

Re : USERFORM de Gestion d'ajout et de retrait de noms

Bonjour à tous,

comment adapter cette formidable macro à plusieurs colonnes : Noms / Centre / Groupement....

Juju tu relèves le défi où on fait appel à ton super Joker?

Merci d'avance

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

je t appelle Hypo, pleins de trucs a te dire 🙂

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

bon hypo regarde si ca ca te va...
je sais ce que tu vas dire y a un bug lors de la premiere entre, mais apres la bug n apparait pu , me demande pas pourquoi 🙂

 

[belerofon]

Re : USERFORM de Gestion d'ajout et de retrait de noms

ah ben non , apres second essai ca bug meme pas.... alors il apprend pas vite le dédé 🙂

 

[hypo78]

Re : USERFORM de Gestion d'ajout et de retrait de noms

il y a 7 jours, on mettait 10 h pour faire un Userform spécial Bug et là..... Respect