J'ai un soucis avec un code qui me supprime toutes mes lignes vides:
J'ai un message d'erreur qui me dis "erreur d'execution 1004, pas de cellules correspondantes"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Sheets("Impression").Select Range("c10:c150").SpecialCells(xlCellTypeBlanks).EntireRow.Delete Columns("b:q").PrintOut Copies:=1, Preview:=True, Collate:=True
Partager