Impression seulement les cellules sous condition
s
Bonjour,
Voici mon problème
Afin de faire des économies de papier, je souhaiterais mettre en forme l'impression de façon à imprimer les étiquettes uniquement des cellules qui ne contiennent pas le mot "vide."
Car mes étiquettes sont sur 3 pages et elles sont vides aléatoirement parmi ces possibilités, je voudrais les regrouper sur la ou les deux premières seulement si nécessaire
je peux passez par une autre page supplémentaire si nécessaire mais je ne vois pas comment faire le tri???
merci d'avance pour votre aide
swordsman
Bonsoir
La macro suivante copie la feuille 1, et sur la feuille copiée, supprime toutes cases qui contiennent le mot vide.
J'espère que cela te conviendra
Sub supprimer_le_mot_vide()
Sheets("Feuil1").Copy Before:=Sheets(1)
Sheets("Feuil1 (2)").Activate
Dim cellule_ As Range
Dim test_ As String
For Each cellule_ In Range("A1:Z500")
test_ = cellule_.Value
If test_ Like ("*vide*") Then
cellule_ = ""
End If
Next cellule_
End SubBonjour.
As-tu pu tester la macro que je ta' proposée ?