wenn-funktion inaktivieren
21.10.2007 18:31:00
a*
ich kopiere aus einem workbook ein einzelnes sheet und möchte dieses abspeichern.
in meinem aktuellen code, werden die wenn-funktionen im abgespeicherten sheet weiterhin aktiv behandelt und ständig aktualisiert.
wie kann ich das verhindern?
Sub speichern_beiklick()
Sheets("Anschreiben").Select
Sheets("Anschreiben").Copy
ActiveSheet.Unprotect
ActiveWorkbook.UpdateLinks = xlUpdateLinksNever
Application.DisplayAlerts = True
ActiveWorkbook.Close savechanges:=True
Application.DisplayAlerts = True
ActiveSheet.Protect
End Sub