Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Chr(...) für "Enter"zeichen

Forumthread: Chr(...) für "Enter"zeichen

Chr(...) für "Enter"zeichen
07.03.2008 10:19:37
Sini
hallo Leute,
ich suche den Code für ein "Enter" Zeichen, währe schön, wenn ihr mir helfen könntet.
MFG Sina

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Chr(...) für "Enter"zeichen
07.03.2008 10:24:00
Nepumuk
Hallo Sina,
Enter ist wie alt, gr alt, shift, ctrl usw. kein Ascii - Zeichen sondern ein Keyboard - Event.
Gruß
Nepumuk

AW: Chr(...) für "Enter"zeichen
07.03.2008 10:27:29
Sini
ach mist... kann ich dem PC irgentwie anders sagen, dass er ein "Enter setzen soll?

AW: Chr(...) für "Enter"zeichen
07.03.2008 10:30:00
Nepumuk
Hallo Sina,
was hast du denn vor?
Gruß
Nepumuk

Anzeige
AW: Chr(...) für "Enter"zeichen
07.03.2008 10:33:00
Sini
Ich habe dieses gegeben. in einer schleife sammelt er die Daten und trennt sie mit einem "Tabulator" Chr(9) ich hätte aber statt dessen gerne dass er ein "Enter"setzt.
For i = 7 To 16
Range("G" & i).Select
If ActiveCell.Value = "" Then
Fehler_RESI_Satz = Fehler_RESI_Satz + 1
End If
RESI_Satz = RESI_Satz & ActiveCell.Value & Chr(9)
Next i

Anzeige
AW: Chr(...) für "Enter"zeichen
07.03.2008 10:55:00
Nepumuk
Hallo sina,
um einen Zeilenumbruch rein zu bekommen? Dazu benötigst du "Druckersteuerungszeichen" wie:
vbCr = Ascii - Zeichen 10 ~ carriage return = Wagenrücklauf
vbLf = Ascii - Zeichen 13 ~ line feed = Zeilenvorschub
vbNewLine = eine Kombination aus vbCr & vbLf
Die Bezeichnungen kommen aus Zeiten als noch Schreibmaschienen im Einsatz waren. Welches du benötigst, musst du testen. Das ist nämlich abhängig davon, wo die Daten ausgegeben werden.
Gruß
Nepumuk

Anzeige
AW: Chr(...) für "Enter"zeichen
07.03.2008 10:56:30
Sini
Wie muss ich dan diese Zeilen , die du mir gegeben hast in das Makro einfügen?

AW: Chr(...) für "Enter"zeichen
07.03.2008 10:56:00
Sini
Wie muss ich dan diese Zeilen , die du mir gegeben hast in das Makro einfügen?

AW: Chr(...) für "Enter"zeichen
07.03.2008 10:58:00
Sini
HEUREKA es Funktioniert!!!
DANKE, VIELEN DANK!!!!
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Chr(...) für "Enter" Zeichen in Excel VBA


Schritt-für-Schritt-Anleitung

Um in VBA ein "Enter" Zeichen zu setzen, gibt es verschiedene Methoden. Eine gebräuchliche Methode ist die Verwendung von vbCr oder vbLf. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den Visual Basic for Applications (VBA) Editor in Excel (Alt + F11).

  2. Erstelle ein neues Modul (Rechtsklick auf ein beliebiges Element im Projekt-Explorer > Einfügen > Modul).

  3. Füge den folgenden Code in das Modul ein:

    Sub BeispielMitEnter()
       Dim RESI_Satz As String
       Dim i As Integer
    
       For i = 7 To 16
           If Cells(i, 7).Value <> "" Then
               RESI_Satz = RESI_Satz & Cells(i, 7).Value & vbCr   ' oder vbLf
           End If
       Next i
    
       MsgBox RESI_Satz
    End Sub
  4. Führe das Makro aus. Der vbCr-Befehl fügt ein "Enter" Zeichen (Carriage Return) ein.


Häufige Fehler und Lösungen

  • Fehler: Das "Enter" Zeichen wird nicht korrekt angezeigt.

    • Lösung: Stelle sicher, dass du den richtigen ASCII Code verwendest. Nutze vbCr für Wagenrücklauf oder vbLf für Zeilenvorschub.
  • Fehler: Der Code funktioniert nicht in einer Schleife.

    • Lösung: Überprüfe, ob die Schleife korrekt durchlaufen wird und ob die Zellen tatsächlich Werte enthalten.

Alternative Methoden

Es gibt verschiedene Alternativen, um ein "Enter" Zeichen in Excel zu verwenden:

  • Verwendung von Chr-Funktionen: Du kannst Chr(10) für Zeilenvorschub oder Chr(13) für Wagenrücklauf verwenden.

    RESI_Satz = RESI_Satz & Cells(i, 7).Value & Chr(10)
  • Direktes Einfügen in eine Zelle: Um einen Zeilenumbruch direkt in eine Zelle einzufügen, kannst du Alt + Enter verwenden, während du in die Zelle schreibst.


Praktische Beispiele

Hier sind einige Beispiele für die Verwendung von "Enter" Zeichen in VBA:

  1. Daten in einer Zelle zusammenfassen:

    Sub ZusammenfassenMitZeilenumbruch()
       Dim Ergebnis As String
       Dim i As Integer
    
       For i = 1 To 5
           Ergebnis = Ergebnis & Cells(i, 1).Value & vbCr
       Next i
    
       Cells(1, 2).Value = Ergebnis
    End Sub
  2. Eingabe von Werten mit Chr:

    Sub EingabeMitChr()
       Dim Text As String
       Text = "Erster Wert" & Chr(10) & "Zweiter Wert"
       Cells(1, 1).Value = Text
    End Sub

Tipps für Profis

  • Verwende vbNewLine: Wenn du sicherstellen möchtest, dass sowohl vbCr als auch vbLf verwendet werden, kannst du vbNewLine verwenden, um die Kompatibilität zu erhöhen.

  • ASCII Codes: Nutze die Asc-Funktion, um den ASCII Code eines Zeichens zu ermitteln, wenn du mit Zeichencodes arbeitest.

  • Debugging: Verwende Debug.Print in deiner Schleife, um den Inhalt von Variablen während der Ausführung anzuzeigen.


FAQ: Häufige Fragen

1. Was ist der ASCII Code für das "Enter" Zeichen in Excel? Der ASCII Code für das "Enter" Zeichen ist entweder 10 (Line Feed) oder 13 (Carriage Return).

2. Wie füge ich ein "Enter" Zeichen in eine Excel-Zelle ein? Du kannst ein "Enter" Zeichen in eine Excel-Zelle einfügen, indem du Alt + Enter verwendest, während du in die Zelle schreibst. Alternativ kannst du dies auch über VBA mit vbCr oder Chr(10) tun.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige