Zone de texte dans Excel

Bonjour

je me retrouve avec des zones de texte dans Excel, de tailles relativement petites

j'en ignore le nombre et surtout l'endroit exact où elles se trouvent

Existe-t-il une métode afin de les faire apparaitre et ensuite de les supprimer

Merci par avance

Bonjour
Passe par VBA pour les gérer

Exemple :

Compter le nombre de zones de texte

Sub Cptzone()
For i = 1 To ActiveSheet.Shapes.Count
nb = i

Next i
MsgBox nb
End Sub

Afficher les noms des zones de texte

Sub nomshapes()
For Each c In ActiveSheet.Shapes
c.name
Next c
End Sub


Supprimer les zones de texte

Sub Suphapes()
For Each c In ActiveSheet.Shapes
c.delete
Next c
End Sub

Bonjour

je vais peut etre passer pour un idiot mais je suis nul en VBA

j'ai 2 questions
- J'ai tenté de créer une macro pour la 1ère formule mais après je fais comment pour avoir le nombre de zones de texte

- voilà la méthode que j'utilise pour faire une macro: est-ce la bonne :
1)Menu Macro>>Nouvelle Macro => on valide
2) Arrêter l'enregistrement de la macro
3) Menu Macro>>Macros => Sélectionner la macro la macro qui
vient d’être créée
=> Bouton modifier => on se retrouve sous VBEditor, avec
un nouveau module général.
4) Supprimer la macro qui vient d’être créer, elle ne servait qu'à
ça.
5) Coller le code de Function à End function
6) Fermer la fenêtre et Repasser sous Excel

en fait, ce que je souhaiterais, c'est les avoir toutes dans la même couleur afin de les supprimer
Merci par avance pour les réponses et ton aide

Oui
quand tu te retrouves dans le module VBA

Il suffit d'effectuer un copier/coller des codes que je t'ai transmis
Puis d'exécuter les macros correspondantes à tes souhaits

Bonne journée

Eric dunkerque

Merci

Impeccable cela fonctionne très bien
mon problème est résolu