Script Code für "Alt" "Enter" Tastenkombination

[Bastel123]

Guten Morgen,

ich soll aus ca. 3000 Dokumenten die Filenamen von Attchments aus einem Richtextfeld in eine Exceltabelle übertragen.

Die Namen habe ich auch schon in einem Array. Da bis zu 108 Attachments vorhanden sind möchte ich damit nicht jeweis in eine neue Spalte befüllen.

In Excel kann man mit "Alt" "Enter" eine neue Zeile in einer Zelle erzeugen. So könnte ich eine Loop über das Array machen und die Dateinamen in einer Zelle untereinander schreiben.

Wie mache ich das "Alt" "Enter" in Lotus script?

Gruß Sebastian

[Gutierrez]

Du kannst Chr(10) an jedes Zeilenende in eine Zelle schreiben.

Beste Grüße
Gutierrez

PS: Also
"Zeile 1" & Chr(10) & "Zeile 2" & Chr(10) & "Zeile 3" würde so aussehen:

Zeile 1
Zeile 2
Zeile 3

[Tode]

Oder in dem speziellen Fall:

Code

Forall strValue in deinArrayMit3000Werten
    Call rtItem.AppendText( strValue & Chr$(10) )
End Forall

oder (Achtung: String- Begrenzung):

Code

Call rtItem.AppendText( Implode( deinArrayMit3000Werten , Chr$(10) ) )

ACH SO: 3000 Zeilen in eine Zelle geht aber in Excel nicht, die Anzahl Zeichen in einer Zelle in Excel ist begrenzt.

[Gutierrez]

ACH SO: 3000 Zeilen in eine Zelle geht aber in Excel nicht, die Anzahl Zeichen in einer Zelle in Excel ist begrenzt.

Oh, hatte ich bisher nocht gar nicht drüber nachgedacht

Ich hatte es so verstanden, dass Bastel123 in Excel schreiben möchte und nicht in ein RT-Feld.

Beste Grüße
Gutierrez

[Bastel123]

Ich möchte in eine Exceltabelle schreiben.

Chr(10) kenn ich natürlich und werde das mal ausprobieren. Ob das dann "Alt" "Enter" entspricht werde ich dann sehen.

Gruß
Sebastian

[Tode]

Ja, das tut es. Unter Windows ist Enter = Chr13 + Chr10 und Alt + Enter ist Chr10.

[Bastel123]

Danke,

man lernt nie aus.