Datenimport aus einem Excel-File
Die Funktion ImportExcelFile() importiert Daten aus einer .xls Excel-Datei in eine Tabelle.
Hinweis
Falls nEndRow kleiner nStartRow ist werden ALLE Zeilen importiert!
lCopyFieldNames:
-
kann nur verwendet werden wenn es sich bei dem Tabellen-Objekt oTable um eine TMemCalcTable handelt
-
es werden alle Felder aus der oTable entfernt, bevor diese automatisch erzeugt werden
-
alle Felder werden als Memo Felder erzeugt
|
Parameter |
Beschreibung |
|---|---|
|
oTable:O |
Tabellen-Objekt, in welches die Daten importiert werden |
|
cSource:C |
.xls Excel-Datei, aus der die Daten importiert werden |
|
nFieldNameRow:N |
Zeile in welcher sich die Feldnamen befinden; default = 0 |
|
nStartRow:N |
Gibt an, ab welcher Zeile die Daten importiert werden; default = 1 |
|
nEndRow:N |
Gibt an, bis zu welcher Zeile die Daten importiert werden; default = 0 |
|
lShowMsg:L |
Info-Fenster werden angezeigt z.B. bei Beenden oder Fehlern; default = false |
|
lShowStatus:L |
Status-Fenster wird angezeigt; default = false |
|
nMode:N |
Import Modus; default = 0
|
|
cKeys:C |
Feldnamen durch ; getrennt. Diese Felder werden für die Prüfung auf Übereinstimmung verwendet; default = Leerstring |
|
lCopyFieldNames:L |
Erzeugt alle Felder automatisch anhand der "nFieldNameRow" Zeile der .xls Excel-Datei; default = true |
Rückgabewert
Array - { Anzahl an neu hinzugefügten Datensätzen,
Anzahl der Datensätze in der "cSource" Datei,
Anzahl der gelöschten Datensätze,
Anzahl der aufgetretenen Fehler,
Anzahl an erfolgreich importierten Datensätze,
Anzahl der upgedateten Datensätze }
Beispiel
| oTable |
oTable := CreateObject('TMemCalcTable'),
ImportExcelFile(oTable, 'c:\test.xls', 1, 2, , , , , , true),
Browse(, oTable)