SupprimerFeuilles

hasardeux · 21 Novembre 2002

Bonjour tout le monde,

Je remercie infiniment les gens qui m'ont aidé à résoudre certains problèmes auparavant.

Ma question aujourd'hui est simple et bête (j'avoue de ma nullité en VBA): comment supprimer toutes les feuilles dont les cellules A7, B7, C7 et D7 sont vides. (Le test doit s'effectuer sur les feuilles que j'ai sélectionnées auparavant SEULEMENT)

Merci beaucoup de vos éclairicissements

STéphane · 21 Novembre 2002

bonjour

j'ai utilisé la fonction ET que tu peux utiliser dans les formules mais en vba.
j'ai préféré cela à l'utilisation de l'opérateur "and"

c'est un exemple
tu n'as plus qu'à rajouter une instruction pour supprimer les feuilles et éventuellement empêcher excel d'afficher une alerte lors de la suppression

For Each sh In Sheets
'sh.Activate 'si vous mettez sh.activate, vous ne serez pas obliger de préfixer les adresses des cellules par "sh."
If Application.And(sh.[A1] = 5, sh.[A2] = 5) Then MsgBox sh.Name
Next sh

bye
Stéphane

SupprimerFeuilles

hasardeux

Guest

STéphane

Guest

Discussions similaires