Namen van tabbladen

[litmanen65]

Kleine vraag waar ik op deze site niets over kan vinden : Hoe kan ik snel alle tabbladen (256) een nummer geven van bijv. 1 tot 256 ?
Is 't eventueel mogelijk om een naam van een tabblad te koppelen aan een cel in een sheet. Dus in cel A1 staat 300 --> tabbladnaam 300.

 

[Jan van Asseldonk]

Kan volgens mij alleen met een macro.

Sub naamblad()
Dim i As Integer
For i = 1 To Worksheets.Count
Worksheets(i).Name = "sheet" & i
Next i
End Sub

Als je de waarde uit A1 van elke sheet wilt gebruiken dan "sheet" & i vervangen door Worksheets(i).Range("A1").Value

Bovenstaande code in een module plakken en runnen.

 

[litmanen65]

Beste Jan,

Bedankt voor je supersnelle reaktie. Je macro werkt perfect. Ik ben bang dat ik als verwoed Quattro Pro gebruiker nog een aantal vragen zal stellen, omdat sommige voor mij vertrouwde functies in Excel niet bestaan of niet werken.:
thumb: :thumb: :thumb:

Groetjes,


Arjan

 

[jpvs]

Misschien nog een tip.

Het bestand maakt van alle tabbladeren Hyperlinks en sorteert ze.

Pierre