Passing the Used Range to a range object...

[tommy bak]

If you don't want to involve the clipboard, you could use this

With wTscWorkbook.Sheets("Sheet1")
        Set rng = wTscWorkbook.Sheets("Sheet1").Cells(1, .UsedRange.Columns.Count - 7)
        End With
        wmaster.Sheets("Raw Data").Range("B1").Resize(1000, 8).Value = rng.Resize(1000, 8).Value

br
Tommy Bak