Autor Thema: Anzahl Zeilen  (Gelesen 1815 mal)

Offline skywook

  • Senior Mitglied
  • ****
  • Beiträge: 445
  • Ich liebe dieses Forum!
Anzahl Zeilen
« am: 22.03.07 - 10:26:21 »
Hallo,
wie kann ich eigentlich die Anzahl der Zeilen (auch Leerzeilen) in einem Textfeld (kein RichText) auslesen. Am liebsten mit Script. Ist sowas möglich?

z.B:

Leerzeile
Freundliche Grüße
Leerzeile
Hans Mustermann
Musterstrasse
Leerzeile
Telefonnummer

= 7 Zeilen

Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Anzahl Zeilen
« Antwort #1 am: 22.03.07 - 10:52:55 »
zähle die Zeilenumbrüche. Dürfte in etwa so gehen:
@Elements(@Explode(Text; @NewLine))

Habs nicht getestet. Anstelle von @NewLine kannst Du auch @Cahr(13) probieren.
Gruß
Dirk

Offline skywook

  • Senior Mitglied
  • ****
  • Beiträge: 445
  • Ich liebe dieses Forum!
Re: Anzahl Zeilen
« Antwort #2 am: 22.03.07 - 11:05:59 »
Danke Dirk,
aber geht das auch in Script?

Offline it898ur

  • Senior Mitglied
  • ****
  • Beiträge: 478
Re: Anzahl Zeilen
« Antwort #3 am: 22.03.07 - 11:36:21 »
dim v as variant

v = Evaluate({formel diali}, doc)

if v(0) = 3 then ....

Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Anzahl Zeilen
« Antwort #4 am: 22.03.07 - 11:39:46 »
mit Split und Chr(13) sollte es auch rein im Script gehen.
Gruß
Dirk

Offline skywook

  • Senior Mitglied
  • ****
  • Beiträge: 445
  • Ich liebe dieses Forum!
Re: Anzahl Zeilen
« Antwort #5 am: 22.03.07 - 14:09:41 »
Danke,
funktioniert

dim v as variant

v = Evaluate({formel diali}, doc)

if v(0) = 3 then ....

aber leider werden die Leerzeilen nicht mitgezählt.

Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Anzahl Zeilen
« Antwort #6 am: 22.03.07 - 14:16:51 »
dann mach vorher noch einen ReplaceSubstring(Text; @NewLine; "#####") und einen @Evaluate(Text; "####").

Wichtig ist, dass beim Explode ein Zeichen weniger ist, dann gibt es keine Leerzeilen mehr.
Gruß
Dirk

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz