But why are you using
Code:
Sheets("Sheet4").Range("j43").Copy
when you should actually be using
Code:
vws.Range("j43").Copy