Dynamische verwijzing naar een blad

[Woffels]

Op blad start staat een knop, als je die knop indrukt wil ik op het blad dat in cel d5 staat de waarde van e5 zien.
In dit geval komt dus in het blad januari in cel C4 de waarde 10 te staan.
Hoe doe ik een soortgelijke dynamische verwijzing in VBA?

 

[mvdvlist]

Van cel D5 heb ik een validatielijst gemaakt.

En Achter de knop DEZE code:

Private Sub CommandButton1_Click()
 Sheets([D5].Value).Select
  ActiveSheet.[C4].Value = Sheets("Start").[E5].Value
 Sheets("Start").Select
End Sub

Je kunt er ook voor kiezen om het gekozen blad niet eerst te selecteren, maar alleen de waarde in te vullen .

Dan wordt het iets als:

Private Sub CommandButton1_Click()
 With  Sheets([D5].Value)
  .[C4].Value = Sheets("Start").[E5].Value
 End With
End Sub

 

[JeanPaul28]

Met validatie en zonder knop