Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1912to1916
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1912to1916
1912to1916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt als .csv per Button

Tabellenblatt als .csv per Button
04.01.2023 15:56:05
Koberind
Hallo zusammen,
ich würde gerne in Tabellenblatt A ein Command Button programmieren, sodass bei Knopfdruck Tabelle B als Kopie in .csv-Format (ohne Trennzeichen) auf einem Pfad X abgespeichert wird. Dabei wäre noch zu beachten, dass nur ganze Zeile(n) (abgesehen von der Überschriftzeile) benutzt werden sollen, die anhand einer (bzw. mehrerer) Angabe(n) in einer Spalte geprüft werden (zB Suche ID ABC; DEF; etc.). Leider habe ich nur seeehr grobe VBA Kenntnisse. Vielen Dank!!
VG
Kobe

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt als .csv per Button
04.01.2023 16:56:15
Andreas_ausWuppertal
Hallo Kobe,
hier ein Lösungsvorschlag:

Sub CSV_Export()
'--Prozedur erzeugt eine csv-Datei
Dim sExportdatei As String
Dim sTrennzeichen As String
Dim rangeZellbereich As Range
Dim varZeile As Variant 'Long
Dim oZelle As Object
Dim sZeile As String
Dim arrTemp() As String
'Pfadangabe, kann natürlich auch per Angabe im Tabellenblatt von aussen gesteuert werden
sExportdatei = ThisWorkbook.Path & Application.PathSeparator & "meineCSV.csv"
sTrennzeichen = ";"
Set rangeZellbereich = Worksheets("Tabelle2").UsedRange
sZeile = ""
Open sExportdatei For Output As #1
'Zeile für Zeile abarbeiten...
For Each varZeile In rangeZellbereich.Rows
'in der varZeile oZelle für oZelle...
For Each oZelle In varZeile.Cells
sZeile = sZeile & CStr(oZelle.Value) & sTrennzeichen
Next oZelle
' Letztes sTrennzeichen entfernen und varZeile in Datei schreiben
arrTemp = Split(sZeile, sTrennzeichen)
'Hier die Prüfung einbauen (Zeile iO oder niO)
if arrTemp(...)=(...) then
Print #1, Left(sZeile, Len(sZeile) - 1)
End If
sZeile = ""
Next varZeile
Close #1
MsgBox "Fertig. Bitte ausgiebig freuen!!", vbInformation
End Sub
Viele Grüße und einen schönen Tag,
Andreas_ausWuppertal
andy027@gmx.de
Anzeige

306 Forumthreads zu ähnlichen Themen

Access Datei in csv Datei speichern
Fred

Hallo zusammen
Ich habe ein Problem und hoffe mir kann jemand helfen. Ich importiere in meine Tabelle csv.Dateien.
Vorher muss ich aber immer Access Tabellen in das csv.Format exportieren. Ich suche ein Makro was dieses für mich automatisch auf Button klick machen würde.
Also Datei...
25.08.2008 20:27:50
Thread-ID: 1004581
5 Beiträge
Anzeige
Registerkarte als csv separat speichern
Herbert

Hallo,
ich möchte eine Registerkarte per Knopfdruck auf einen Button (Steuerelement) in eine neue Datei im Ordner C:\Temp speichern. Anbei der Code zum Speichern im txt-Format. Kann man diese auf das Ausgabeformat csv modifizieren? Bin für jede Hilfe dankbar.
Gruß Herbert
Dim strSep...
16.10.2008 10:01:00
Thread-ID: 1016757
2 Beiträge
Tabellenblatt separat speichern als csv
Herbert

Hallo,
der beigefügte Code wurde mir freundlicherweise hier bereit gestellt. Aus einer Datei wird ein Tabellenblatt in eine neue Datei im Ordner C:\temp gespeichert. Das Dateiformat der neuen Datei ist csv. Die einzelnen Werte der neuen csv-Datei werden durch Semikolon getrennt. Ich benötig...
16.10.2008 16:07:00
Thread-ID: 1016905
6 Beiträge
Anzeige
Als csv automatisiert speichern
Herbert

Hallo,
noch eine Frage zur Speicherung eines Excel-Sheets in eine neue Datei.
Die Ausgangsdatei hat eine Registerkarte. Der Inhalt dieser Registerkarte soll im Pfad C:\temp\sicherung als .csv-Datei abgelegt werden. Der Dateiname soll "Saldierung_aktuelles Datum.csv" sein.
Leider wir...
20.11.2008 12:02:00
Thread-ID: 1026369
2 Beiträge
Tabellenblätter einzeln als Datei speichern
murat

Hallo,
ich habe einen tollen VBA Code hier im Forum gefunden!
Ich möchte die einzeln Tabellenblätter als Datei Speichern. ich habe 20 Tabellenblätter in einer Datei aus der sollen 20 Dateien werden. Dateiname steht immer in Zelle C2 des jeweiligen tabellenblattes.
Der Code unten i...
13.01.2009 11:46:16
Thread-ID: 1039178
3 Beiträge
Umwandeln PIVOT-Tabelle in reguläre Datentabelle
Susi

Hallo liebe Excel-Freunde,
ich habe eine Pivot-Tabelle aus einer umfangreichen Datenmenge erstellt und das Datum nach Quartalen gruppiert. Diese Daten der neuen Pivot-Tabelle möchte ich nun weiterverwenden. Das Problem dabei ist, das ich die Werte der Pivot-Tabelle in eine neue reguläre Dat...
04.02.2009 12:03:00
Thread-ID: 1046976
5 Beiträge
Alle Dateien als Excel97 speichern
WolfgangN

Hallo,
ich habe Excel2003 und möchte alle Excel-Tabellen aus einem Ordner (Excel-Tabellen) in einem anderen Ordner (PCShop) als Excel 97 Version speichern, um sie zu brennen und zu einem PC zu nehmen, wo nur Excel 97 installiert ist.
An den Dateien wird nichts geändert, soll nur als Exc...
12.02.2009 19:17:00
Thread-ID: 1050222
3 Beiträge
Möchte .xls in .csv umwandeln
Leo

Moin Moin zusammen,
ich raff` es einfach nicht wie ich meine .xls-Daten in eine .csv-Datei umwandeln lassen kann !!!
Wahrscheinlich ist es einfach zu spät am Abend bzw. zu früh am morgen !? ?! !?
Eine kurze Erklräung ist in der Datei vorhanden : https://www.herber.de/bbs/user/60320....
15.03.2009 04:29:27
Thread-ID: 1060323
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
33
1
5
4
1
2
4
2
3
14
1
1
1
1
2
2
2
5
3
5
4
3
7
1