Avatar billede jath08ac Forsker
03. august 2016 - 20:40 Der er 5 kommentarer

VBA koder der lås makro fra at køre

Hej,

Jeg har en makro, som køre hver gang der sker ændringer i den fane, hvor makroen ligger. Makroen starter med:

Private Sub Worksheet_Change(ByVal Target As Range)

[KODE]

End sub

I det det skal være muligt, at kunne foretage ændringer i fanen (tilføje ny rækker m.v.), vil jeg høre, om det er muligt, at lave to makroer
* Én makro som slår ovenstående kode fra. og så
* Én makro som aktiverer ovenstående kode. 
Forstiller mig, at de to makroer skal køre vha. to knapper.

På forhånd tak
Avatar billede excelent Ekspert
03. august 2016 - 21:14 #1
Opret et navn : Valg
Refererer til skriv =FALSK

indsæt følgende kode i et alm modul

Sub xValg()
x = Evaluate(ThisWorkbook.Names("Valg").Value)
If x = True Then x = False Else x = True
ThisWorkbook.Names("Valg").Value = x
End Sub

indsæt denne som første linje i din events kode :

If Evaluate(ThisWorkbook.Names("Valg").Value) = False Then Exit Sub

Du kan evt. tildele subben "xValg" en genvejstast
Avatar billede store-morten Ekspert
03. august 2016 - 22:19 #2
Lav en ToggleButton (Til/fra knap (ActiveX-objekt))

Private Sub Worksheet_Change(ByVal Target As Range)
If ToggleButton1 = True Then Exit Sub

[KODE]

End Sub
Avatar billede jath08ac Forsker
06. august 2016 - 21:09 #3
Jerg kan ikke få koden til at fungerer :-(
Avatar billede store-morten Ekspert
07. august 2016 - 02:39 #4
Hvilken en?
Avatar billede kabbak Professor
11. august 2016 - 22:34 #5
sæt dem i et kodemodul,

Public Sub StopMakro()
    Application.EnableEvents = False    ' slår automatiske makroer fra
End Sub

Public Sub StartMakro()
    Application.EnableEvents = True    ' slår automatiske makroer til
End Sub
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester