Hello Rajesh,
as far as I can see you use
Set objExcel = GetObject(,”Excel.Application”)
instead of
Set objExcel = GetObject(,"Excel.Application")
The double quotes are not correct.
Also the comment signs, for example here
COL1 = Trim(CStr(objSheet.Cells(i, 1).Value)) ‘Column1
instead of
COL1 = Trim(CStr(objSheet.Cells(i, 1).Value)) 'Column1
Replace all these characters in your code and it should run without invalid character error.
I try it on my system and it works with the changes above.
Let us know your result.
Cheers
Stefan
Add comment