lt Google Ergebnissen ist der Connection String falsch. Lege doch mal eine leere Datei mit der Endung udl an und mache einen Doppelklick darauf. Dann kannst Du den OLEDB per Dialog konfigurieren, speichern und aus der UDL-Datei den korrekten String auslesen.
Danke für den Tipp, jetzt funktioniert es mit
Code:
dbConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=Excel;Mode=Read" _
& ";Initial Catalog=" & SourceFile