Hi Mahesh,
You can try my method. When I encountered similar issue, I used the following steps to fix it.
Step 1: Add "IMEX = 1 " ,
Like this: OPENROWSET(''MICROSOFT.JET.OLEDB.4.0'',''Excel 8.0;HDR=YES;IMEX=1; DATABASE = 'd:\WorkFolder', [TargetSheetName$] )
Step 2: Modify the value in Windows Registry. Set TypeGuessRows from 8 to 0.
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel , TypeGuessRows = 8
And then, Run your program.
I hope that you will get your target:-)