Excel to Excel Data transfer without opening any of the files(source or target)

Thanks for the corrected code... much appreciated.

By the way, for this line of code...

Quote:

---

Originally Posted by Transformer

Code:

---

strFileExt = Mid(strOutPutFileFullName, InStrRev(strOutPutFileFullName, ".", -1, vbTextCompare), Len(strOutPutFileFullName))

---

---

you can omit the last two arguments for the InStrRev function call... the next to last argument defaults to -1 when omitted and since you are searching for a "dot", you don't need to to a "text compare" (which slows down the InStrRev function). So, I would write that line like this...

Code:

---

strFileExt = Mid(strOutPutFileFullName, InStrRev(strOutPutFileFullName, "."), Len(strOutPutFileFullName))

---

In case of XL2007 it will be able to transfer data between xlsx and xls files both but in case of XL2003 it can transfer between xls files only.

Hi Transformer,

Great work !! :cheers:

Hi Transformer

Highly impressive :cool:

Thanks!

Expediently, I set a certain time with task scheduler. When the time is up, Macro Expert automates to transfer data from excel to the website.