Bestimmte Spalten in Textdatei speichern
Schritt-für-Schritt-Anleitung
Um bestimmte Spalten in einer Textdatei zu speichern, kannst du ein einfaches VBA-Skript verwenden. Folgendes Vorgehen ist erforderlich:
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Wähle im Menü
Einfügen > Modul, um ein neues Modul zu erstellen.
- Kopiere den folgenden Code in das Modul:
Sub writtotest()
Dim actcell As Range
Open "C:\test.txt" For Append Access Write Lock Write As #1
For Each actcell In Range("C1:C1000")
If Not (IsEmpty(actcell.Value) Or actcell.Value = "") Then
Print #1, actcell.Value; "," & actcell.Offset(0, 3).Value & "," & actcell.Offset(0, 6).Value
End If
Next actcell
Close #1
End Sub
- Ändere den Pfad
"C:\test.txt" zu dem gewünschten Speicherort.
- Schließe den VBA-Editor und führe das Skript aus, indem du
F5 drückst.
Dieses Skript wird die Werte aus Spalte 1, 4 und 7 (entsprechend Spalte 3, 6 und 9 in deinem Fall) in die angegebene Textdatei speichern.
Häufige Fehler und Lösungen
Alternative Methoden
Wenn du keine VBA-Programmierung verwenden möchtest, kannst du auch die Excel-Funktion "Text in Spalten" nutzen, um die gewünschten Daten manuell zu extrahieren und dann in eine Textdatei zu kopieren:
- Markiere die gewünschten Spalten.
- Kopiere sie und füge sie in ein neues Arbeitsblatt ein.
- Gehe zu
Datei > Speichern unter und wähle das Format .txt aus.
Praktische Beispiele
Nehmen wir an, du hast eine Excel-Tabelle mit den folgenden Werten:
| A |
B |
C |
D |
E |
F |
G |
H |
I |
| 1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
| 10 |
11 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
Wenn du die Spalten C, F und I (3, 6 und 9) speichern möchtest, wird die Textdatei so aussehen:
3,6,9
12,15,18
Tipps für Profis
- Nutze die
Option Explicit-Anweisung am Anfang deines VBA-Codes, um sicherzustellen, dass alle Variablen deklariert sind. Dies kann dir helfen, Fehler frühzeitig zu erkennen.
- Experimentiere mit der
Join-Funktion, um die Werte in einer Zeile zu formatieren, bevor du sie in die Textdatei schreibst.
FAQ: Häufige Fragen
1. Frage: Kann ich die Spalten nach dem Speichern in einer anderen Reihenfolge angeben?
Antwort: Ja, du kannst die Offset-Werte im VBA-Code anpassen, um die gewünschten Spalten in der gewünschten Reihenfolge zu speichern.
2. Frage: Funktioniert dieses Skript in Excel 2016?
Antwort: Ja, das Skript sollte in Excel 2016 und neueren Versionen problemlos funktionieren.