Klartigue
09-14-2011, 12:23 PM
Sub CopyandPaste()
Dim LastRow As Long
With ActiveSheet
Range("A2:G2").Resize(Range("A2").End(xlDown).Row - 1).Select
Selection.Copy
Windows("Broker Volume Master.xlsx").Activate
Application.Run "BLPLinkReset"
Range("A2").Resize(Range("A2").End(xlDown).Row + 1).Select
ActiveSheet.Paste
End With
End Sub
On the attached sheet, how do i get this block of data to paste into the sheet, starting in the next available row A10? FYI, the next available row will change since i will be inputting more data on this sheet overtime so i need a general reference to the row after the last occupied row.
Thank you!
Dim LastRow As Long
With ActiveSheet
Range("A2:G2").Resize(Range("A2").End(xlDown).Row - 1).Select
Selection.Copy
Windows("Broker Volume Master.xlsx").Activate
Application.Run "BLPLinkReset"
Range("A2").Resize(Range("A2").End(xlDown).Row + 1).Select
ActiveSheet.Paste
End With
End Sub
On the attached sheet, how do i get this block of data to paste into the sheet, starting in the next available row A10? FYI, the next available row will change since i will be inputting more data on this sheet overtime so i need a general reference to the row after the last occupied row.
Thank you!