Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
948to952
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
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Blatt speichern unter Registernamen und Zellnamen

Blatt speichern unter Registernamen und Zellnamen
11.02.2008 11:21:00
BuStü
Hallo Freunde,
ich versuche ein Tabellenblatt einer Arbeitsmappe unter dem Registernamen und den Namen einer Zelle aus einem weiteren Tabellenblatt zu speichern.
folgenden Code habe ich verwendet, der leider zu einer Fehlermeldung führt:

Private Sub BlSpeichern_Click()
Dim SavePath As String
SavePath = "F:\Lager\Bestand"
'Kopiert die aktuelle Tabelle
ActiveSheet.Copy
'Speichert die Datei unter dem Tabellennamen
ActiveWorkbook.SaveAs SavePath & "\" & ActiveSheet.Name & " " & Range("Bestandsübersicht!D4" _
).Value & ".xls"
End Sub


Was habe ich verkehrt gemacht.
MfG
Bustue

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt speichern unter Registernamen und Zellna
11.02.2008 11:31:00
Rudi
Hallo,
ActiveWorkbook.SaveAs SavePath & "\" & ActiveSheet.Name & " " & thisworkbook.sheets("Bestandsübersicht").Range("D4").Value & ".xls"
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Blatt speichern unter Registernamen und Zellna
11.02.2008 13:50:00
BuStü
Hallo Rudi,
Besten Dank, hat geklappt.
MfG
Bustue
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige