Zum Thema Excelbuffer

Für mich war es immer lästig, bei der Einagbe von Spalten(Column No.) und Zeilen(Row No.) heraus zufinden, welche Nummer hat Spalte "M". Ich habe mir folgendermaßen geholfen.

Code:


//Für die Übergabe an die Tabelle "Excel Buffer" verwende ich die Funktion "Entercell" mit folgenden Variablen:

Var   Name        DataType   Subtype  Length
Nein  ColumnID    Text                 3
Nein  RowNo       Integer
Nein  CellValue   Text                 250
Nein  Bold        Boolean
Nein  UnderLine   Boolean
Nein  FontName    Text                 30
Nein  FontSize    Integer
Nein  Cellformat  Text                 30

j := j + 1;
EnterCell('A',j,FORMAT(Werkzeug."Zeichungsnr."),FALSE,FALSE,'',0,'');
EnterCell('B',j,FORMAT(Werkzeug."Zeichungsnr."),FALSE,FALSE,'',0,'');
EnterCell('AC',j,FORMAT("Customer Part No."."Part No."),FALSE,FALSE,'',0,'');

EnterCell(ColumnID : Text[3];RowNo : Integer;CellValue : Text[250];Bold : Boolean;UnderLine : Boolean;FontName : Text[30];FontSize : In

   ExcelBuffer."Column No."   := "ExcelBuffer"."Column No." + 1;  //Kein VALDATE
   Excel Buffer.xlColID       := ColumnID;

//Da "Column No." zum Primärschlüssel gehört, zähle ich sie bei jedem Duchgang um eins höher.
//Auf diese Weise kann ich direkt den Buchstaben für die Spalte angeben, ohne lange das Alphabet zu zählen.