supprimer images et boutons

Olivier · 4 Janvier 2005

Bonjour et bonne année à vous toutes et tous,

bon, j'ai déjà un problème à vous soumettre:
j'aimerais une 'tite macro qui me supprime toutes mes images et tous les boutons qu'il y a dans mon classeur parce que c'est vraiment trop volumineux en espace mémoire.

Merci de votre aide
@+
Olivier

michel · 4 Janvier 2005

bonsoir Olivier

tu peux tester cette macro

Sub Menage()
Dim i As Byte
For i = 1 To Sheets.Count
Sheets(i).DrawingObjects.Delete
Next i
End Sub

bonne soiree
MichelXld

Olivier · 5 Janvier 2005

Merci Michel et bonne année

Comment que ça a l'air facile pour toi, déjà ça marche nickel ta macro et en plus sans voir toutes les feuilles défiler à toute vitesse, c'est vraiment classe. Et en prime, le code, il est trop classe je trouve. Quand je pense que je m'embête avec des sheets("Feuil"&i).Activate et compagnie, je vais étudier ça de près.

@+
Olivier

supprimer images et boutons

Olivier

Guest

michel

Guest

Olivier

Guest

Discussions similaires

supprimer images et boutons

Olivier

Guest

michel

Guest

Olivier

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency