In het voorbeeldbestand wil ik graag centraal (vanuit het tabblad "Algemeen") de naamgeving kunnen sturen van andere tabbladen. In dit geval van de tabbladen "Appels", "Peren", "Pruimen" en "Druiven". Nu zou ik het graag zo maken dat ik die namen centraal kan veranderen vanuit tabblad "Algemeen". Is zoiets mogelijk in Excel?
-
Privacywetgeving
Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.
Vraag over het geven van namen aan tabbladen
- Onderwerp starter kippiebla
- Startdatum
- Status
edmoor
Inventaris
- Lid geworden
- 8 sep 2000
- Berichten
- 41.842
- Besturingssysteem
- Windows 98SE, XP, 7, 10, 11-25H2
- Office versie
- Office 2021
Met dit achter het werkblad Algemeen:
Bekijk bijlage Namen geven aan tabbladen.xlsm
Bovenstaande is zonder enige verdere controle en fout afhandeling.
Handig is dat echter niet als je op meerdere plekken in je document gebruik maakt van de bladnamen.
Code:
Dim shtcur As String
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B4:B7")) Is Nothing Then Sheets(shtcur).Name = Target.Text
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B4:B7")) Is Nothing Then shtcur = Target.Text
End SubBovenstaande is zonder enige verdere controle en fout afhandeling.
Handig is dat echter niet als je op meerdere plekken in je document gebruik maakt van de bladnamen.
Laatst bewerkt:
- Status
