Y Yogesh Oct 31, 2003 #1 Hi All, How do i avoid printing blank rows in a Selected Range of cells using VBScript. Thank you,
T Tom Ogilvy Nov 1, 2003 #2 Dim rng as range On error resume Next set rng = Selection.Specialcells(xlBlanks) On error goto 0 if not rng is nothing then rng.EntireRow.Hidden = True Selection.Printout if not rng is nothing then rng.EntireRow.Hidden = False
Dim rng as range On error resume Next set rng = Selection.Specialcells(xlBlanks) On error goto 0 if not rng is nothing then rng.EntireRow.Hidden = True Selection.Printout if not rng is nothing then rng.EntireRow.Hidden = False