Problem mit OleDB und Zelschutz Excel

[MasterB]

Hallo zusammen,

versuche eine Exceldatei zu Öffnen mit OleDB. Dies gelingt mir auch bei einer Datei ohne Zellschutz.
Hier mein Code:

Dim ooDs As System.Data.DataSet
Dim ooConn As System.Data.OleDb.OleDbConnection
Dim ooAdapter As System.Data.OleDb.OleDbDataAdapter
Dim ssFile As String = "E:\EM_Verwendung DER-Hardwareausgänge.XLS"
Dim ssTable As String = "Verwendung_DER_Hardwareausgänge"
Dim ssConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & ssFile & ";" & _
"Extended Properties='Excel 8.0;HDR=No;IMEX=1'"
ooConn = New System.Data.OleDb.OleDbConnection(ssConn)
ooAdapter = New System.Data.OleDb.OleDbDataAdapter("Select * from [" & ssTable & "$B5:B5000]", ooConn)
ooDs = New System.Data.DataSet
ooAdapter.Fill(ooDs)
For Each row As DataRow In ooDs.Tables(0).Rows
ListBox2.Items.Add(row(0).ToString())
Next
ooConn.Close()

Wie bekomme ich die Daten in die Liste?? Wie bekomme ich den Zellschutz deaktiviert, wenn ich Es Manuell von Excel aus deaktiviere, dann Funktioniert es.

Ein weiteres Problem ist beim Tabellen name "Verwendung_DER_Hardwareausgänge", dies ist zu Lang anscheinend, denn mit "Verwendung_DER_Hardwareausgäng" Funktioniert es, weiß jemand eine Lösung auch hierfür.

Bitte nicht schreiben ändere den Tabellen namen, das darf man nicht !

Gruß

MasterB

[Bernhard Geyer]

Bei Excel würde ich besser über das COM/ActiveX-Interface von Excel gehen. Der Zugriff über OLEDB/JET-Engine verursacht immer wieder Probleme wie fehlerhafte Formatiergung, Falsche Daten etc etc. Du bist bisher nur auf ein Problem von vielen gestoßen.