Sletning af alle navne, men et par stykker

Har du rutinemæssigt arbejde med regneark, der indeholder snesevis (eller hundreder) af navngivne celler, og de fleste af disse navne er unødvendig? Oprydning navne er en enorm opgave, men at slippe af med dem, du ikke har brug kan gøre din projektmappe mindre og mere effektiv. Problemet er, hvordan kan du slippe af med en masse unødvendige navne på én gang? Du kan helt sikkert slette dem én ad gangen, men en sådan proces hurtigt bliver trættende.

En mulig løsning er simpelthen at oprette en ny projektmappe og kopiere cellerne fra den gamle projektmappe til den nye. Fremhæv cellerne i den gamle projektmappe, skal du bruge Ctrl + C for at kopiere dem og derefter indsætte dem i regneark i den nye projektmappe. Dette vil kopiere næsten alt fra de gamle projektmappe-formler, formatering, etc. Det bringer ikke kopi af udskriftsindstillingerne, eller et interval navne. Den eneste opgave derefter resterende er at omdefinere de få navne, du ønsker i den nye projektmappe.

Hvis du foretrækker at arbejde med den gamle projektmappe (den med alle navnene), er det bedst at lave en makro, der vil gøre det navn sletning for dig. Du har brug for en makro, der vil give dig mulighed for at slette alle navnene, undtagen dem du vil beholde. Følgende er en simpel metode, der sikrer opfyldelse af denne opgave:

Sub DeleteSomeNames ()
Dim vKeep
Dim nm som Name
Dim x As Integer
Dim AWF Som WorksheetFunction

»Tilføj Navne til at holde her
vKeep = array ("NAME1", "NAME2")

Set AWF = Application.WorksheetFunction
For hver nm i ActiveWorkbook.Names
x = 0
Ved fejl Resume Next
x = AWF.Match (nm.Name, vKeep, 0)
Ved fejl GoTo 0
Hvis x = 0, så
nm.Delete
End hvis
Næste
Set AWF = Nothing
End Sub

Før du bruger makroen, ændre den linje, der skaber vKeep array. Du skal blot indtaste de navne, du vil beholde i array, hvert navn er omgivet af anførselstegn og adskilt af kommaer. (I det viste eksempel vil navnene "NAME1" og "NAME2" holdes.) De makro sløjfer gennem alle navnene i projektmappen og bruger Match-funktionen for at se, om navnet er en i opstillingen. Hvis det ikke er, så er det slettet.

Hvis du foretrækker at bruge en tredjeparts løsning til håndtering af navnene i din projektmappe, et godt valg er navnet manager tilføjelsesprogrammet, som er skrevet af Jan Karel Pieterse. Du kan finde flere oplysninger om tilføjelsesprogrammet her:

http://www.jkp-ads.com/officemarketplacenm-en.asp

ExcelTips er din kilde til omkostningseffektiv Microsoft Excel træning. Dette tip (2419) gælder for Microsoft Excel 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til båndet grænseflade Excel (Excel 2007 og nyere) her: Sletning af alle navne, men et par stykker.


© 2019 Zajacperrone.com | Contact us: webmaster# zajacperrone.com