Pete
12-03-2008, 03:02 AM
Hi Experts
Need to amend the current VBA code so that it can be changed - in a way that the user can paste worksheet "Sheet1" into any other worksheet(s) in the workbook other then worksheet "Task_Table1"
Also need to the macro to function even if worksheet "Sheet1" is hidden.
Sub Copy_Paste()
Application.ScreenUpdating = False
Sheets("Sheet1").Select
ActiveWindow.SmallScroll Down:=-9
Cells.Select
Selection.Copy
Sheets("Latam Santander").Select
ActiveWindow.SmallScroll Down:=-18
Cells.Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("D13").Select
Application.ScreenUpdating = True
End Sub
Need to amend the current VBA code so that it can be changed - in a way that the user can paste worksheet "Sheet1" into any other worksheet(s) in the workbook other then worksheet "Task_Table1"
Also need to the macro to function even if worksheet "Sheet1" is hidden.
Sub Copy_Paste()
Application.ScreenUpdating = False
Sheets("Sheet1").Select
ActiveWindow.SmallScroll Down:=-9
Cells.Select
Selection.Copy
Sheets("Latam Santander").Select
ActiveWindow.SmallScroll Down:=-18
Cells.Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("D13").Select
Application.ScreenUpdating = True
End Sub