Efnisyfirlit
Í þessari kennslu muntu læra 3 mismunandi leiðir til að auðkenna línu og dálk valinnar reits í Excel með virkum hætti.
Þegar þú skoðar stórt vinnublað í langan tíma gæti á endanum glatað því hvar bendillinn þinn er og hvaða gögn þú ert að skoða. Til að vita nákvæmlega hvar þú ert hvenær sem er, fáðu Excel til að auðkenna sjálfkrafa virku röðina og dálkinn fyrir þig! Auðvitað ætti auðkenningin að vera kraftmikil og breytast í hvert skipti sem þú velur annan reit. Í meginatriðum er þetta það sem við stefnum að:
Sjálfvirkt auðkenna línu og dálk valinnar reits með VBA
Þetta dæmi sýnir hvernig hægt er að auðkenna virkan dálk og röð forritunarlega með VBA. Til þess munum við nota SelectionChange atburðinn á Worksheet hlutnum.
Í fyrsta lagi hreinsar þú bakgrunnslit allra frumna á blaðinu með því að stilla Worksheet hlutinn. 1>ColorIndex eignina í 0. Og þá auðkenndu alla röðina og dálkinn í virka reitnum með því að stilla eiginleikann ColorIndex á vísitölu fyrir viðkomandi lit.
Private Sub Worksheet_SelectionChange (ByVal Target As Range) Ef Target.Cells.Count > 1 Hætta síðan Sub Application.ScreenUpdating = False 'Hreinsaðu lit allra frumna Cells.Interior.ColorIndex = 0 Með Target 'Auðkenndu línu og dálk í valinni reit .EntireRow.Interior.ColorIndex = 38.EntireColumn.Interior.ColorIndex = 24 End With Application.ScreenUpdating = True End SubSérsníða kóðann
Ef þú vilt sérsníða kóðann að þínum þörfum gætu þessi litlu ráð komið sér vel:
- Dæmiskóðinn okkar notar tvo mismunandi liti sem sýndir eru í gifinu hér að ofan - litavísir 38 fyrir röð og 24 fyrir dálk. Til að breyta hápunktalitnum skaltu bara skipta þeim út fyrir hvaða ColorIndex kóða sem þú velur.
- Til að fá línuna og dálkinn litaða á sama hátt , notaðu það sama litavísitölu fyrir báða.
- Til að auðkenna aðeins virku línuna skaltu fjarlægja eða skrifa athugasemd út þessa línu: .EntireColumn.Interior.ColorIndex = 24
- Til að auðkenna aðeins virka dálkinn skaltu fjarlægja eða skrifa athugasemd við þessa línu: .EntireRow.Interior.ColorIndex = 38
Hvernig á að bæta kóðanum við í vinnublaðið þitt
Til að láta keyra kóðann hljóðlaust í bakgrunni tiltekins vinnublaðs þarftu að setja hann inn í kóðagluggann sem tilheyrir því vinnublaði, ekki í venjulegu einingunni. Til að gera það skaltu framkvæma þessi skref:
- Í vinnubókinni þinni, ýttu á Alt + F11 til að komast í VBA ritilinn.
- Í Project Explorer til vinstri, þú munt sjá lista yfir allar opnar vinnubækur og vinnublöð þeirra. Ef þú sérð það ekki, notaðu Ctrl + R flýtileiðina til að fá Project Explorer gluggann til að skoða.
- Finndu markvinnubókina. Í Microsoft ExcelObjects möppu, tvísmelltu á blaðið sem þú vilt nota auðkenningu á. Í þessu dæmi er það Sheet 1 .
- Í kóðaglugganum hægra megin, límdu kóðann hér að ofan.
- Vistaðu skrána þína sem Macro-Enabled Workbook (.xlsm).
Kostir : allt er gert í bakendanum; engar breytingar/sérstillingar eru nauðsynlegar af hálfu notandans; virkar í öllum Excel útgáfum.
Gallar : það eru tveir mikilvægir gallar sem gera þessa tækni ónothæfa undir vissum kringumstæðum:
- Kóðinn hreinsar bakgrunn litir allra hólfa í vinnublaðinu. Ef þú ert með einhverja litaða reiti skaltu ekki nota þessa lausn því sérsniðna sniðið þitt mun glatast.
- Að keyra þennan kóða lokar afturkalla virknina á blaðinu og þú munt ekki geta afturkallað ranga aðgerð með því að ýta á Ctrl + Z .
Auðkenndu virka röð og dálk án VBA
Það besta sem þú getur fengið til að auðkenna valda línu og /eða dálkur án VBA er skilyrt snið Excel. Til að setja það upp skaltu framkvæma þessi skref:
- Veldu gagnasafnið þitt þar sem auðkenningin á að gera.
- Á flipanum Heima , í Stílar hópur, smelltu á Ný regla .
- Í Ný sniðregla valmynd skaltu velja Nota formúlu til að ákvarða hvaða frumur á að snið .
- Í Formatgildum þar sem þessi formúlaer satt , sláðu inn eina af þessum formúlum:
Til að auðkenna virka röð :
=CELL("row")=ROW()
Til að auðkenna virkan dálk :
=CELL("col")=COLUMN()
Til að auðkenna virka röð og dálk :
=OR(CELL("row")=ROW(), CELL("col")= COLUMN())
Allar formúlurnar nota CELL fallið til að skila röð/dálkanúmeri valins reits.
- Smelltu á Format hnappinn, skiptu yfir í flipann Fill og veldu litinn sem þú vilt.
- Smelltu tvisvar á OK til að loka báðir gluggagluggarnir.
Ef þú telur þig þurfa ítarlegri leiðbeiningar, vinsamlegast sjáðu Hvernig á að búa til formúlubundna skilyrta sniðsreglu.
Í þessu dæmi völdum við OR formúlu til að skyggja bæði dálkinn og línuna í sama lit. Það tekur minni vinnu og hentar í flestum tilfellum.
Því miður er þessi lausn ekki eins góð og VBA-lausnin því hún krefst endurreikna blaðið handvirkt (með því að ýta á F9 takkann). Sjálfgefið er að Excel endurreikur vinnublað aðeins eftir að ný gögn eru slegin inn eða þeim sem fyrir eru breytt, en ekki þegar valið breytist. Svo þú velur annan reit - ekkert gerist. Ýttu á F9 - blaðið er endurnýjað, formúlan er endurreiknuð og auðkenningin er uppfærð.
Til að fá vinnublaðið endurreiknað sjálfkrafa í hvert sinn sem SelectionChange atburðurinn gerist geturðu sett þennan einfalda VBA kóða í kóðaeininguna á markblaðinu þínu eins og útskýrt er ífyrra dæmið:
Private Sub Worksheet_SelectionChange( ByVal Target As Range) Target.Calculate End SubKóðinn þvingar valið svið/reit til að endurreikna, sem aftur neyðir CELL fallið til að uppfæra og skilyrta sniðið til að endurspegla breytinguna.
Kostir : ólíkt fyrri aðferð hefur þessi ekki áhrif á núverandi snið sem þú hefur notað handvirkt.
Gallar : getur versna frammistöðu Excel.
- Til að skilyrta sniðið virki þarftu að þvinga Excel til að endurreikna formúluna við hverja valbreytingu (annaðhvort handvirkt með F9 takkanum eða sjálfkrafa með VBA). Þvingaðir endurútreikningar geta hægja á Excel. Þar sem kóðinn okkar endurreikur valið frekar en heilt blað verða neikvæð áhrif líklega aðeins áberandi á mjög stórum og flóknum vinnubókum.
- Þar sem CELL aðgerðin er fáanleg í Excel 2007 og nýrri mun aðferðin' virkar ekki í fyrri útgáfum.
Auðkenndu valda línu og dálk með því að nota skilyrt snið og VBA
Ef fyrri aðferðin hægir verulega á vinnubókinni þinni geturðu nálgast verkefnið öðruvísi - í staðinn að endurreikna vinnublað við hverja notandahreyfingu, fáðu virka línu/dálkanúmerið með hjálp VBA og birtu síðan þá tölu fyrir ROW() eða COLUMN() fallið með því að nota skilyrtar sniðformúlur.
Til að ná þessu,hér eru skrefin sem þú þarft að fylgja:
- Bættu nýju auðu blaði við vinnubókina þína og nefndu það Hjálparblað . Eini tilgangur þessa blaðs er að geyma tvær tölur sem tákna röðina og dálkinn sem inniheldur valið reit, svo þú getir örugglega falið blaðið síðar.
- Settu inn VBA fyrir neðan í kóðaglugganum á vinnublaðinu. þar sem þú vilt innleiða auðkenningu. Fyrir nákvæmar leiðbeiningar, vinsamlegast skoðaðu fyrsta dæmið okkar. Private Sub Worksheet_SelectionChange( ByVal Target As Range) Application.ScreenUpdating = False Worksheets( "Hjálparblað" ).Cells(2, 1) = Target.Row Worksheets( "Helper Sheet" ).Cells(2, 2) = Target.Column Application.ScreenUpdating = True End Sub
Kóðinn hér að ofan setur hnit virku línunnar og dálksins á blaðið sem heitir "Helper Sheet". Ef þú nefndir blaðið þitt öðruvísi í skrefi 1 skaltu breyta heiti vinnublaðsins í kóðanum í samræmi við það. Línunúmerið er skrifað í A2 og dálknúmerið í B2.
- Í markvinnublaðinu þínu skaltu velja allt gagnasafnið og búa til skilyrta sniðsreglu með formúlunum hér að neðan. Skref-fyrir-skref leiðbeiningar eru veittar í dæminu hér að ofan.
Og nú skulum við fara yfir þrjú helstu notkunartilvikin í smáatriðum.
Hvernig á að auðkenna virka línu
Til að auðkenna línuna þar sem bendillinn þinn er settur í augnablikinu skaltu setja upp skilyrta sniðsreglu með þessariformúla:
=ROW()='Helper Sheet'!$A$2
Í kjölfarið getur notandinn greinilega séð hvaða röð er valin:
Hvernig á að auðkenna virkan dálk
Til að auðkenna valda dálkinn skaltu gefa dálknúmerið í COLUMN fallið með því að nota þessa formúlu:
=COLUMN()='Helper Sheet'!$B$2
Nú, auðkenndur dálkur gerir þér kleift að lesa lóðrétt gögn á þægilegan og áreynslulausan hátt með áherslu á þau.
Hvernig á að auðkenna virka línu og dálk
Til að fá bæði valda línu og dálk skyggða sjálfkrafa í sama lit skaltu sameina ROW() og COLUMN() aðgerðir í eina formúlu:
=OR(ROW()='Helper Sheet'!$A$2, COLUMN()='Helper Sheet'!$B$2)
Viðeigandi gögn eru strax sett í fókus, svo þú getur forðast að mislesa þau.
Kostir : hámarksafköst; virkar í öllum Excel útgáfum
Gallar : lengsta uppsetningin
Svona á að auðkenna dálk og röð valinnar reits í Excel. Ég þakka þér fyrir lesturinn og hlakka til að sjá þig á blogginu okkar í næstu viku!
Æfa vinnubók til niðurhals
Auðkenna virka röð og dálk (.xlsm skrá)