Excel-Datei lesen

Gelöstes und einfache Beispiele
Antworten
Alfred
Junior Member
Beiträge: 6
Registriert: 23. Februar 2010, 14:19
Kontaktdaten:

Excel-Datei lesen

Beitrag von Alfred »

Code: Alles auswählen

IDXLSFile is int = xlsOpen("D:\Programme\WinDev12\my_projects\Excel_lesen\Data\test1.xls")

IF IDXLSFile <> -1 THEN
	Info("Die XLS Datei wurde geöffnet!")
ELSE
	Info(xlsMsgError(IDXLSFile))
END 


WWorksheet is int = xlsCurrentWorksheet(IDXLSFile,2)   //lesen aus dem 2. Worksheet

FOR iEXPRESS = 1 TO 5
ResData is string = xlsData(IDXLSFile, iEXPRESS, 6,False)

// False ist wichtig!!
// Wenn eine Spalten ganz leer ist, zählt WinDev diese sonst nicht mit(siehe Hilfe)

Info(ResData)
   
END
xlsClose(IDXLSFile)
Gruß
Alfred

Antworten