Waarde in cel op 2 tabbladen hetzelfde

[Maestr0]

Goedemiddag,

Ik heb 2 tabbladen waar ik in bij beide tabbladen in cel F3 de waarde wil laten overeenkomen ongeacht op welk tabblad ik deze verander..

Dus wanneer ik op tabblad 2 de waarde verander zie ik dat terug op tabblad 1.
Wanneer ik op blad 1 de waarde verander zie ik dat terug op tabblad 2, opdat ik niet hoef te wisselen van tabblad..

Ik vermoed dat er iets met vba zal moeten maar misschien kan er iets met een pulldown menu o.i.d. er zullen maar 6 verschillende waardes zijn..

Bij voorbaat dank voor suggesties!!

Met vriendelijke groet,

Leon

 

[HSV]

In Thisworkbook-module

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address(0, 0) = "F3" Then
  Application.EnableEvents = False
    Sheets(Array("blad1", "blad2")).FillAcrossSheets Sh.Range("f3")
  Application.EnableEvents = True
End If
End Sub