Har du nogensinde prøvet at forstå en ukendt (og kompliceret) Excel-projektmappe? Det ville være nyttigt at se et kort, der giver et overblik over, hvilke celler der indeholder konstanter, og hvilke celler der indeholder værdier.
Du kan oprette et VBA-værktøj, der genererer et kort over det aktive regneark. Kortet er genereret på et nyt regneark, og det består af farvekodede celler, der lader dig hurtigt identificere værdier, tekst og formler.
Nedenfor ser du et eksempel på et sådant kort. Celler, der indeholder tekst, er grønne, dem, der indeholder en numerisk værdi, er gule, og celler, der indeholder formler, er røde. Sådan et kort kan hjælpe dig med at opdage potentielle fejl. Hvis f.eks. én formel i en blok af formler er blevet overskrevet af en værdi, vil den celle skille sig ud i kortvisningen (som i celle Q11 i eksemplet).
VBA-proceduren, der genererer arbejdsarkkortet, er angivet nedenfor. Hvis du gerne vil bruge dette værktøj, skal du bare kopiere koden og indsætte den i et VBA-modul. Aktiver derefter et regneark og udfør QuickMap-underrutinen.
Sub QuickMap()
Dim FormulaCells som variant
Dim tekstceller som variant
Dim NumberCells som variant
Dim område som rækkevidde
Hvis TypeName(ActiveSheet) <> "Worksheet" Afslut Sub
' Opret objektvariable for celleundersæt
Ved fejl Genoptag Næste
Indstil FormulaCells = Range(“A1”).SpecialCells _
(xlFormler, xlNumbers + xlTextValues + xlLogical)
Indstil TextCells = Range(“A1”).SpecialCells(xlConstants, xlTextValues)
Indstil NumberCells = Range(“A1”).SpecialCells(xlConstants, xlNumbers)
Ved fejl GoTo 0
Tilføj et nyt ark og formater det
Ark.Tilføj
Med celler
.ColumnWidth = 2
.Skriftstørrelse = 8
.Horizontal Alignment = xlCenter
Slut med
Application.ScreenUpdating = Falsk
' Lav formelcellerne
Hvis ikke er tomme (formelceller) så
For hvert område i FormulaCells.Areas
Med ActiveSheet.Range(Area.Address)
.Value = "F"
.Interior.ColorIndex = 3
Slut med
Næste område
Afslut Hvis
' Lav tekstcellerne
Hvis ikke er tomme (tekstceller) så
For hvert område i TextCells.Areas
Med ActiveSheet.Range(Area.Address)
.Value = "T"
.Interior.ColorIndex = 4
Slut med
Næste område
Afslut Hvis
' Lav de numeriske celler
Hvis ikke er tomme (talceller) så
For hvert område i NumberCells.Areas
Med ActiveSheet.Range(Area.Address)
.Value = "N"
.Interior.ColorIndex = 6
Slut med
Næste område
Afslut Hvis
Slut Sub
Proceduren kontrollerer først, at det aktive ark er et regneark. Hvis den ikke er det, er der en hurtig exit uden yderligere handling. Når det aktive ark er et regneark, opretter proceduren tre objektvariabler ved at bruge SpecialCells-metoden til at identificere de forskellige celletyper. SpecialCells-metoden er meget nyttig. Hvis du ikke er bekendt med det, så tjek det ud i Excels online-hjælpefil. Bemærk brugen af On Error Resume Next. Dette er for at undgå den fejl, der opstår, hvis ingen celler kvalificerer sig - for eksempel hvis regnearket ikke har nogen formler.
Dernæst tilføjer proceduren et nyt regneark, reducerer cellebredden og indstiller den vandrette justering til centrum. Dette trin er kosmetisk. Sub'en slår derefter skærmopdatering fra for at fremskynde tingene en smule.
De næste tre blokke kode behandler cellerne. Hvis ingen celler kvalificerer sig, er objektvariablen Empty, så underdelen tester for dette. Derefter går rutinen gennem hvert område i områdeobjektet og formaterer cellen. Du kan nemt tilpasse denne del af underrutinen til at anvende forskellig formatering.
Tjek Power Utility Pak-tilføjelsen for en meget mere sofistikeret version af dette værktøj.
Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows Microsoft Word åbner filer i skrivebeskyttet tilstand, hvilket gør det umuligt at redigere det? Bare rolig, metoderne er nedenfor
Sådan rettes fejl ved udskrivning af forkerte Microsoft Word-dokumenter Fejl ved udskrivning af Word-dokumenter med ændrede skrifttyper, rodede afsnit, manglende tekst eller tabt indhold er ret almindelige. Men lad være
Hvis du har brugt pennen eller highlighteren til at tegne på dine PowerPoint-dias under en præsentation, kan du gemme tegningerne til næste præsentation eller slette dem, så næste gang du viser den, starter du med rene PowerPoint-dias. Følg disse instruktioner for at slette pen- og highlighter-tegninger: Sletning af linjer en ved […]
Style-biblioteket indeholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og billeder, der bruges af foruddefinerede mastersider, sidelayouts og kontrolelementer i SharePoint 2010. For at finde CSS-filer i Style-biblioteket på et udgivelsessted: Vælg Site Actions→ View Alt webstedsindhold. Indholdet af webstedet vises. Style-biblioteket ligger i […]
Overvæld ikke dit publikum med gigantiske tal. I Microsoft Excel kan du forbedre læsbarheden af dine dashboards og rapporter ved at formatere dine tal, så de vises i tusinder eller millioner.
Lær, hvordan du bruger SharePoints sociale netværksværktøjer, der lader enkeltpersoner og grupper kommunikere, samarbejde, dele og forbinde.
Julianske datoer bruges ofte i produktionsmiljøer som et tidsstempel og hurtig reference for et batchnummer. Denne type datokodning giver detailhandlere, forbrugere og serviceagenter mulighed for at identificere, hvornår et produkt blev fremstillet, og dermed produktets alder. Julianske datoer bruges også i programmering, militæret og astronomi. Forskellige […]
Du kan oprette en webapp i Access 2016. Så hvad er en webapp overhovedet? Nå, web betyder, at det er online, og app er kun en forkortelse for "applikation". En Custom Web App er en online databaseapplikation, der tilgås fra skyen ved hjælp af en browser. Du bygger og vedligeholder webappen i desktopversionen […]
De fleste sider i SharePoint 2010 viser en liste over navigationslinks på linjen Hurtig start langs venstre side af siden. Hurtig startlinjen viser links til fremhævet webstedsindhold såsom lister, biblioteker, websteder og udgivelsessider. Hurtigstartlinjen indeholder to meget vigtige links: Linket Alt webstedsindhold: […]
Ved simple problemer finder Solver i Excel som regel hurtigt de optimale Solver-variableværdier for objektivfunktionen. Men i nogle tilfælde har Solver problemer med at finde de Solver-variableværdier, der optimerer objektivfunktionen. I disse tilfælde viser Solver typisk en meddelelse eller en fejlmeddelelse, der beskriver eller diskuterer det problem, der […]
