Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1172to1176
1172to1176
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalteninhalt als TXT speichern

Forumthread: Spalteninhalt als TXT speichern

Spalteninhalt als TXT speichern
Jockel
Hallo,
ich habe eine Tabelle mit vielen Spalten. Dabei möchte ich die Spalte H mit einem Makro als TXT abspeichern.
Wenn möglich, nicht dass ich erst die anderen Spalten alle löschen muss und dann das Dokument als txt abspeichern muss. Wenn möglich, will ich nur die Spalte H abspeichern.
Geht das per makro ?
danke
Jockel
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Spalteninhalt als TXT speichern
16.08.2010 13:10:13
Rudi
Hallo, 
Sub ttx()
Dim vntdaten
vntdaten = Range(Cells(1, 8), Cells(Rows.Count, 8).End(xlUp))
vntdaten = WorksheetFunction.Transpose(vntdaten)
vntdaten = Join(vntdaten, vbCrLf)
Open "c:\test\test.txt" For Output As #1
Print #1, vntdaten
Close 1
End Sub

Gruß
Rudi
Anzeige
AW: Spalteninhalt als TXT speichern
16.08.2010 13:12:09
ede
Hallo,
um Beine Frage zu beantworte, JA, das geht per Makro.
Hier mal ein Beispiel:
Private Sub Text_Export()
Dim i As Integer
'Dialogfenster Speichern unter
sFile = Application.GetSaveAsFilename _
(fileFilter:="Text Files (*.txt), *.txt")
If sFile  False Then
Open sFile For Output As #1
For i = 1 To Cells(65536, 8).End(xlUp).Row
Print #1, Cells(i, 8).Value
Next i
Close #1
MsgBox sFile
End If
End Sub
Gruss
Anzeige
AW: Spalteninhalt als TXT speichern
16.08.2010 13:15:41
Klaus
Hallo Jockel,
ja, das geht. Am einfachsten: Spalte H in eine neue Tabelle kopieren (nur Werte) und diese Abspeichern. Hab ich mal ge-Makro-Recordert: 
Sub Makro5()
' Makro5 Makro
' Makro am 16.08.2010 von klaus.mvdt aufgezeichnet
Columns("H:H").Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:="U:\NurSpalteH.txt", FileFormat:= _
xlUnicodeText, CreateBackup:=False
ActiveWorkbook.Close
End Sub
Und dann etwas schöner gemacht (selects und überflüssiges raus): 
Sub Makro5()
Columns("H:H").Copy
Workbooks.Add
Range("A1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
With ActiveWorkbook
.SaveAs Filename:="U:\NurSpalteH.txt", FileFormat:=xlUnicodeText
.Close
End With
End Sub
Den Pfad / Dateinamen zum speichern musst du natürlich deinen Bedürfnissen entsprechend ändern.
Grüße,
Klaus M.vdT.
Anzeige
Danke an ALLE, das hilft weiter owT
16.08.2010 13:49:22
Jockel
;

Forumthreads zu verwandten Themen

Durchrechnung nur für ein Blatt ausschalten
KlausF

Hallo Excelperten!
In einer Datei schalte ich beim Öffnen mittels AutoOpen-Makro die automatische Durchrechnung bisher ganz aus.
Wie kann ich aber die automatische Durchrechnung nur für ein bestimmtes Blatt (z.B. Tabelle1) abschalten?
Geht das überhaupt so eingeschränkt?
Besten...
13.09.2008 15:37:53
Thread-ID: 1009517
3 Beiträge
Einzelnes Tabellnblatt in PDF Datei speichern
Jens

Ich habe folgendes Problem, ich möchte ein einzelnes Tabellenblatt aus Excel heraus in eine Pdf Datei mittels command Buttom und Makro/ VBA speichern. Als PDF Prog nutze ich Adobe Acrobat Prof 8.0(bringt nen Converter mit).
THX im Voraus
27.02.2009 15:30:50
Thread-ID: 1054824
14 Beiträge
Anzeige
nur eine Tabelle anwählen, falls ...
Peter

Guten Tag
Gelegentlich wähle ich in einer Arbeitsmappe gleichzeitig mehrere Tabellen an, wenn ich beispielsweise bei allen die gleichen Änderungen durchführen will.
Nun habe ich mir eine Routine geschrieben, die auf allen Tabellen ein Passwort setzt oder entfernt.
Diese Routine läuf...
02.06.2009 09:34:43
Thread-ID: 1078545
8 Beiträge
Range(C12:E30) als .txt speichern / exportieren ?
udo-d

Hallo Profis,
hat evt. Jemand von Euch einen Code, mit dem ich nur einen best. Zellenbereich
eines best. Tabellenblattes ( Name zB: "Auswertung" )
Bereich C12:E30 als Textdatei exportieren / speichern kann ?
im ges. Workbook sind mehrere Tab.Blätter - weis nicht ob das wichtig...
12.10.2009 17:56:56
Thread-ID: 1109157
12 Beiträge
Anzeige
VBA:einzelnes Blatt in neuer Datei speichern +mehr
habneFrage

Hallo liebes Forum! Ich habe mich hier heute mal angemeldet, da ich schon seit längerer Zeit an einem Problem arbeite aber keine Lösung gefunden habe. Ich habe mit VBA nicht besonders viel am Hut, dafür kann ich mit anderen Dingen in Excel schon besser umgehen. Nun aber zu meinen Fragen:
Ic...
30.10.2009 08:03:49
Thread-ID: 1113145
14 Beiträge
Name nur einmal im Tabellenblatt
Heidi

Hallo zusammen,
gibt es die Möglichkeit einem Tabellenblatt zu sagen, dass z. B. der Name "Martin" nur 1 x vorkommen darf? Natürlich sind die Namen variabel.
Vielen Dank und Gruß
01.12.2009 11:37:55
Thread-ID: 1121180
5 Beiträge
xls als txt abspeichern | Herbers Excel-Forum
Michael
Guten Morgen,
ich habe folgendes Problem: Ich muss eine xls-Datei im txt-Format abspeichern, dabei ist folgendes zu beachten: Es muss der Bereich von A4 bis G220 ausgegeben werden (es soll in der txt. datei genau so angeordnet sein wie in der xls-datei), dabei muss beim abspeichern gleich ein N...
26.01.2010 07:17:01
Thread-ID: 1132885
18 Beiträge
Alle Reiter als .txt-Datei abspeichern
F.

Hallo zusammen
Ganz offensichtlich habe ich Wünsche, die nicht meinen Kenntnissen entsprechen. ;) Deshalb meine nächste Frage an Euch.
Ich habe eine stattliche Anzahl von Reitern, welche ich einzeln als txt-Datei abspeichern möchte. Da Anzahl der Reiter variert jedes Mal. Wie kann dies...
27.01.2010 15:19:35
Thread-ID: 1133441
22 Beiträge
Tabelle als TXT speichern mit richtiger Zeilenanz.
Joni

Hallo,
ich habe das Problem, dass beim Speichern eines Tabellenblattes als TXT am Schluss noch eine Leerzeile mitgespeichert wird. Da ich die Zeilenanzahl der Textdatei auslese und auswerte habe ich somit immer eine Zeile zu viel. Gibt es eine Möglichkeit, dass wirklich nur befüllte Zeilen...
29.01.2010 18:38:40
Thread-ID: 1134231
4 Beiträge
Workbooknamen als txt abspeichern
Burghard

Hallo,
ich bräuchte mal Hilfe. Ich benötige ein Makro, dass nicht den Blattnamen abspeichert (siehe unten), sondern den Namen des Workbooks und zwar nicht im xls-Format, sondern im txt-Format (mit Tabs).
Hilfe wäre nett.
Schönen Gruß (und frohe Ostern!)
Burghard
Public Sub...
03.04.2010 16:25:08
Thread-ID: 1150097
2 Beiträge
Aufgez. Macro funktioniert nur auf einem Blatt
Mathias

Liebes Forum,
ich habe ein Macro aufgezeichnet, das nicht mit anderen Diagrammblättern in derselben Exceldatei funktioniert. Was muss ich tun, damit ich das Macro auf jedem Tabellenblatt oder sogar in anderen Exceldateien ausführen kann, ohne dass ich den Laufzeitfehler "Das Element mit dem...
03.12.2010 11:15:32
Thread-ID: 1189846
11 Beiträge
als txt speichern - letzte leere Zeile verhindern
Joni

Hi,
wenn ich ein Sheet per Makro als tabgetrenntes txt-File speichere ist am Ende immer eine leere Zeile. Kann diese unterdrückt werden? Falls nein, hat jemand vielleicht ein Makro das diese letzte leere Zeile löschen könnte?
Danke für eure Hilfe.
Gruß Joni
17.10.2011 00:46:25
Thread-ID: 1234145
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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