Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

makro speichern unter

Forumthread: makro speichern unter

makro speichern unter
20.02.2004 15:21:40
Martin
Hallo
Ich möchte in einem Makro ein Tabellenblatt als csv und zwar mit dem Namen diese Blattes speichern.
Weiß das vielleicht jemand?
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: makro speichern unter
20.02.2004 16:01:33
Ulf_MS
Hi Martin,
probier es mal hiermit

Sub test()
Dim tabna As String
tabna = ActiveSheet.Name
'Den Pfad musst du dir raussuchen
ActiveWorkbook.SaveAs FileName:= _
"C:\WINNT\Profiles\uh\Desktop\" & tabna & ".csv", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub

mfg
Ulf_MS
Anzeige
AW: makro speichern unter
20.02.2004 16:14:29
Matthias G
Hallo Martin,
Folgender Code mach eine Kopie des aktiven Blattes, Speichert sie im Verzeichnis der Arbeitsmappe und schließt diese Kopie gleich wieder:

Sub SaveCSV()
ActiveSheet.Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
ThisWorkbook.Path & "\" & ActiveSheet.Name & ".csv", FileFormat:= _
xlCSV, CreateBackup:=False
Application.DisplayAlerts = True
ActiveWorkbook.Close SaveChanges:=False
End Sub

Nimm die DislpayAlerts raus, falls vor dem Überschreiben gewarnt werden soll.
Gruß Matthias
Anzeige
AW: makro speichern unter
23.02.2004 09:19:25
martin
danke an Euch beide!!!
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige