<blush completely wrong syntax

Sub Control()

Workbooks.Open Filename:="c:\bonus.xls"
Workbooks.Open Filename:="c:\departure.xls"
CopyData 6
CopyData 7
CopyData 12

End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Alen32" wrote in message
lkaboutsoftware.com...
still doesn't work samme error "subscript out of range"