Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

chr(10)

Betrifft: chr(10) von: Christian Scherzer
Geschrieben am: 12.08.2004 14:53:20

Grüß' Euch!

Ich möchte über ein Userform die Kopfzeilen variabel gestalten und habe zur Übernahme in die Kopfzeile nachfolgendes Makro verfasst:

ActiveSheet.PageSetup.LeftHeader = TextBox1 & Chr(10) & TextBox2

Aus irgendeinem Grund erhalte ich bei Ausführung die Meldung "Projekt oder
Bibliothek nicht gefunden" mit dem Verweis auf die Funktion "chr(10)".

Kann mir bitte sagen, warum das so ist.

Vielen Dank im voraus und herzliche Grüße,

Christian Scherzer

  


Betrifft: AW: chr(10) von: Ulf
Geschrieben am: 12.08.2004 14:58:05

Sieht so aus, als wäre der verweis zur VBA- Bib. defekt.
Schau mal unter Verweise nach.


Ulf


  


Betrifft: AW: chr(10) von: EtoPHG
Geschrieben am: 12.08.2004 15:31:38

Nimm statt chr(10) den Begriff vbCrLf

Also ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2

Gruss Hansueli


  


Betrifft: AW: chr(10) von: Christian Scherzer
Geschrieben am: 12.08.2004 15:43:17

vielen dank hansueli, Zeilenumbruch funktioniert soweit, aus irgendeinem grund erhalte ich immer eine leerzeile zwischen den textzeilen,

hast du eine idee, Grüße, christian


  


Betrifft: AW: chr(10) von: EtoPHG
Geschrieben am: 12.08.2004 15:54:10

Vielleicht ist schon ein cr-lf in deiner Textbox1 ?
Probier doch mal nur TextBox1 & TextBox2
oder TextBox1 & vbCr & TextBox2

Gruss Hansueli


  


Betrifft: AW: chr(10) von: Christian Scherzer
Geschrieben am: 13.08.2004 08:36:46

Servus Hansueli!

Mit vbcr funktioniert es hervorragend, allerdings nur mit 3 Textboxes, verwende 4 Textboxes erhalte ich eine Fehlermeldung auf die ganze Zeile.

Hast Du noch eine Idee???

Gruß, Christian