declare @Qtext as varchar(2000)
declare @ExcelPath as varchar(250)
declare @worksheet as varchar(50)
set @ExcelPath = 'C:\Record.xls'
set @worksheet = 'Sheet1'
set @Qtext = 'INSERT INTO [TableName] ([Column Name]) SELECT [Excel Column Name]'
set @Qtext = @Qtext + ' FROM OPENDATASOURCE(''Microsoft.Jet.OLEDB.4.0'',''Data Source="'+ @ExcelPath + '";Extended Properties="Excel 8.0;IMEX=1;HDR=NO"'')...'+ @worksheet + '$'
--print@Qtext
exec (@Qtext )
