Can be shortened to and can be done without any selections from anywhere.

Sheet1.Range("H3:H10").Copy Sheets("Sheet2").Range("A1")

--
Don Guillett
SalesAid Software

"andy F" wrote in message
...
Hi All,

I have just managed to figure it out using the following:

Sheets("Sheet1").Select
Sheet1.Range("H3:H10").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste

How would I convert this to select a different workbook that was say in
a location of C:\folder\filename.xls

Many Thanks


---
Message posted from http://www.ExcelForum.com/