cellules vides

[phil]

Bonjour,

Afin d'éviter d'imprimer des pages qui n'ont pas été remplies, j'aimerai trouver un moyen soit par excel ou soit par vba qui me permette de savoir si une zone déterminée est vide ou non.

Si quelqu'un connait la méthode, ce serait hyper sympa.

Merci

Phil

 

[sousou]

Exemple:
'définir ta zone
'Toutes la zones utilisées
Set mazone = Activesheet.usedrange
'ou
Set maZone= selection
'à toi de choisir


For each i in mazone
if i.value <>"" then drapeau=drapeau+1
next

If drapeau= 0 msgbox "Ta zone est vide"