In the following code is it possible to use the actual number of
filled-in rows instead of hard-coded maximum of 15,000?

Workbooks.Open FileName:=sDbf
Range("2:15000").Select
Selection.Copy
Destination:=ThisWorkbook.Sheets(sWSName).Range("2 :15000")
ActiveWorkbook.Close

May be something with Rows.Count?

If it matters I'm working with Excel 2002.

TIA, Eugene