Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

einzelnes Tabellenblatt speichern





Frage

Hallo Excelspezialisten, ich möchte von einer Excelmappe mit 3 Tabellenblätter nur die Veränderungen von einem Blatt speichern. Das Blatt soll in der Mappe bleiben, die Mappe behält den selben Namen. Die anderen 2 Blätter sollen immer den gleichen Ausgangszustand haben. Ich habs schon probiert mit "ActiveWorksheet.Save" das will aber nicht.Ich kenne mich mit VBA sehr sehr wenig aus. Danke und Gruß der rohrposteler

Antwort 1 von Guenter

Hallo,

versichs mal so:


Sub Speichern()
  Dim Pfad As String
  Dim Blattname As String
  Dim Dateiname As String
  
  Pfad = Application.DefaultFilePath & "\"
  Blattname = InputBox(prompt:="Blattname")
  Dateiname = InputBox(prompt:="Dateiname")
  ActiveSheet.Copy
  ActiveSheet.Name = Blattname
  ActiveWorkbook.SaveAs Pfad & Dateiname
End Sub


Gruß
Günter

Antwort 2 von rohrpostler

Hallo Günter,

ich habe dein Makro ausprobiert, funktioniert wunderbar nur macht es leider nicht das was ich will. Ich will ja keine neue Mappe anlegen.
Ich habs jetzt so gelöst daß ich meine Eingaben in dem Blatt wo ichs nicht brauche wieder lösche und dann erst abspeichere.
Trotzdem danke für dein Bemühen

Gruß

der rohrpostler