Werkblad naam d.m.v. formule

[hoogteijling]

Hallo allemaal,

Bijgevoegd bestand is iets wat ik ieder jaar in december klaar moet maken voor het volgende jaar.
Is het mogelijk dat ik ergens een cel reserveer waarin het jaartal komt te staan waar het bestand betrekking op heeft.
Dat vervolgens die cel gekoppeld is aan alle 12 werkbladnamen en aan de jaartallen in het Totalen werkblad.
verder staat er nog een deel van het huidige jaartal in de formule in cel A4 van het 1e werkblad, die formule zou ook mee moeten veranderen.

Ik kan natuurlijk een Naam definiëren, bijv: Jaartal en deze vervolgens 2015 noemen maar dit werkt dan alleen in de cellen waar een formule staat en de werkbladnamen veranderen niet.

Kort gezegd, ik wil het blad geschikt maken voor het volgende jaar door in 1 cel het jaartal te veranderen.

Groeten Marcel
Bekijk bijlage Verkoopboek 2015.xlsb

 

[Ndam90]

In de onderstaande link is een vba code uitleg om je werkblad naam dynamisch te maken.
De totaal velden kan je gewoon met een simpele verwijzing naar een andere cel regelen

http://excel.tips.net/T002145_Dynamic_Worksheet_Tab_Names.html

 

[hoogteijling]

Hier kom ik een aardig eindje mee op weg.
Ik heb 12 tabbladen welke 01-2015, 02-2015, 03-2015, etc. heten.
Alleen het laatste gedeelte is variabel.

Kan iemand nog helpen om te zorgen dat alleen het jaartal gedeelte variabel is?

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    Set Target = Range("X1")
    If Target = "" Then Exit Sub
    On Error GoTo Badname
    ActiveSheet.Name = Left(Target, 31)
    Exit Sub
Badname:
    MsgBox "Kijk in cel X1." & Chr(13) _
    & "Hij bevat 1 of meerdere tekens " & Chr(13) _
    & "die niet toegestaan zijn." & Chr(13)
    Range("X1").Activate
End Sub

Groeten Marcel

 

[mvw64]

Toelichting staat in blad Totalen

 

[hoogteijling]

Hier kan ik wel verder op borduren.
Dank je wel.

Groeten Marcel