Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
208to212
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
208to212
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Active Sheet save

Active Sheet save
30.01.2003 00:04:14
Stephan B
HAllo !

Irgendwie stehe ich heute auf der Leitung - müsste

einfach nur wissen, wie man ein Tabellenblatt einer Mappe

per VBA speichert. Habe schon im Archiv gesucht aber nichts

gefunden.

mfg. stephan

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

Betreff
Datum
Anwender
Anzeige
Re: Active Sheet save
30.01.2003 00:15:55
L.Vira

Du kannst kein Sheet als Datei speichern, nur Mappen.
Kopier das Blatt zuvor in eine neue Mappe. So aus
dieser Serie:

Option Explicit
Sub Copy_save()
Sheets("Tabelle1").Copy
ActiveWorkbook.SaveAs "C:\Beispiel\Test.xls"
End Sub

Re: Active Sheet save
30.01.2003 09:17:16
Franz W.

Hallo L.Vira,

daran bin ich auch interessiert und hätte da noch eine Zusatzfrage: ist es auch möglich als Dateinamen automatisch den Inhalt zweier Zellen einzusetzen nach dem Muster:
ActiveWorkbook.SaveAs "C:\Beispiel\[A1] & [A2].xls" ?

Vielen Dank im Voraus

Gruß
Franz

Re: Active Sheet save
30.01.2003 13:19:52
L.Vira

Geht schon so nach dem Schema:
Option Explicit
Sub Copy_save()
Dim A1Text As String, A2Text As String
A1Text = Sheets("Tabelle2").[a1]
A2Text = Sheets("Tabelle2").[a2]
Sheets("Tabelle1").Copy
ActiveWorkbook.SaveAs "C:\Beispiel\" & A1Text & A2Text & ".xls"
End Sub
Aber es muss noch geprüft werden, ob sich in den Zellen Zeichen befinden, die in Dateinamen verboten sind!

Anzeige
Re: Active Sheet save
30.01.2003 13:36:20
Franz W.

Hallo L.Vira,

toll, vielen Dank! Das hilft mir sehr weiter!

Danke und Gruß
Franz

61 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige