Jeg har fundet frem til den her kode, jeg prøver at indsætte - og den virker, lidt for godt faktisk, for jeg kan sjovt nok ikke gemme når koden er indsat..
Hvordan får jeg koden sat ind, OG gemt den?
Har prøvet at deaktivere alle makroer men de bliver åbenbart afviklet alligevel?
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "Dette regneark kan desværre ikke gemmes - Vælg udskriv!" Cancel = True
lav en makro i en anden mappe og hav begge åbne samtidig.
Kør den sidste makro og gem så den mappe med din kode.
Luk alle og prøv så at tage den ind igen, hvis så koden ikke virker, så kør den første kode.
Denne enabler automatiske makror
Public Sub EnableEvent() Application.EnableEvents = True End Su
og dene disabler
Public Sub DisableEvent() Application.EnableEvents = False End Sub
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.