Alguna vegada has intentat donar sentit a un llibre d'Excel desconegut (i complicat)? Seria útil veure un mapa que proporcioni una visió general de quines cel·les contenen constants i quines cel·les contenen valors.
Podeu crear una utilitat VBA que generi un mapa del full de treball actiu. El mapa es genera en un full de treball nou i consta de cel·les codificades per colors que us permeten identificar ràpidament valors, text i fórmules.
A continuació, veureu un exemple d'aquest mapa. Les cel·les que contenen text són verdes, les que contenen un valor numèric són grogues i les cel·les que contenen fórmules són vermelles. Aquest mapa us pot ajudar a detectar possibles errors. Per exemple, si una fórmula d'un bloc de fórmules s'ha sobreescriu per un valor, aquesta cel·la destacarà a la vista de mapa (com a la cel·la Q11 de l'exemple).
El procediment VBA que genera el mapa del full de treball es mostra a continuació. Si voleu utilitzar aquesta utilitat, només cal que copieu el codi i enganxeu-lo a un mòdul VBA. A continuació, activeu un full de treball i executeu la subrutina QuickMap.
Sub QuickMap ()
Dim FormulaCells com a variant
Atenuar les cèl·lules de text com a variant
Dim NumberCells com a variant
Dim Area As Range
Si TypeName(ActiveSheet) <> "Worksheet" (Full de treball) Aleshores sortiu de Sub
' Creeu variables d'objecte per a subconjunts de cel·les
En cas d'error Reprèn Següent
Estableix FormulaCells = Range ("A1").SpecialCells _
(xlFormules, xlNumbers + xlTextValues + xlLogical)
Estableix TextCells = Range(“A1”).SpecialCells(xlConstants, xlTextValues)
Estableix NumberCells = Interval(“A1”).SpecialCells(xlConstants, xlNumbers)
En cas d'error GoTo 0
' Afegiu un full nou i formateu-lo
Fulls.Afegir
Amb Cèl·lules
.ColumnWidth = 2
.Font.Size = 8
.HorizontalAlignment = xlCenter
Acaba amb
Application.ScreenUpdating = Fals
' Feu les cel·les de la fórmula
Si no és buit (FormulaCells), aleshores
Per a cada àrea de FormulaCells.Areas
Amb ActiveSheet.Range(Area.Address)
.Valor = "F"
.Interior.ColorIndex = 3
Acaba amb
Següent Àrea
Acaba si
' Feu les cel·les de text
Si no és buit (Cèl·lules de text), aleshores
Per a cada àrea de TextCells.Areas
Amb ActiveSheet.Range(Area.Address)
.Valor = "T"
.Interior.ColorIndex = 4
Acaba amb
Següent Àrea
Acaba si
' Feu les cel·les numèriques
Si no és buit (NumberCells), aleshores
Per a cada àrea de NumberCells.Areas
Amb ActiveSheet.Range(Area.Address)
.Valor = "N"
.Interior.ColorIndex = 6
Acaba amb
Següent Àrea
Acaba si
End Sub
El procediment primer verifica per assegurar-se que el full actiu és un full de treball. Si no és així, hi ha una sortida ràpida sense cap altra acció. Quan el full actiu és un full de treball, el procediment crea tres variables d'objecte mitjançant el mètode SpecialCells per identificar els diferents tipus de cel·les. El mètode SpecialCells és molt útil. Si no el coneixeu, consulteu-lo al fitxer d'ajuda en línia d'Excel. Observeu l'ús de On Error Resume Next. Això és per evitar l'error que es produeix si no hi ha cap cel·la qualificada, per exemple, si el full de treball no té fórmules.
A continuació, el procediment afegeix un nou full de treball, redueix l'amplada de la cel·la i estableix l'alineació horitzontal al centre. Aquest pas és estètic. Aleshores, el subordinat desactiva l'actualització de la pantalla per accelerar una mica les coses.
Els tres blocs de codi següents processen les cel·les. Si no es qualifica cap cel·la, la variable d'objecte és Buida, de manera que la sub prova d'això. Aleshores, la rutina fa un bucle per cada Àrea de l'objecte Range i formatea la cel·la. Podeu personalitzar fàcilment aquesta part de la subrutina per aplicar un format diferent.
Consulteu el complement Power Utility Pak per obtenir una versió molt més sofisticada d'aquesta utilitat.
Com bloquejar Microsoft Word d'obrir fitxers en mode de només lectura a Windows Microsoft Word obre fitxers en mode de només lectura, cosa que fa que sigui impossible editar-los? No us preocupeu, els mètodes es mostren a continuació
Com corregir errors en imprimir documents incorrectes de Microsoft Word Els errors en imprimir documents de Word amb tipus de lletra canviats, paràgrafs desordenats, falta de text o contingut perdut són força habituals. No obstant això, no
Si heu utilitzat el llapis o el marcador per dibuixar a les vostres diapositives de PowerPoint durant una presentació, podeu desar els dibuixos per a la següent presentació o esborrar-los de manera que la propera vegada que el mostreu, començareu amb diapositives de PowerPoint netes. Seguiu aquestes instruccions per esborrar dibuixos a llapis i ressaltadors: Esborrant línies una a […]
La biblioteca d'estils conté fitxers CSS, fitxers de llenguatge de full d'estil extensible (XSL) i imatges utilitzades per pàgines mestres predefinides, dissenys de pàgina i controls a SharePoint 2010. Per localitzar fitxers CSS a la biblioteca d'estils d'un lloc de publicació: Trieu Accions del lloc→Visualitza Tot el contingut del lloc. Apareix el contingut del lloc. La biblioteca d'estil es troba a […]
No desbordeu el vostre públic amb números gigantesques. A Microsoft Excel, podeu millorar la llegibilitat dels vostres taulers i informes formatant els vostres números perquè apareguin en milers o milions.
Apreneu a utilitzar les eines de xarxes socials de SharePoints que permeten a persones i grups comunicar-se, col·laborar, compartir i connectar-se.
Les dates julianes s'utilitzen sovint en entorns de fabricació com a marca de temps i referència ràpida per a un número de lot. Aquest tipus de codificació de dates permet als minoristes, consumidors i agents de serveis identificar quan es va fabricar un producte i, per tant, l'antiguitat del producte. Les dates julianes també s'utilitzen en programació, militars i astronomia. Diferents […]
Podeu crear una aplicació web a Access 2016. Què és, de totes maneres, una aplicació web? Bé, web vol dir que està en línia i l'aplicació és només una abreviatura de "aplicació". Una aplicació web personalitzada és una aplicació de base de dades en línia a la qual s'accedeix des del núvol mitjançant un navegador. Creeu i manteniu l'aplicació web a la versió d'escriptori […]
La majoria de les pàgines del SharePoint 2010 mostren una llista d'enllaços de navegació a la barra d'inici ràpid al costat esquerre de la pàgina. La barra d'inici ràpid mostra enllaços al contingut del lloc destacat, com ara llistes, biblioteques, llocs i pàgines de publicació. La barra d'inici ràpid inclou dos enllaços molt importants: Enllaç de tot el contingut del lloc: el […]
Per a problemes senzills, Solver a Excel sol trobar ràpidament els valors òptims de la variable Solver per a la funció objectiu. Però, en alguns casos, Solver té problemes per trobar els valors de la variable Solver que optimitzen la funció objectiu. En aquests casos, Solver normalment mostra un missatge o un missatge d'error que descriu o discuteix el problema que […]
