Office-Fragen.de

Normale Version: Mehrere Blätter Format und Formeln übertragen per Knopf druck
Sie sehen gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3
Moin!
Nachdem Du jetzt viele berechtigte Hinweise erhalten hast, dass man das "eigentlich" nicht so machen sollte, halte ich mich jetzt (quasi wie eine künstliche Intelligenz) strikt an die Threaderöffnung.

• erstelle ein Arbeitsblatt mit allen Formeln und Formatierungen, aber ohne Werte
• dieses Blatt ziehst Du ganz nach links und blendest es aus
• um ein neues Blatt auf Basis dieser Vorlage hinten anzufügen:
Code:
Sub NewSheet()
Application.ScreenUpdating = False
With Worksheets(1)
  .Visible = 1
  .Copy After:=Worksheets(Worksheets.Count)
  .Visible = 0
End With
ActiveSheet.Name = Format(Now, "dd.mm.yyyy hh_nn")
End Sub

Ob Du diesen Code einem "Knopf" oder einer Tastenkombination zuordnest, bleibt Dir überlassen.

Gruß Ralf
Moin Ralf,

ich fand menschliche Intelligenz schon immer besser als künstliche ...?

lg
Du hast das Wörtchen quasi beachtet?
War kein Füllsel, sondern bewusst gewählt.
Wink
Seiten: 1 2 3