Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Nur Tabelleblätter über "Speichern unter" speichen

Forumthread: Nur Tabelleblätter über "Speichern unter" speichen

Nur Tabelleblätter über "Speichern unter" speichen
23.09.2004 17:10:41
christoph
HI.
Ist es möglich über den
Application.Dialogs(xlDialogSaveAs).Show
nur die Tabellen 11 und 12 zu speichern und nicht die ganze Arbeitsamappe
Danke für hilfe

Christoph
Anzeige

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

Betreff
Datum
Anwender
Anzeige
nein o.w.t
23.09.2004 20:50:51
andre
AW: Nur Tabelleblätter über "Speichern unter" speichen
24.09.2004 07:46:41
rolf
hi christop
musst du dir noch anpassen,
an der abbruchfunktion arbeite ich noch
' SPEICHERN UNTER

Sub SPEICHERN_UNTER1()
' FESTLEGEN DES LAUFWERKS IN DEM GESPEICHERT WERDEN SOLL
ChDrive "D"
' FESTLEGEN DES ORDNERS IN DEM GESPEICHERT WERDEN SOLL
ChDir "D:\TEST"
' AUSWAHL DER TABELLENBLÄTTER DIE GESPEICHERT WERDEN SOLLEN
Sheets(Array("Tabelle5", "Tabelle4")).Select
Sheets(Array("Tabelle5", "Tabelle4")).Copy
' SPEICHERN MIT EINEM VORGEGEBENEN NAMEN UND DATUM UHRZEIT
NeuName = "NEUER NAME" & "    " & Now
' DER DOPPELPUNKT DER UHRZEIT WIRD DURCH UNTERSTRICH ERSETZT
NeuName = Replace(NeuName, ":", "_")
DlgAnswer = Application.GetSaveAsFilename(InitialFileName:=NeuName, _
fileFilter:="Microsoft Excel-Arbeitsmappe (*.xls), *.xls")
If DlgAnswer <> "Falsch" Then
ActiveWorkbook.SaveAs Filename:=NeuName, FileFormat:=xlNormal
'ActiveWorkbook.Close
End If
End Sub

rolf
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige