Jei norite paryškinti aktyvios ląstelės eilutę ir stulpelį, jums padės žemiau pateiktas VBA kodas.
Taigi, mes naudosime „Excel“ darbalapio įvykių tvarkyklę. Kad darbalapio įvykis veiktų, kodas turi būti darbalapio objekte, o ne įprastas modulis. Renginys veiks tik tame lape, kuriame jis parašytas.
Aktyvaus langelio paryškinimo eilutei ir stulpeliui naudosime pasirinkimo keitimo įvykį.
Logika:
Logika paprasta. Norime nuspalvinti visą pasirinkimo eilutę ir stulpelį. Pasikeitus pasirinkimui, ankstesnio stulpelio ir eilutės spalva turėtų išnykti.
Kodas, skirtas paryškinti dabartinio pasirinkimo eilutę ir stulpelį:
Privatus antrinis darbalapis_SelectionChange („ByVal Target As Range“) Ląstelės.Interior.ColorIndex = xlColorIndexNone Target.EntireColumn.Interior.ColorIndex = 37 Target.EntireRow.Interior.ColorIndex = 37 Target.Interind.ColorInterColor
Kaip tai veikia?
Visų pirma, mes naudojame įvykį „Worksheet_SelectionChange“, kuris suaktyvinamas kiekvieną kartą, kai keičiate langelio, kuriame yra kodas, pasirinkimą.
Tada iš šio lapo pašaliname visas ląstelių spalvas, naudodami eilutę Cells.Interior.ColorIndex = xlColorIndexNone. (Taip, šis kodas išvalys visas spalvas, kurias padarėte lape, išskyrus sąlyginį formatavimą, kaip nurodyta aukščiau esančiame gif.
Tada mes nudažome visą stulpelį ir eilutę naudodami žemiau esančias eilutes.
Target.EntireColumn.Interior.ColorIndex = 37
Target.EntireRow.Interior.ColorIndex = 37
Galiausiai, išvalykite aktyvios ląstelės spalvą naudodami eilutę Target.Interior.ColorIndex = xlColorIndexNone.
Dabar kiekvieną kartą, kai perkelsite žymeklį į naują langelį, visos spalvos iš viso lapo. Tada eilutė ir stulpeliai bus paryškinti nurodytu spalvų indeksu, išskyrus pačią aktyvią langelį.
Aktyvaus langelio stulpelio ir eilutės paryškinimo būdai
Geriausias būdas yra lengvai rasti susijusią langelio informaciją struktūrinėje lentelėje.
Aukščiau pateikto kodo trūkumas
Aukščiau pateiktas kodas nuplauna visus kitus spalvų formatus. Bus išsaugotas tik sąlyginis formatavimas.
Taigi taip, vaikinai, tai buvo paprasčiausias būdas paryškinti aktyvios ląstelės eilutę ir stulpelį naudojant VBA. Yra ir kitų metodų. Apie juos galite perskaityti susijusiuose straipsniuose.
Jei turite kokių nors abejonių ar kokių nors kitų specialių reikalavimų, susijusių su šiuo straipsniu ar bet kuriuo kitu su „Excel“ susijusiu „VBA“ straipsniu, paklauskite žemiau esančiame komentarų skyriuje.
Atsisiųskite žemiau esantį darbo failą. Galite ištrinti lapo turinį ir naudoti kaip savo.
Darbo lapo keitimo įvykio naudojimas makrokomandai paleisti, kai atliekami bet kokie pakeitimai| Taigi, norėdami paleisti makrokomandą, kai lapas atnaujinamas, naudojame VBA darbalapio įvykius.
Vykdykite makrokomandą, jei lape bus atlikti pakeitimai nurodytame diapazone | Jei norite paleisti makrokomandą, kai pasikeičia nurodyto diapazono vertė, naudokite šį VBA kodą. Jis aptinka bet kokius pakeitimus, atliktus nurodytame diapazone, ir suaktyvina įvykį.
Užduoties įvykiai „Excel VBA“| Skaičiuoklės įvykis yra tikrai naudingas, kai norite, kad jūsų makrokomandos būtų paleistos, kai lape įvyksta nurodytas įvykis.
Populiarūs straipsniai:
50 „Excel“ nuorodų, skirtų produktyvumui padidinti | Greičiau atlikite savo užduotį. Šie 50 sparčiųjų klavišų dar labiau pagreitins jūsų darbą naudojant „Excel“.
„VLOOKUP“ funkcija „Excel“ | Tai yra viena iš dažniausiai naudojamų ir populiariausių „Excel“ funkcijų, naudojama norint ieškoti vertės iš įvairių diapazonų ir lapų.
COUNTIF „Excel 2016“ | Naudodami šią nuostabią funkciją, suskaičiuokite reikšmes su sąlygomis. Norint suskaičiuoti konkrečią vertę, nereikia filtruoti duomenų. Skaitiklio funkcija yra būtina norint paruošti prietaisų skydelį.
Kaip naudoti „SUMIF“ funkciją „Excel“ | Tai dar viena esminė prietaisų skydelio funkcija. Tai padeda apibendrinti vertes konkrečiomis sąlygomis.