Sheetchange alleen uitvoeren op 1 sheet

Status
Niet open voor verdere reacties.
B

bomseler

Gebruiker
Lid geworden
31 aug 2016
Berichten
53
Beste Forumleden,

Ik wil graag een code in sheetchange event alleen laten uitvoeren op een vooraf bepaalde sheet. Ik heb al een paar dingen geprobeerd maar het lukt nog niet.
Kan iemand mij een tip geven?

Ik heb bijvoorbeeld geprobeerd:
Code: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

If ActiveSheet Is Not Sheet("Planning") Then Exit Sub

'code

End sub

en:

Code: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

With sheet("Test")

'code

End with

End sub


Deze twee lukten niet.
 
Probeer deze eens:
Code: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    If sh.Name <> "Planning" Then Exit Sub
    'code
End sub
 
In de werkblad-module staat een soortgelijk event.

De.... private sub worksheet_change(byval target as range)..nl.
 
HSV,

Dit is inderdaad wat ik nodig heb. Hier had ik niet aan gedacht.

Domme vragen bestaan niet zeggen ze vaak, maar dit komt toch wel in de richting... :shocked:


Bedankt!
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan