Thread: Copy & Paste
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
John Keturi John Keturi is offline
external usenet poster
 
Posts: 19
Default Copy & Paste

I'am using the input from a dialog box to open a particular worksheet, lets
say user selects sheet 2. If sheet one is the current open sheet, and the
code copys from sheet 1, and pastes to sheet 2, then .Visible=False for
sheet 2. How do I select a cell on sheet 1 so that the copied area doesn't
remain highlighted? Also considering that the original sheet (sheet 1) was
also selected from a drop down box. So, I can't just say to select or
activate a certain sheet since I don't know what the original user selected
sheet was.

CopyMonthSheet:
Dim a As Integer, rngAddress
rngAddress = "A4:AG75"
Range(rngAddress).Select
Range(rngAddress).Copy
ActiveSheet.Select
With Worksheets(CStr(Worksheets("Staffing Data").Cells(2, 1).Value))
.Select
End With
Range("A4").Select
ActiveSheet.Paste
ThisWorkbook.DialogSheets("Dialog1").Hide
ActiveWindow.SelectedSheets.Visible = False
Sheets("Daily Staffing").Visible = False
Range("B4").Select
Sheets("Daily Staffing").Visible = True
Thanks