SupprimerFeuilles

[hasardeux]

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]

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