A complete shot in the dark; should the first instance of
Selection.EntireRow.Hidden = True
read:
Selection.EntireRow.Hidden = False
?


Munchkin;716131 Wrote:

I'm not sure what happened here - this worked in the past, but suddenly
there
is a problem with "Selection.Insert Shift:=xlDown".

The "record end" named range is still there, so it's not that. The
marco is
supposed to go to "RecordEnd" which is hidden, unhide it, insert the
copied
cells while pushing "RecordEnd" below the inserted cells. It worked
before -
anybody know what I'm doing wrong?

Sheets("DRIVER LIST").Select
Application.Goto Reference:="RecordEnd"
Selection.EntireRow.Hidden = True
Selection.Insert Shift:=xlDown
Application.Goto Reference:="RecordEnd"
Selection.EntireRow.Hidden = True
ActiveCell.Offset(-1).Activate


--
p45cal

*p45cal*
------------------------------------------------------------------------
p45cal's Profile: http://www.thecodecage.com/forumz/member.php?u=558
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=200489

http://www.thecodecage.com/forumz