Macro - Copy/Paste Special to Next Blank Line

[lajohn63]

I have a macro that I'm using to copy and paste special into anothe
spreadsheet...the problem I am having is that it will not select th
next blank line in the spreadsheet, it overlays what I already have.
need to have it keep adding to the existing data and I'm not sure how t
do it. I'm sure it is something simple but I'm new to all of this!

Here is my existing code:
Sub Load_Data()
'
' Keyboard Shortcut: Ctrl+z
'
Workbooks.Open Filename:="F:\SSCW\Load File.xls", UpdateLinks:=0
Windows("TEST- XXXXXX.xls").Activate
Sheets("Sheet1").Select
Range("A2:H2").Select
Selection.Copy
Windows("Load File.xls").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
SkipBlanks _
:=False, Transpose:=False
ActiveWorkbook.Save
ActiveWorkbook.Close
End Su

 

[Ron de Bruin]

Hi lajohn63

See the example on this page
http://www.rondebruin.nl/copy1.htm

Try this example
What if the Database sheet is in another workbook