Ændringer inden for et bestemt område.
Jeg har lidt kode der bliver brugt når der sker ændringer i arket.Det fungerer fint som det er, men jeg kunne godt tænke mig at koden kun bliver udført, når ændringerne sker inden for et bestemt område.
Jeg forestiller mig at det måske kunne laves med en If.
Noget i stil med følgende.
Private Sub Worksheet_Change(ByVal Target As Range)
If ( ændringer inden for området A1:B2 )
For Each C In Target
If Sheets("Turnusplan2").Range(C.Address) <> C.Value Then
A = Sheets("Turnusplan").Range(C.Address).Value
If A <> "Fe" And A <> "Af" And A <> "Ku" And A <> "Sy" And A <> "An" Then
Target.Interior.ColorIndex = 8
Target.Font.Color = 0
End If
Else
Target.Interior.ColorIndex = Sheets("Turnusplan2").Range(Target.Address).Interior.ColorIndex
End If
Next
End if
End sub
