Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabelle speichern

Forumthread: Tabelle speichern

Tabelle speichern
17.07.2003 09:41:14
Giuseppe Bonfirraro
Hallo zusammen,
Wie kann ich innerhalb 1 Arbeitsmappe nur eine Tabelle speichern?
Unter andere habe eine Tabelle (Rechnung). Ich möchte die Rechnung speichern unter der Rechnungsnummer (F7).
Kann mir jemand helfen?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabelle speichern
17.07.2003 09:47:09
geri
Hallo Guiseppe
als Ansatz wobei bei INPUbox musst du ändern auf Deine Zelle mit Rechnungsnummer

Sub Speichern_blatt()
Application.ScreenUpdating = False
ActiveSheet.Copy
Dim neuName As String
neuName = InputBox("Unter welchem Namen soll die Datei gespeichert werden?")
'Pfad anpassen "C:\???????\
ActiveWorkbook.SaveAs Filename:="C:\DATEN\" & neuName & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
'Pfad anpassen "C:\???????\
MsgBox " Die Datei wurde unter C:\DATEN\ " & neuName & " gespeichert !", vbibformation
Application.ScreenUpdating = True
End Sub

gruss geri

Anzeige
AW: Tabelle speichern
17.07.2003 10:41:55
Giuseppe Bonfirraro
Hallo geri danke für deine Antwort. Ich möchte die Tabelle mit der Ihnalt der Zelle N15 speichern. wie soll ich deine Makro ändern?

AW: Tabelle speichern
18.07.2003 09:03:17
geri
Hallo Giuiseppe
es wird nur ein blatt gespeichert das wolltest du doch
gehe zu VBA Umgebung (Alt+F11) füge ein Modul ein und diesen Code in Modul

Sub Speichern_blatt()
Application.ScreenUpdating = False
ActiveSheet.Copy
Dim neuName As String
'in Range steht die Zelle von wo Name geholt wird
neuName = Range("N15")
neuName = InputBox("Unter welchem Namen soll die Datei gespeichert werden?")
'Pfad anpassen "C:\???????\
ActiveWorkbook.SaveAs Filename:="C:\DATEN\" & neuName & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
'Pfad anpassen "C:\???????\
MsgBox " Die Datei wurde unter C:\DATEN\ " & neuName & " gespeichert !", vbibformation
Application.ScreenUpdating = True
End Sub

hoffe es ist die Lösung für Dich
gruss geri

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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