Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
160to164
160to164
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Chr$(13) Problem

Forumthread: Chr$(13) Problem

Chr$(13) Problem
18.09.2002 17:21:12
Davidx
Ich möchte gerne den selektierten Bereich im Tabellenblatt in eine Textdatei geschrieben bekommen.
Jeder Zellinhalt soll in der Textdatei in einer neuen Zeile stehen, d.h. ein "ENTER" muss eingefügt werden.
Ich habe folgenden Code probiert, jedoch wird alles hintereinander weg in der Datei geschrieben, getrennt durch ein ausgefülltes Quadrat?!


For Each zelle In Selection
Liste = Liste & zelle.Value & Chr$(13)
Next

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("D:\1.txt", True)
a.WriteLine (Liste)
a.Close


Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Chr$(13) Problem
18.09.2002 20:55:03
Hans-Jörg
ein kleines beispiel:

Re: Chr$(13) Problem
18.09.2002 22:16:06
Davidx
Danke Hans-Jörg!
Habe mal deinen Code auf meine Bedürfnisse angepasst, funktioniert super, nochmals Danke.

Sub txt_schreiben()

Open "D:\1.txt" For Output As #1
For Each zelle In Selection
TMP = TMP & zelle.Value & ";"
TMP = Left(TMP, Len(TMP) - 1)
Print #1, TMP
TMP = ""
Next
Close 1

End Sub

Anzeige
Re: Chr$(13) Problem
20.09.2002 11:27:25
Hans W. Hofmann
Interessanter Code ;-)

TMP = TMP & zelle.Value & ";"
'Montiere einen Strichpunkt an Textende
TMP = Left(TMP, Len(TMP) - 1)
'Schneide letztes Zeichen wieder ab

Das könnte man sich einfacher machen, oder?

Gruß HW

Re: Hans W. Hofmann
20.09.2002 15:51:40
Davidx
Hans W. Hofmann hat Recht!
Bin doch zu blöd! So geht natürlich auch!

Anzeige
;

Forumthreads zu verwandten Themen

7 a in eine Zelle schreiben
Kai

Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke
07.08.2008 16:45:31
Thread-ID: 1000024
6 Beiträge
Anzeige Fortschrifsbalgen abbrechen
Jochen

Hi,
wie kann ich folgenden Code auf meiner userForm per Button unterbrechen, bevor die 30 Sekunden abgelaufen sind ? :
https://www.herber.de/bbs/user/54473.xls
Danke mal
Jochen
09.08.2008 21:10:32
Thread-ID: 1000547
4 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Darstellung der Schriftfarben stimmen nicht.
Kasimir

Hallo Leute,
ich habe da ein merkwürdiges Problem mit der farblichen Darstellung von Werten. Ich habe eine Datei, in der die Werte in den Schriftfarben blau und rot dargestellt werden. Außerdem sind die Werte als Währung im Format „#.##0,00 €;[Rot]-#.##0,00 €“ formatiert.
Die Datei wird...
11.08.2008 20:29:41
Thread-ID: 1000997
7 Beiträge
Anzeige
If Then mit mehreren Schritten
Pfannen-Meister

Guten Morgen,
leider ist mein Betreff etwas unglücklich formuliert, aber ich weiß nicht, wie ich mein Problem in wenigen Worten zusammen fassen soll:
In VBA nutze ich eine If Then Anweisung. Ist die Bedingungen erfüllt, so soll er mehrer Schritte abarbeiten. Aber wie sage ich ihm, daß...
13.08.2008 10:34:00
Thread-ID: 1001416
5 Beiträge
Ordnerinhalt in Tabelle schreiben
Johann

Hallo Excel-Profis!
Ich brauch wieder einmal eure Hilfe.
Im Archiv habe ich mir den nachfolgenden Code besorgt und ein wenig verändert.
Der Code schreibt den Inhalt des aktuellen Ordners und der Unterordner in die Spalte B einer Tabelle und verlinkt noch dazu die einzelnen Einträge...
15.08.2008 17:19:52
Thread-ID: 1002256
8 Beiträge
Letzte beschriebene Zeile suchen
Thomas3

Guten Morgen zusammen,
ich muß aus über 1000 Listen Daten auslesen. Das ist kein Problem.
Jede Liste sollte so beschrieben werden, dass ab Zeile 13 bis je nach Eintragungen x-Zeile Spalte O gefüllt ist.
In der Spalte 1 ist in der Datenliste eine Formel hinterlegt, die sichtbar aut...
19.08.2008 08:29:00
Thread-ID: 1002780
10 Beiträge
Schreibschutz/bedingte Formatierung Makro
Tobi

Hallo,
Ich übertrage mit Hilfe eines Makros (IF-Funktion) Zahlen aus einem Tabellenblatt in ein anderes welches schreibgeschützt ist. Wenn die Bedingung in der Funktion nicht erfüllt wird dann überträgt es "blank" ("").
Die Zellen welche leer "blank" sind, färben sich dann mit Hilfe der...
20.08.2008 14:39:51
Thread-ID: 1003216
5 Beiträge
Per Code in Workbook_Open Ereignis schreiben
chrdohmen

Hallo Zusammen,
ich würde gerne per VBA Code eine Zeile in das Workbook_Open Ereignis schreiben.
Wie ich einzelne Module hinzufüge weiß ich, allerdings gelingt es mir nicht eine Zeile
Code in das Ereignis zu schreiben.
Kann mir wer helfen bzw. sagen wo ich darüber etwas lesen k...
21.08.2008 08:46:00
Thread-ID: 1003361
3 Beiträge
Textfile Punkt Komma @Christian?
Petra

Hallo Excelianer(innen)
beim Speichern eines Sheets als Textfile wandelt Excel die Kommas in Punkte um.
Wie kann ich nachträglich im Textfile alle Punkte wieder in Komma umwandeln (per VBA)?
Liebe Grüße Petra
22.08.2008 11:24:00
Thread-ID: 1003794
20 Beiträge
Anzeige
Schriftfarbe ändern
mike49

Hallo zusammen,
ich habe eine Arbeitsmappe mit 12 Blättern (Jan-Dez). Die Arbeitszeiten können im Bereich E8:H38 eingegeben werden. In C8:C38 steht das Datum (Format TT.MM.JJJJ) und in D8:D38 der entsprechende Wochentag (Format TTT). Die Arbeitsdauer steht in I8:38 (Format hh:mm). Die Woche...
22.08.2008 14:31:38
Thread-ID: 1003882
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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