Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: chr(10)

chr(10)
12.08.2004 14:53:20
Christian
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
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: chr(10)
Ulf
Sieht so aus, als wäre der verweis zur VBA- Bib. defekt.
Schau mal unter Verweise nach.
Ulf
AW: chr(10)
EtoPHG
Nimm statt chr(10) den Begriff vbCrLf
Also ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2
Gruss Hansueli
AW: chr(10)
12.08.2004 15:43:17
Christian
vielen dank hansueli, Zeilenumbruch funktioniert soweit, aus irgendeinem grund erhalte ich immer eine leerzeile zwischen den textzeilen,
hast du eine idee, Grüße, christian
Anzeige
AW: chr(10)
EtoPHG
Vielleicht ist schon ein cr-lf in deiner Textbox1 ?
Probier doch mal nur TextBox1 & TextBox2
oder TextBox1 & vbCr & TextBox2
Gruss Hansueli
AW: chr(10)
13.08.2004 08:36:46
Christian
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
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Kopfzeilen in Excel mit Zeilenumbruch gestalten


Schritt-für-Schritt-Anleitung

Um Kopfzeilen in Excel mit einem Zeilenumbruch zu gestalten, kannst Du folgende Schritte befolgen:

  1. Öffne das VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Erstelle ein UserForm: Füge ein neues UserForm hinzu, in dem Du mehrere Textboxen für die Eingabe der Kopfzeilen verwendest.

  3. Verwende den folgenden VBA-Code für den Zeilenumbruch:

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

    oder alternativ:

    ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2
  4. Füge weitere Textboxen hinzu: Falls Du mehr als zwei Textboxen verwenden möchtest, setze den Code entsprechend fort:

    ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2 & vbCrLf & TextBox3 & vbCrLf & TextBox4
  5. Teste den Code: Führe den Code aus und überprüfe, ob die Kopfzeile wie gewünscht angezeigt wird.


Häufige Fehler und Lösungen

  • Fehlermeldung: "Projekt oder Bibliothek nicht gefunden"

    • Überprüfe die Verweise in Deinem VBA-Editor. Gehe zu Extras > Verweise und stelle sicher, dass alle benötigten Bibliotheken aktiviert sind.
  • Leere Zeilen zwischen Textzeilen

    • Achte darauf, dass keine zusätzlichen Zeilenumbrüche in den Textboxen vorhanden sind. Überprüfe den Inhalt von TextBox1, um sicherzustellen, dass dort kein Chr(10) oder vbCrLf eingefügt ist.

Alternative Methoden

Wenn Du eine alternative Methode zur Verwendung von Zeilenumbrüchen in Excel suchst, kannst Du auch die Funktion CHAR(10) verwenden:

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

Diese Methode ist besonders nützlich, wenn Du die Funktion in Formeln direkt in Excel verwenden möchtest.


Praktische Beispiele

Hier sind einige Beispiele, wie Du mit chr(10) in VBA arbeiten kannst:

  1. Zwei Textboxen zusammenfügen:

    ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2
  2. Drei Textboxen:

    ActiveSheet.PageSetup.LeftHeader = TextBox1 & vbCrLf & TextBox2 & vbCrLf & TextBox3
  3. Mit CHAR(10):

    ActiveSheet.PageSetup.LeftHeader = TextBox1 & CHAR(10) & TextBox2 & CHAR(10) & TextBox3

Diese Beispiele zeigen, wie Du mit unterschiedlichen Ansätzen die Kopfzeilen in Excel anpassen kannst.


Tipps für Profis

  • Du kannst die Kopfzeilen auch formatieren, um sie ansprechender zu gestalten. Setze dazu den Text in den Textboxen in Fettdruck oder ändere die Schriftart.
  • Überlege, die TextBox-Inhalte zu validieren, um sicherzustellen, dass keine unerwünschten Zeichen oder Leerzeilen eingefügt werden.

FAQ: Häufige Fragen

1. Was ist der Unterschied zwischen Chr(10) und vbCrLf?
Chr(10) ist der ASCII-Wert für den Zeilenumbruch, während vbCrLf eine Kombination aus Carriage Return und Line Feed ist. Beide können verwendet werden, um Zeilenumbrüche in Excel zu erzeugen.

2. Wie kann ich den Excel VBA Code anpassen, um nur bestimmte Textzeilen anzuzeigen?
Du kannst die Logik in Deinem VBA-Code anpassen, um nur die gewünschten Textboxen zusammenzufassen, z.B. durch eine Bedingung, die überprüft, ob eine Textbox leer ist.

3. Funktioniert dieser Code in allen Excel-Versionen?
Ja, die gezeigten Methoden funktionieren in den meisten aktuellen Excel-Versionen, die VBA unterstützen. Achte darauf, dass Du die richtige Excel-Version verwendest, um die besten Ergebnisse zu erzielen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige