Tabnaam=celinhoud

[rhvanloenen]

Ik kan een cel de naam van een tab geven, maar nu wil ik dat andersom.
Ik wil de tekst in een cel doorgeven als naam van een tab.
Hoe doe ik dat? Iets in de tab zelf zetten gaat volgens mij niet echt, toch weet ik dat het zou moeten kunnen

De waarde van cel A1 = "22 aug" en ik wil dat de tabnaam ook de waarde van cel A1 krijgt en meeverandert als dat volgend jaar "21 aug" wordt. Die datum wordt weer uit een ander tabblad gehaald.

 

[SjonR]

voor een enkel tabblad lukt het met deze code in je werkblad. Hoe het volgend jaar moet weet ik niet, want je bent niet duidelijk over wat er dan precies moet/gaat gebeuren.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$A$1" Then
 Name = [A1].Text
 End If
 End Sub

 

[Cobbe]

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$a$1" Then
 Name = [A1].Text
 End If
 End Sub

Dit gaat niet werken.

 

[HSV]

Klein detail (Shift of Caps Lock). :d

 

[SjonR]

Ik heb vaker dat wanneer ik code tussen tags plaats, de hoofdletters ineens geen hoofdletters meer zijn. Ik had het nu niet gezien.

 

[HSV]

Misschien is het handig als je het even aanpast.

 

[Cobbe]

Maar dan nog gaat het niet werken; je benoemt enkel de variabele 'Name' en
de tabbladnaam wordt niet aangepast.

Activesheet.Name = [A1].Text

 

[HSV]

Werkt perfect met 'Name'.

In een blad-event = "Name" de aanduiding voor Bladnaam.
Hier hoef je geen Activesheet voor te zetten.

 

[SjonR]

ja, werkt bij mij prima.

 

[Cobbe]

Awel bij mij werkt dat niet zonder Activesheet

 

[SjonR]

Vreemd

 

[HSV]

Kan me er ook geen voorstelling bij geven waarom niet.

 

[SjonR]

Per abuis in een module of workbook?