OVH Cloud OVH Cloud

Vider ou supprimer un userform ou supprimer des boutons

7 réponses
Avatar
Alain
Bonjour,
Tout d'abord merci de lire mon post afin de me venir en aide !
Voil=E0 : je veux g=E9rer des boutons de type commandbutton. Pas de
probl=E8me pour en ajouter, en mode 'designer' pour ensuite leur ajouter
du code toujours en designer et obtenir ainsi durant l'ex=E9cution des
boutons "clickables".
Par contre, je ne parviens pas =E0 les supprimer. Ou peut-=EAtre peut-on
vider le userform ou m=EAme le supprimer enti=E8rement, ce qui ne me
g=EAne pas non plus, mais je ne sais pas le faire.

Si je me suis mal exprim=E9 :
Peut-on supprimer un objet de la biblioth=E8que 'controls' ? Quelle est
la ligne de commande ?
Peut-on supprimer en userform ? quelle est la ligne de commande ?
Peut-on vider un userform de ses controls ?

7 réponses

Avatar
papou
Bonjour
Pour supprimer un contrôle Userfrom, clic droit sur l'objet, Supprimer et
répondre Non à la question (voulez-vous exporter...)
Pour supprimer les différents contrôles situés dans un Userform, en mode
création dans l'éditeur, il suffit d'étirer la sélection pour englober
l'ensemble des contrôles en maintenant le bouton gauche de la souris appuyé,
puis d'appuyer sur la touche Suppr.

Cordialement
Pascal

"Alain" a écrit dans le message de news:

Bonjour,
Tout d'abord merci de lire mon post afin de me venir en aide !
Voilà : je veux gérer des boutons de type commandbutton. Pas de
problème pour en ajouter, en mode 'designer' pour ensuite leur ajouter
du code toujours en designer et obtenir ainsi durant l'exécution des
boutons "clickables".
Par contre, je ne parviens pas à les supprimer. Ou peut-être peut-on
vider le userform ou même le supprimer entièrement, ce qui ne me
gêne pas non plus, mais je ne sais pas le faire.

Si je me suis mal exprimé :
Peut-on supprimer un objet de la bibliothèque 'controls' ? Quelle est
la ligne de commande ?
Peut-on supprimer en userform ? quelle est la ligne de commande ?
Peut-on vider un userform de ses controls ?
Avatar
El pequeno
controls("x").delete
Slts


Bonjour,
Tout d'abord merci de lire mon post afin de me venir en aide !
Voilà : je veux gérer des boutons de type commandbutton. Pas de
problème pour en ajouter, en mode 'designer' pour ensuite leur ajouter
du code toujours en designer et obtenir ainsi durant l'exécution des
boutons "clickables".
Par contre, je ne parviens pas à les supprimer. Ou peut-être peut-on
vider le userform ou même le supprimer entièrement, ce qui ne me
gêne pas non plus, mais je ne sais pas le faire.

Si je me suis mal exprimé :
Peut-on supprimer un objet de la bibliothèque 'controls' ? Quelle est
la ligne de commande ?
Peut-on supprimer en userform ? quelle est la ligne de commande ?
Peut-on vider un userform de ses controls ?




Avatar
Alain
Merci à vous deux, Papou et El pequeno.
J'essaie en fait de les supprimer avec une macro, et justement, avec
Controls("x.Name").delete, ça ne marche pas !
D'où ma question.
Avatar
papou
Bonjour
A placer dans un module du classeur contenant l'objet à supprimer
(sinon remplacer ThisWorkbook par ActiveWorkbook)

ThisWorkbook.VBProject.VBComponents.Remove _
ThisWorkbook.VBProject.VBComponents("UserForm1")

Cordialement
Pascal

"Alain" a écrit dans le message de news:

Merci à vous deux, Papou et El pequeno.
J'essaie en fait de les supprimer avec une macro, et justement, avec
Controls("x.Name").delete, ça ne marche pas !
D'où ma question.
Avatar
papou
Re
Pour la suppression des contrôles :
Si les contrôles sont ajoutés par code, regarde la méthode Remove
Mais sinon ??

Cordialement
Pascal

"papou" <cestpasbon@çanonplus> a écrit dans le message de news:

Bonjour
A placer dans un module du classeur contenant l'objet à supprimer
(sinon remplacer ThisWorkbook par ActiveWorkbook)

ThisWorkbook.VBProject.VBComponents.Remove _
ThisWorkbook.VBProject.VBComponents("UserForm1")

Cordialement
Pascal

"Alain" a écrit dans le message de news:

Merci à vous deux, Papou et El pequeno.
J'essaie en fait de les supprimer avec une macro, et justement, avec
Controls("x.Name").delete, ça ne marche pas !
D'où ma question.




Avatar
El pequeno
Bonjour Alain.
Si tes controles ont été créés à l'aide de la "Boite à outils Controls", il
s'agit alors d'OLEObject faisant partis de la collection OLEObjects. Essayes
le code:

Worksheets("Feuil1").OLEObjects("CommandButton1").Delete

pour un bouton nommé "CommandButton1" créé dans la feuille nommée "Feuil1".
Attention: si tu éxecutes ta macro en mode "pas à pas" le message
"Impossible d'entrer en mode Arret maintenant" apparait ( cliquer sur
continuer ) au moment de l'éxecution de la ligne ci-dessus. Le control est
quand meme détruit. Ce message n'apparait pas en éxecution normale.
Pour les autres controles les méthodes .delete et .remove fonctionnent trés
bien, hormis peut etre pour des controles créés à partir de la boite à outil
"Formulaire". Dans ce cas il faut s'orienter probablement vers la collection
"Shapes" de la feuille.
Cordialement


Bonjour,
Tout d'abord merci de lire mon post afin de me venir en aide !
Voilà : je veux gérer des boutons de type commandbutton. Pas de
problème pour en ajouter, en mode 'designer' pour ensuite leur ajouter
du code toujours en designer et obtenir ainsi durant l'exécution des
boutons "clickables".
Par contre, je ne parviens pas à les supprimer. Ou peut-être peut-on
vider le userform ou même le supprimer entièrement, ce qui ne me
gêne pas non plus, mais je ne sais pas le faire.

Si je me suis mal exprimé :
Peut-on supprimer un objet de la bibliothèque 'controls' ? Quelle est
la ligne de commande ?
Peut-on supprimer en userform ? quelle est la ligne de commande ?
Peut-on vider un userform de ses controls ?




Avatar
Alain
Merci.
Je vais essayer vos deux solutions. Je vous remercie beaucoup.
Alain