Hi,

You can write the same code for multiple ranges as below:

GetData MyPath & MyFiles(Fnum), "Sheet1", Range("A1:C1","G1:H1",...etc), destrange, False, False
Regards,
Gajendra Gupta