View Single Post
  #4   Report Post  
 
Posts: n/a
Default



Jam22171 wrote:
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=" & tSource & ";" & _
"Extended Properties=Excel 8.0;" 'to replace old source

I'm not sure if this is the right approach because I can't make it work.


Try putting the Excel 8.0 in single quotes

..Provider = "Microsoft.Jet.OLEDB.4.0"
..ConnectionString = "Data Source=" & tSource & ";" & _
"Extended Properties='Excel 8.0'"