View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ricky Pang Ricky Pang is offline
external usenet poster
 
Posts: 53
Default Moving Cursor & Sheet back to the Original Location

Hello Experts,
Through a macro, I open a file to select various ranges in different
sheets to copy to another workbook. Is there a way to move the cursor
back to the cursor's original location plus go back to the original
sheet, that was before I activated the macro? This is so that other
users can continue with their work without having to search for their
last location.

Here's an excerpt of switching to another workbook to select a few
ranges, copy and paste:

wkbk.Application.Goto Reference:="ListA"
Selection.Copy
'Is there something that I could put here to move the
'cursor back to its original location?
curWks.Range("PasteListA").PasteSpecial _
Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

wkbk.Application.Goto Reference:="ListB"
Selection.Copy
'Is there something that I could put here that make the active sheet be
the original sheet again?
curWks.Range("PasteListB").PasteSpecial _
Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Thanks in advance,
Ricky

*** Sent via Developersdex http://www.developersdex.com ***