Dölja namn i arbetsböcker
I detta tips visas hur vi kan dölja namn i arbetsböcker. Förfarandet kan vara lämpligt om vi vill dölja vissa uppgifter för andra användare eller för oss själva (!).
För grundläggande kunskaper om namn se Använda namn i Excel.
I exemplet används namn med en gemensam prefix - G, dvs samtliga namn som önskas döljas har begynnelsebokstaven G.När nedanstående procedur körs så döljs alla dessa namn så att de varken är tillgängliga i namnrutan eller i namn-dialogrutan.
Dock kan vi fortfarande nå namnen - För det krävs att vi vet hur namnen stavas.
För att dölja namnen används följande procedur:
Sub Dolja_Namn_Arbetsbok()
'© 2001 Alla rättigheter XL-Dennis'Här deklareras en konstant-variabel med värdet "G"
Const Prefix As String = "G"
Dim nNamn As Name
'Här kontrolleras samtliga namn i arbetsboken.
'Först testas om boknamnen har prefixet "G" och
'därefter bladnivånamnen har prefixet "G".
For Each nNamn In ActiveWorkbook.Names
If Left(nNamn.Name, Len(Prefix)) = Prefix _
Or InStr(nNamn.Name, "!" & Prefix) Then
nNamn.Visible = False
End If
Next nNamn
End SubVill vi visa namnen igen ersätt värdet "False" med "True" i ovanstående procedur.