I denne artikkelen vil vi bruke endringshendelse av regneark for å beskytte celler som inneholder formler.
Rådata består av salgsdata for ansatte, som inkluderer bifurisering etter måned og år.
Vi ønsker å finne ut totalt salg etter måned, så vel som etter år.
Vi har brukt sumfunksjon for å beregne totalt salg på månedlig og årlig basis. Endre hendelse i regneark brukes til å beskytte celler som inneholder formler. Når vi prøver å redigere en celle som inneholder en formel, får vi en popup-melding som sier at celleverdien ikke kan endres.
Kode forklaring
rng.HasFormula
HasFormula -metoden returnerer True hvis en celle inneholder en formel. Ellers vil den returnere False.
ActiveSheet.Protect
Koden ovenfor brukes til å beskytte en celle.
Merk: En celle vil bare bli beskyttet hvis den er låst. Så før du beskytter en celle, må den være låst.
ActiveSheet.Beskytt
Koden ovenfor brukes til å fjerne beskyttelsen av en celle.
Følg koden nedenfor
'Legg til koden nedenfor i regnearkmodulen Alternativ Eksplisitt privat under Arbeidsark_ValgEndre (ByVal -mål som område) Dim rng som område for hver rng i Target.Cells Hvis rng.HasFormula deretter ActiveSheet.Protect Else ActiveSheet.Beskytt slutten hvis neste rng End Sub
Hvis du likte denne bloggen, del den med vennene dine på Facebook. Du kan også følge oss på Twitter og Facebook.
Vi vil gjerne høre fra deg, gi oss beskjed om hvordan vi kan forbedre arbeidet vårt og gjøre det bedre for deg. Skriv til oss på e -post
