Macro pour remettre des combobox à zéro...

  • Initiateur de la discussion Initiateur de la discussion Christian
  • Date de début Date de début

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 !

C

Christian

Guest
Bonsoir à tout le forum,

Je souhaiterais pouvoir, par macro, remettre à zéro (ou à vide) des combobox.

Pourriez-vous m'aider à l'écriture de cette macro ?.
fichier joint

Je vous remercie pour le temps que vous voudrez bien m'accorder.

Bien amicalement,
Christian [file name=Combobox_20060329173913.zip size=16650]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Combobox_20060329173913.zip[/file]
 

Pièces jointes

bonjour Christian

tu peux tester cette macro pour vider tous les ComboBox de la Feuil3


Dim oleObj As OLEObject

For Each oleObj In Sheets('Feuil3').OLEObjects
If TypeOf oleObj.Object Is MSForms.ComboBox Then oleObj.Object.Clear
Next



bonne soirée
MichelXld

Message édité par: michelxld, à: 29/03/2006 17:45
 
Re, MichelXld,

En fait je souhaiterais remettre toutes les combo à zéro avant toutes nouvelles actions sur celles-ci.


Sinon peux-tu me coller la macro dans le fichier joint plus haut...


a+ merci encore

Christian
 
bonjour

j'espere que cette adaptation pourra t'aider .
je me suis contenté de coller la macro dans la procedure existante puisque je ne sais pas comment tu l'utilises.


bonne journée
MichelXld [file name=Combobox_V02.zip size=13759]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Combobox_V02.zip[/file]
 

Pièces jointes

Bonjour à tout le forum, Mytà, MichelXld,


Merci pour tes réponses et ton travail Michel, ci-joint fichier pour voir le résultat souhaité.


Bien amicalement,
Chrstian [file name=Comboboxsuite.zip size=13659]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Comboboxsuite.zip[/file]
 

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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
20
Affichages
872
Retour