[gelöst] Mehrere Excel Sheeet

Hallo Leute,
ich habe bei mir die Routine eingetragen, das ich in Excel mehrere Sheets eintragen kann. Funktioniert auch alles, aber jetzt kommt noch die Schönheit hinzu. Ich habe mehrer DataItems, die nach ein ander nach Excel exportiere, nur werden in Excel die neuen Tabellenblätter an den Anfang angefügt. Ich habe zwar eine VB Zeile gefunden, die das ändern soll, weiß aber nicht wie ich die implementiere.

VB Text
Worksheets.Add (After:=Worksheets(Worksheets.Count)).Name = "MySheet"

Kann mir einer sagen, wie ich diese Text in C/AL übersetrzt bekomme, so dass ich mit dem Excelbuffer arbeiten kann?

Im ExcelBuffer ist die Funktion CreatNewSheet enthalten, die hier schon mal vorgesetllt worden ist.

Zuletzt geändert von Dreistein am 2. Juni 2008 12:52, insgesamt 1-mal geändert.

Bring mal folgende Funktion in der Tabelle 370 unter:

Code:

fnTabelleAnhaengen(SheetName : Text[250];ReportHeader : Text[80];CompanyName : Text[30];UserID2 : Text[30])

XlWrkSht := XlWrkBk.Worksheets.Add;
CreateSheet(SheetName,ReportHeader,CompanyName,UserID2);
XlWrkShtTmp := XlWrkBk.Worksheets.Item(XlWrkBk.Sheets().Count());
XlWrkSht.Move(XlWrkShtTmp);
CLEAR(XlWrkShtTmp);


Dazu ist es notwendig, dass Du eine Kopie der globalen Variablen "XlWrkSht" als "XlWrkShtTmp" erstellst.

Gruß
Ralf

Vielen Dank für die Info. War genau was ich gesucht habe.