Vai esat kādreiz mēģinājis izprast nepazīstamu (un sarežģītu) Excel darbgrāmatu? Būtu noderīgi redzēt karti, kas sniedz pārskatu par to, kurās šūnās ir konstantes un kurās ir vērtības.
Varat izveidot VBA utilītu, kas ģenerē aktīvās darblapas karti. Karte tiek ģenerēta jaunā darblapā, un tā sastāv no krāsu kodētām šūnām, kas ļauj ātri identificēt vērtības, tekstu un formulas.
Tālāk ir parādīts šādas kartes piemērs. Šūnas, kurās ir teksts, ir zaļas, tās, kurās ir skaitliskā vērtība, ir dzeltenas, un šūnas, kurās ir formulas, ir sarkanas. Šāda karte var palīdzēt pamanīt iespējamās kļūdas. Piemēram, ja viena formula formulu blokā ir pārrakstīta ar vērtību, šī šūna kartes skatā izcelsies (kā piemērā šūnā Q11).
Tālāk ir norādīta VBA procedūra, kas ģenerē darblapas karti. Ja vēlaties izmantot šo utilītu, vienkārši nokopējiet kodu un ielīmējiet to VBA modulī. Pēc tam aktivizējiet darblapu un izpildiet QuickMap apakšprogrammu.
Sub QuickMap()
Dim FormulaCells kā variants
Aptumšot teksta šūnas kā variantu
Dim NumberCells kā variants
Blāvs apgabals kā diapazons
Ja TypeName(ActiveSheet) <> “Worksheet” Pēc tam izejiet no apakšdaļas
Izveidojiet objektu mainīgos šūnu apakškopām
Kļūdas gadījumā atsākt nākamo
Iestatīt FormulaCells = diapazons(“A1”). Īpašās šūnas _
(xlFormulas, xlNumbers + xlTextValues + xlLogical)
Set TextCells = diapazons(“A1”). SpecialCells(xlConstants, xlTextValues)
Iestatīt NumberCells = diapazons(“A1”). SpecialCells(xlConstants, xlNumbers)
Par kļūdu GoTo 0
' Pievienojiet jaunu lapu un formatējiet to
Izklājlapas.Pievienot
Ar šūnām
.ColumnWidth = 2
.Fonta lielums = 8
.HorizontalAlignment = xlCenter
Beigt ar
Application.ScreenUpdating = False
Izpildiet formulas šūnas
Ja nav IsEmpty (FormulaCells), tad
Katram apgabalam FormulaCells.Areas
Ar ActiveSheet.Range(Apgabals.Adrese)
.Vērtība = “F”
.Interjers.ColorIndex = 3
Beigt ar
Nākamais apgabals
Beigas Ja
' Veiciet teksta šūnas
Ja nav tukšs (teksta šūnas), tad
Katram apgabalam TextCells.Areas
Ar ActiveSheet.Range(Apgabals.Adrese)
.Vērtība = “T”
.Interjers.ColorIndex = 4
Beigt ar
Nākamais apgabals
Beigas Ja
Izpildiet ciparu šūnas
Ja Not IsEmpty(NumberCells) Tad
Katram apgabalam NumberCells.Areas
Ar ActiveSheet.Range(Apgabals.Adrese)
.Vērtība = “N”
.Interjers.ColorIndex = 6
Beigt ar
Nākamais apgabals
Beigas Ja
Beigu apakš
Procedūra vispirms pārbauda, vai aktīvā lapa ir darblapa. Ja tā nav, ir ātra izeja bez papildu darbībām. Ja aktīvā lapa ir darblapa, procedūra izveido trīs objekta mainīgos, izmantojot SpecialCells metodi, lai identificētu dažādus šūnu tipus. SpecialCells metode ir ļoti noderīga. Ja neesat ar to pazīstams, pārbaudiet to Excel tiešsaistes palīdzības failā. Ņemiet vērā, ka tiek izmantota opcija On Error Resume Next. Tas tiek darīts, lai izvairītos no kļūdas, kas rodas, ja neviena šūna nav piemērota, piemēram, ja darblapā nav formulu.
Pēc tam procedūra pievieno jaunu darblapu, samazina šūnas platumu un iestata horizontālo līdzinājumu centrā. Šis solis ir kosmētisks. Pēc tam apakšsistēma izslēdz ekrāna atjaunināšanu, lai nedaudz paātrinātu darbību.
Nākamie trīs koda bloki apstrādā šūnas. Ja neviena šūna nav piemērota, objekta mainīgais ir tukšs, tāpēc apakšgrupa to pārbauda. Pēc tam rutīna veic cilpas caur katru objekta diapazona apgabalu un formatē šūnu. Varat viegli pielāgot šo apakšprogrammas daļu, lai lietotu dažādus formatējumus.
Apskatiet Power Utility Pak pievienojumprogrammu, lai iegūtu daudz sarežģītāku šīs utilītas versiju.
Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk
Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag
Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]
Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]
Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.
Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.
Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]
Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]
Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]
Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]
