Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.11.2023 00:03:27
userform Image mit LoadPicture Bild wird nicht geladen
28.11.2023 20:42:07
VBA - Bereich bis zur letzten nicht leeren Zelle kopieren
28.11.2023 19:48:15
Laufzeitfehler 50290 bei jeder zweiten Ausführung
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
316to320
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten aus Tabelle in Textdatei

Spalten aus Tabelle in Textdatei
01.10.2003 10:38:42
Dirk
Guten Morgen zusammen!

Hallo, ich brauch mal wieder eure Hilfe.
Wie kann ich denn zwei Spalten einer Zeile verbunden durch einen ":" in eine Textdatei schreiben/exportieren, so dass für jede Zeile auch eine neue in der Textdatei genommen wird.
Die Textdatei sollte dann so aussehen:
xxxx:xxxxx
xxxx:xxxxx
...
(Inhhalt von Spalte x : Inhalt von Spalte y).

Wenn möglich mit Angabe von und bis zu welcher Zeile das ganze gemacht werden soll.
Hat jemand eine Ahnung? Danke schon mal.

Gruß, Dirk

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalten aus Tabelle in Textdatei
01.10.2003 10:54:27
Reinhard
Hi Dirk,
ungetestet:

x=...
y=...
open "c:\temp\test.txt" for output as #1
for n= 5 to 20
print #1, cells(n,x).value & ":" & cells(n,y).value
next n
close #1

Gruß
Reinhard
Reinhard
AW: Spalten aus Tabelle in Textdatei
01.10.2003 11:25:13
Dirk
Hallo, leider funktioniert es nicht mit der Meldung
"Anwendungs- oder objektdefinierter Fehler".
Bei mir hat es dann so ausgesehen:


Sub test()
Open "c:\temp\test.txt" For Output As #1
For n = 2 To 50
Print #1, Cells(n, D).Value & ":" & Cells(n, E).Value
Next n
Close #1
End Sub


D und E sollte dabei für die Spalte stehen. Ist doch richtig, oder?
Anzeige
Brauch immer noch Hilfe!!!
01.10.2003 12:43:49
Dirk
Hat noch jemand eine Idee, denn o. g. funktioniert leider nicht.
Gruß, Dirk
AW: Brauch immer noch Hilfe!!!
01.10.2003 13:15:54
Reinhard
Hi Dirk,
das Gleiche nochmal, diesmal komplett funktionsfähig:

Option Explicit

Sub Durk()
'Annahme, Werte stehen im Bereich D5:E20
Dim Spalte1 As Integer
Dim Spalte2 As Integer
Dim Zeile As Long
Spalte1 = 4 'Spalte 4 == Spalte D
Spalte2 = 5 'Spalte 5 == Dpalte E
Open "c:\temp\test.txt" For Output As #1
For Zeile = 5 To 20
Print #1, Cells(Zeile, Spalte1).Value & ":" & Cells(Zeile, Spalte2).Value
Next Zeile
Close #1
End Sub


Gruß
Reinhard
Anzeige
Danke, jetzt funzt es
01.10.2003 15:33:24
Dirk
Vielen Dank!!!
Danke für die Rückmeldung o.w.T
01.10.2003 18:42:11
Reinhard
.

320 Forumthreads zu ähnlichen Themen

Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Zeilenmerkmale in Spalten umwandeln
MG_Learning

Hallo zusammen!
Ich habe keine Ahnung, wie ich aus folgender Tabellenstruktur: Beispiel:
A B C
London 20 Kinos
London 50 Gaststätten
London 10 Einkaufscentren
Paris 18...
17.08.2008 18:31:50
Thread-ID: 1002449
4 Beiträge
Spalten in Zeilen anhängen
Jörg

Hallo zusammen,
in einer Tabelle mit ~1000 Artikeln in Spalte A stehen jeweils in den Spalten B-M die 12 zum Artikel gehörenden Monatswerte des Verbrauchs.
Ich brauche diese Daten jetzt so angeordnet, dass weiterhin alle Artikel in Spalte A stehen, jedoch die einzelnen Monatswerte unter...
01.09.2008 18:03:42
Thread-ID: 1006570
11 Beiträge
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
wie Spalten in einem Arbeitsblatt zu Zeilen zusamm
Michael

Moin erstmal,
folgendes Problem als mittelmäßiger Anwender.
Ich habe mehrere identische Arbeitsblätter wo ich jeweils untereinander (eine Spalte) mehrer Werte habe. G1-G10.
Diese Werte möchte ich in einem Arbeitsblatt zusammenfassen , allerdings nun in einer Zeile. A1-J1.
Wi...
04.09.2008 19:48:05
Thread-ID: 1007497
4 Beiträge
Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige