Hallo,
weiss jemand, ob es per VB6.0 Code möglich ist eine Exceldatei auszulesen.
Vor dem auslesen will ich definieren. „Gib mir das Feld B6“
Dann will ich den Inhalt von B6 ermitteln.
Bin für jeden Tip dankbar
Gruß
Thomas
weiss jemand, ob es per VB6.0 Code möglich ist eine Exceldatei
auszulesen.
Vor dem auslesen will ich definieren. „Gib mir das Feld B6“
Dann will ich den Inhalt von B6 ermitteln.
Servus Thomas
In diesem Fall ist ausnahmsweise sogar Microsoft zu sich selbst kompatibel - d. h.: Ja, das geht, und zwar folgendermaßen:
Function ZellInhalt(XlsDatei as str, Zelle as string) as string
Dim XL As Excel.Application
Dim XLWorkBook As Excel.Workbook
Dim XLWorkSheet As Excel.Worksheet
Dim z As Integer
Dim wbk As String
' Excel öffnen
On Error Resume Next
Set XL = GetObject(, "Excel.Application")
If Err.Number Then
Err.Clear
Set XL = CreateObject("Excel.Application")
If Err.Number Then
MsgBox "Excel kann nicht geöffnet werden", vbExclamation, "Excel-Fehler"
End
End If
End If
On Error GoTo 0
' Excel-Datei öffnen
Set XLWorkBook = XL.Workbooks.Open(XlsDatei)
Set XLWorkSheet = XLWorkBook.ActiveSheet
' Inhalt der gewünschten Zelle ermitteln
ZellInhalt = XLWorkSheet.Range(Zelle).Value
' Excel schließen
XLWorkBook.Close False
Set XLWorkSheet = Nothing
Set XLWorkBook = Nothing
Set XL = Nothing
End Function
Das ist eine leichte Abwandlung eines Programms von mir und so nicht getestet, aber ich hoffe, es funktioniert so 
MfG
Roland
Hallo,
ist es erforderlich das Excel als Anwendung installiert ist? Bzw. wie kann man ne Excel Tabelle auslesen wenn man lediglich ne Exceldatei hat und per Programm nur an die Daten aus der Datei kommen möchte? (… natürlich mit VB 6)
Vielen Dank
Matthais
ist es erforderlich das Excel als Anwendung installiert ist?
Bzw. wie kann man ne Excel Tabelle auslesen wenn man lediglich
ne Exceldatei hat und per Programm nur an die Daten aus der
Datei kommen möchte? (… natürlich mit VB 6)
Servus Matthias
Ob Excel dafür installiert sein muss, kann ich dir nicht mit Sicherheit beantworten, weil auf allen Rechnern, die ich zur Verfügung habe, Excel installiert ist.
Theoretisch dürfte es aber nicht notwendig sein, aber in VB muss die Referenz zur Microsoft Excel object Library aktiviert sein.
(bei meiner englischen VB-Version: Project --> References
auf deutsch wahrscheinlich Projekt --> Referenzen … oder so ähnlich)
Probier es doch einfach aus!
MfG
Roland