Parcourir tous les objets d'une feuille sans exception

Bonjour,

Je voudrais lister tous les objets d'une feuille pour récupérer les Tags.

J'utilise ce code :

Code:

---

1 2 3

For Each ListeControles As Control In Me.Controls If TypeOf ListeControles Is Button Then ...

---

Ca marche pour une feuille simple mais ca ne marche pas pour des feuilles avec des TabControls.
Ce code ne permet pas de lister les objets contenus dans le TabControl.

Comment puis-je faire ?
Merci de votre aide

une sub récursive, car chaque controle peut accueillir des controles via sa propriété controls

(form hérite de control)

Merci pour cette réponse

Mais je ne comprends pas bien comment faire.
Comment faire quelque chose de récursif pour entrer dans les controles autant de fois qu'il le faut

http://www.google.fr/search?hl=fr&q=...%C3%A9cursivit

Oui merci

J'ai réussi à adapter à mon besoin la fonction de ce topic

http://www.developpez.net/forums/d61...es-formulaire/

Merci beaucoup.