Koordenatuen hautaketa

Monitore handia duzu, baina lan egiten dituzun mahaiak are handiagoak dira. Eta, pantailari begira beharrezko informazioaren bila, beti dago aukera zure begiak hurrengo lerrora "irrarazi" eta okerreko norabidean begiratzeko. Badakit ere, halakoetan, beti egurrezko erregela bat gertu edukitzen dutenak monitorearen lerroari lotzeko. Etorkizuneko teknologiak! 

Eta uneko errenkada eta zutabea nabarmentzen badira gelaxka aktiboa orrian zehar mugitzen denean? Horrelako koordenatuen hautaketa moduko bat:

Erregela bat baino hobe, ezta?

Hau ezartzeko konplexutasun ezberdineko hainbat modu daude. Metodo bakoitzak bere alde onak eta txarrak ditu. Ikus ditzagun xehetasunez.

Metodoa 1. Bistakoa. Uneko errenkada eta zutabea nabarmentzen dituen makroa

Gure arazoa "kopetean" konpontzeko modurik nabarmenena - fitxako hautapenaren aldaketaren jarraipena egingo duen makro bat behar dugu eta uneko gelaxkaren errenkada eta zutabe osoa hautatuko duena. Desiragarria da, halaber, funtzio hau behar izanez gero gaitu eta desgaitu ahal izatea, horrela gurutze-formako hautapen batek ez diezagun eragozten, adibidez, formulak sartzea, baizik eta zerrendan begiratu behar dugunean beharrezkoak direnen bila. informazioa. Honek orri-moduluan gehitu beharko diren hiru makroetara (hautatu, gaitu eta desgaitu) garamatza.

Ireki koordenatuen aukeraketa bat lortu nahi duzun taula duen orri bat. Egin klik eskuineko botoiarekin fitxa fitxan eta hautatu komandoa testuinguru-menuan Jatorrizko testua (Iturburu kodea).Visual Basic Editor leihoa ireki behar da. Kopiatu hiru makro hauen testu hau bertan:

Dim Coord_Selection As Boolean 'Aldagai globala hautapenaren aktibatuta/desaktibatuta Sub Selection_On() 'Makroa hautatzean Coord_Selection = True End Sub Selection_Off() 'Makroa desaktibatuta aukeraketa Coord_Selection = False End Sub 'Hautaketa egiten duen prozedura nagusia Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim WorkRange As Range If Target.Cells.Count > 1 Then Exit Sub 'gelaxka 1 baino gehiago hautatzen bada, irten If Coord_Selection = False Then Exit Sub' aukeraketa desaktibatuta badago, irten Application.ScreenUpdating = False Ezarri WorkRange = Barrutia ("A6:N300") 'hautapena ikusgai dagoen lan-barrutiaren helbidea

Aldatu lan-barrutiaren helbidea zurea; barruti horretan funtzionatuko du gure hautaketak. Ondoren, itxi Visual Basic editorea eta itzuli Excel-era.

Sakatu teklatuko lasterbidea ALT + F8erabilgarri dauden makroen zerrenda duen leiho bat irekitzeko. Makroa Hautaketa_Aktibatuta, asma dezakezun bezala, uneko orriko koordenatuen hautaketa eta makroa barne hartzen ditu Hautaketa_Desaktibatuta – itzaltzen du. Leiho berean, botoian klik eginez parametroak (Aukerak) Makro hauei teklatuko lasterbideak esleitu diezazkiekezu erraz abiarazteko.

Metodo honen abantailak:

  • ezartzeko erraztasun erlatiboa
  • hautapena - eragiketa kaltegabea da eta ez du inola ere orri-gelaxken edukia edo formatua aldatzen, dena bere horretan geratzen da

Metodo honen alde txarrak:

  • hautapen horrek ez du behar bezala funtzionatzen fitxan gelaxka bateratuak badaude - batasunean sartutako errenkada eta zutabe guztiak aldi berean hautatzen dira
  • Ezabatu tekla nahi gabe sakatzen baduzu, gelaxka aktiboa ez ezik, hautatutako eremu osoa garbituko da, hau da, errenkada eta zutabe osoko datuak ezabatu

2. metodoa. Jatorrizkoa. CELL + Baldintzapeko formatu funtzioa

Metodo hau, pare bat eragozpen baditu ere, oso dotorea iruditzen zait. Excel-eko tresnak soilik erabiliz zerbait ezartzeko, gutxieneko VBA-n programazioan sartzea acrobazia da 😉

Metodoa CELL funtzioa erabiltzean oinarritzen da, gelaxka jakin bati buruzko informazio ezberdin asko eman dezake: altuera, zabalera, errenkada-zutabe-zenbakia, zenbaki-formatua, etab. Funtzio honek bi argumentu ditu:

  • parametrorako kode-hitza, adibidez, "zutabea" edo "errenkada"
  • parametro honen balioa zehaztu nahi dugun gelaxkaren helbidea

Trikimailua da bigarren argumentua hautazkoa dela. Zehazten ez bada, uneko gelaxka aktiboa hartzen da.

Metodo honen bigarren osagaia baldintzapeko formatua da. Excel funtzio oso erabilgarria honek gelaxkak automatikoki formateatzeko aukera ematen du zehaztutako baldintzak betetzen badituzte. Bi ideia hauek bakarrean konbinatzen baditugu, hurrengo algoritmoa lortuko dugu gure koordenatuen hautaketa baldintzapeko formatuaren bidez ezartzeko:

  1. Gure taula hautatzen dugu, hau da, etorkizunean koordenatuen hautaketa bistaratu behar diren gelaxkak.
  2. Excel 2003 eta zaharragoetan, ireki menua Formatua – Baldintzapeko formatua – Formula (Formatua — Baldintzapeko formatua — Formula). Excel 2007 eta berriagoa - egin klik fitxan Hasiera (Hasiera)botoia Baldintzapeko formatua - Sortu araua (Formatu baldintzatua — Sortu araua) eta aukeratu arau mota Erabili formula bat zein gelaxka formateatu zehazteko (Erabili formula)
  3. Sartu gure koordenatuak aukeratzeko formula:

    =EDO(GELAXA(“erranka”)=ERRENKADA(A2),GELAXA(“zutabea”)=ZUTABE (A2))

    =EDO(GELAXA(«erranka»)=ERRENKADA(A1),GELAXA(«zutabea»)=ZUTABE (A1))

    Formula honek egiaztatzen du taulako gelaxka bakoitzaren zutabe-zenbakia uneko gelaxkaren zutabe-zenbakia berdina den. Zutabeekin ere. Horrela, uneko gelaxkarekin bat datorren zutabe-zenbakia edo errenkada-zenbakia duten gelaxkak bakarrik beteko dira. Eta hau da lortu nahi dugun gurutze formako koordenatu-hautapena.

  4. prentsa Esparru (Formatua) eta ezarri betetzeko kolorea.

Ia prest dago dena, baina ñabardura bat dago. Kontua da Excel-ek ez duela hautapen aldaketa bat fitxako datuen aldaketa gisa hartzen. Eta, ondorioz, ez du abiarazten formulen birkalkulua eta baldintzapeko formatua berriro koloreztatzea gelaxka aktiboaren posizioa aldatzen denean soilik. Hori dela eta, gehi diezaiogun makro sinple bat hori egingo duen orri-moduluari. Egin klik eskuineko botoiarekin fitxa fitxan eta hautatu komandoa testuinguru-menuan Jatorrizko testua (Iturburu kodea).Visual Basic Editor leihoa ireki behar da. Kopiatu makro sinple honen testu hau bertan:

Private Sub Worksheet_SelectionChange(ByVal Target As Range As) ActiveCell.Calculate End Sub

Orain, hautaketa aldatzen denean, formula funtzioarekin berriro kalkulatzeko prozesua abiaraziko da CELL baldintzapeko formatuan eta uneko errenkada eta zutabea gainezka.

Metodo honen abantailak:

  • Baldintzapeko formatuak ez du taularen formatu pertsonalizatua hausten
  • Hautapen aukera honek ondo funtzionatzen du bateratutako gelaxkekin.
  • Ez dago arriskurik gabe datuen errenkada eta zutabe osoa ezabatzeko ustekabean klik eginez gero Ezabatu.
  • Makroak gutxien erabiltzen dira

Metodo honen alde txarrak:

  • Baldintzapeko formatua egiteko formula eskuz sartu behar da.
  • Ez dago formatua gaitzeko/desgaitzeko modu azkarrik; beti dago gaituta araua ezabatu arte.

3. metodoa. Optimoa. Baldintzapeko formatua + Makroak

Urrezko esanahia. Orrian hautapena jarraitzeko mekanismoa erabiltzen dugu metodo-1-ko makroak erabiliz eta nabarmentze segurua gehitzen diogu metodo-2-ko formatu baldintzatua erabiliz.

Ireki koordenatuen aukeraketa bat lortu nahi duzun taula duen orri bat. Egin klik eskuineko botoiarekin fitxa fitxan eta hautatu komandoa testuinguru-menuan Jatorrizko testua (Iturburu kodea).Visual Basic Editor leihoa ireki behar da. Kopiatu hiru makro hauen testu hau bertan:

Dim Coord_Selection As Boolean Sub Selection_On() Coord_Selection = True End Sub Sub Selection_Off() Coord_Selection = False End Azpi pribatua Worksheet_SelectionChange(ByVal Target As Range) Dim WorkRange As Range, CrossRange As Range Set WorkRange = Range("A7:N300") 'адрес рабочего диапазона с таблицей Target.Count > 1 Then Exit Sub If Coord_Selection = False Then WorkRange.FormatConditions.Delete Exit End If Application.ScreenUpdating Ezartzea bada Ezartzea (Tartu Ezartzea) Interakzioa Ezartzea(Tartu Ezartzea) = Lan-Barrutia Ezartzea. WorkRange, Union(Target.EntireRow, Target.EntireColumn)) WorkRange.FormatConditions.Delete CrossRange.FormatConditions.Add Type:=xlExpression, Formula1:="=1" CrossRange.FormatConditions(1).Interior.ColorIndex = 33 Target.FormatConditions .Ezabatu End If End Sub

Ez ahaztu lan barrutiaren helbidea zure mahaiko helbidera aldatzea. Itxi Visual Basic editorea eta itzuli Excel-era. Gehitutako makroak erabiltzeko, sakatu teklatuko lasterbidea ALT + F8  eta jarraitu 1. metodoaren modu berean. 

4. metodoa. Ederra. FollowCellPointer gehigarria

Excel MVP Jan Karel Pieterse Herbehereak doako gehigarri bat ematen du bere webgunean JarraituCellPointer(36Kb), arazo bera konpontzen duena, makroak erabiliz gezi-lerro grafikoak marraztuz uneko errenkada eta zutabea nabarmentzeko:

 

Irtenbide polita. Ez leku batzuetan akatsik gabe, baina merezi du probatzea. Deskargatu artxiboa, deskonpaktatu diskoan eta instalatu gehigarria:

  • Excel 2003 eta zaharragoetan - menuaren bidez Zerbitzua – Gehigarriak – Ikuspegi orokorra (Tresnak — Gehigarriak — Arakatu)
  • Excel 2007 eta geroago, bidez Fitxategia – Aukerak – Gehigarriak – Joan – Arakatu (Fitxategia — Excel Aukerak — Gehigarriak — Joan — Arakatu)

  • Zer dira makroak, non txertatu makro-kodea Visual Basic-en

 

Utzi erantzun bat