Бұл оқулықта Excel бағдарламасында таңдалған ұяшықтың жолы мен бағанын динамикалық түрде бөлектеудің 3 түрлі әдісін үйренесіз.

Үлкен жұмыс парағын ұзақ уақыт қараған кезде, сіз курсорыңыздың қай жерде екенін және қай деректерді қарап жатқаныңызды қадағалай алмай қалуы мүмкін. Кез келген сәтте қай жерде екеніңізді білу үшін Excel бағдарламасын сіз үшін белсенді жолды және бағанды ​​автоматты түрде бөлектеңіз! Әрине, бөлектеу динамикалық болуы керек және басқа ұяшықты таңдаған сайын өзгеруі керек. Негізінде, біз мынаны мақсат етіп отырмыз:

Таңдалған ұяшықтың жолын және бағанын VBA көмегімен автоматты түрде бөлектеу

Бұл мысал VBA көмегімен белсенді баған мен жолды бағдарламалы түрде қалай бөлектеуге болатынын көрсетеді. Ол үшін біз Жұмыс парағы нысанының SelectionChange оқиғасын қолданамыз.

Біріншіден, <параметрін орнату арқылы парақтағы барлық ұяшықтардың өң түсін тазалайсыз. 1>ColorIndex сипатын 0-ге теңестіріңіз. Содан кейін олардың ColorIndex сипатын қажетті түстің индекс нөміріне орнату арқылы белсенді ұяшықтың бүкіл жолы мен бағанын бөлектейсіз.

Кодты теңшеу

Егер кодты қажеттіліктеріңізге бейімдегіңіз келсе, мына шағын кеңестер пайдалы болуы мүмкін:

• Біздің үлгі кодымыз жоғарыдағы gif-те көрсетілген екі түрлі түсті пайдаланады - жол үшін 38 түс индексі және баған үшін 24. ерекшелеу түсін өзгерту үшін, оларды өзіңіз таңдаған кез келген ColorIndex кодтарымен ауыстырыңыз.
• Жол мен бағанды ​​ бірдей бояуын алу үшін бірдей пайдаланыңыз. екеуі үшін де түсті индекс нөмірі.
• Тек белсенді жолды бөлектеу үшін мына жолды алып тастаңыз немесе түсініктеме беріңіз: .EntireColumn.Interior.ColorIndex = 24
• Тек белсенді бағанды бөлектеу үшін мына жолды алып тастаңыз немесе түсініктеме беріңіз: .EntireRow.Interior.ColorIndex = 38

Кодты қосу әдісі жұмыс парағыңызға

Кодтың белгілі бір жұмыс парағының фонында дыбыссыз орындалуы үшін оны қалыпты модульге емес, сол жұмыс парағына жататын код терезесіне енгізу керек. Оны орындау үшін мына қадамдарды орындаңыз:

1. Жұмыс кітабында VBA редакторына өту үшін Alt + F11 пернелер тіркесімін басыңыз.
2. Сол жақтағы Project Explorer бағдарламасында сіз' Барлық ашық жұмыс кітаптарының және олардың жұмыс парақтарының тізімін көресіз. Егер сіз оны көрмесеңіз, Project Explorer терезесін көру үшін Ctrl + R пернелер тіркесімін пайдаланыңыз.
3. Мақсатты жұмыс кітабын табыңыз. Өзінің Microsoft Excel бағдарламасындаОбъектілер қалтасында бөлектеуді қолданғыңыз келетін парақты екі рет басыңыз. Бұл мысалда бұл 1-парақ .
4. Оң жақтағы Код терезесінде жоғарыдағы кодты қойыңыз.
5. Файлды Макроспен жұмыс кітабы ретінде сақтаңыз. (.xlsm).

Артықшылықтары : барлығы серверде орындалады; пайдаланушы тарапынан ешқандай түзетулер/баптаулар қажет емес; барлық Excel нұсқаларында жұмыс істейді.

Кемшіліктері : бұл әдісті белгілі бір жағдайларда қолдануға болмайтын екі маңызды кемшілігі бар:

• Код фонды тазартады. жұмыс парағындағы барлық ұяшықтардың түстері . Түсті ұяшықтарыңыз болса, бұл шешімді пайдаланбаңыз, себебі реттелетін пішімдеуіңіз жоғалады.
• Осы кодты орындау парақта бұғаттау болдырмау функциясын және Ctrl + Z пернелерін басу арқылы қате әрекетті қайтара алмайсыз.

VBA жоқ белсенді жолды және бағанды ​​бөлектеңіз

Таңдалған жолды бөлектеу және /немесе VBA жоқ баған Excel бағдарламасының шартты пішімі болып табылады. Оны орнату үшін мына қадамдарды орындаңыз:

1. Бөлектеу орындалатын деректер жинағын таңдаңыз.
2. Басты бет қойындысындағы Стильдер тобында Жаңа ереже түймешігін басыңыз.
3. Жаңа пішімдеу ережесі тілқатысу терезесінде Қандай ұяшықтарды анықтау үшін формуланы пайдалануды таңдаңыз. пішім .
4. Пішім мәндерінде, бұл формулашын өрісіне мына формулалардың бірін енгізіңіз:

   белсенді жолды бөлектеу үшін:

   =CELL("row")=ROW()

   белсенді баған бөлектеу үшін :

   Сондай-ақ_қараңыз: Excel: сәйкестіктер мен айырмашылықтар үшін екі бағанды ​​салыстырыңыз

   =CELL("col")=COLUMN()

   белсенді жол мен бағанды бөлектеу үшін:

   =OR(CELL("row")=ROW(), CELL("col")= COLUMN())

   Барлық формулалар CELL функциясын пайдаланады. таңдалған ұяшықтың жол/баған нөмірін қайтарыңыз.

5. Формат түймесін басыңыз, Толтыру қойындысына ауысып, өзіңізге ұнайтын түсті таңдаңыз.
6. Жабу үшін OK түймесін екі рет басыңыз. диалогтық терезелердің екеуі де.

Егер сізге егжей-тегжейлі нұсқаулар қажет деп ойласаңыз, Формула негізінде шартты пішімдеу ережесін қалай жасау керектігін қараңыз.

Бұл мысал үшін НЕМЕСЕ таңдадық. баған мен жолды бірдей түсте көлеңкелеуге арналған формула. Бұл аз жұмысты қажет етеді және көп жағдайда қолайлы.

Өкінішке орай, бұл шешім VBA нұсқасы сияқты жақсы емес, себебі ол парақты қолмен қайта есептеуді қажет етеді (F9 пернесін басу арқылы). Әдепкі бойынша Excel жұмыс парағын жаңа деректерді енгізгеннен немесе барын өңдегеннен кейін ғана қайта есептейді, бірақ таңдау өзгерген кезде емес. Сонымен, сіз басқа ұяшықты таңдайсыз - ештеңе болмайды. F9 пернесін басыңыз - парақ жаңартылады, формула қайта есептеледі және бөлектеу жаңартылады.

SelectionChange оқиғасы болған сайын жұмыс парағын автоматты түрде қайта есептеу үшін. орын алса, осы қарапайым VBA кодын мақсатты парағыңыздың код модулінде түсіндірілгендей орналастыруға боладыалдыңғы мысал:

Код таңдалған ауқымды/ұяшықты қайта есептеуге мәжбүрлейді, бұл өз кезегінде CELL функциясын жаңартуға және шартты пішімдеуді көрсетуге мәжбүр етеді. өзгерту.

Артықшылықтары : алдыңғы әдістен айырмашылығы, бұл сіз қолдан қолданылған бар пішімдеуге әсер етпейді.

Кемшіліктері : мүмкін Excel өнімділігін нашарлатады.

• Шартты пішімдеу жұмыс істеуі үшін Excel бағдарламасын әрбір таңдау өзгерісінде формуланы қайта есептеуге мәжбүрлеу керек (F9 пернесі арқылы қолмен немесе VBA арқылы автоматты түрде). Мәжбүрлі қайта есептеулер Excel бағдарламасын баяулатуы мүмкін. Біздің код тұтас парақты емес, таңдауды қайта есептейтіндіктен, теріс әсер тек шын мәнінде үлкен және күрделі жұмыс кітаптарында байқалуы мүмкін.
• CELL функциясы Excel 2007 және одан жоғары нұсқаларында қолжетімді болғандықтан, әдіс жеңеді' t бұрынғы нұсқаларда жұмыс істемейді.

Шартты пішімдеу және VBA көмегімен таңдалған жолды және бағанды ​​бөлектеңіз

Алдыңғы әдіс жұмыс кітабыңызды айтарлықтай баяулатқан жағдайда, тапсырманы басқаша орындауға болады - оның орнына пайдаланушының әрбір қозғалысы кезінде жұмыс парағын қайта есептеу үшін VBA көмегімен белсенді жол/баған нөмірін алыңыз, содан кейін шартты пішімдеу формулаларын пайдалану арқылы ROW() немесе COLUMN() функциясына осы нөмірді көрсетіңіз.

үшін. мұны орындау,мына қадамдарды орындау қажет:

1. Жұмыс кітабыңызға жаңа бос парақ қосыңыз және оны Анықтама парағы деп атаңыз. Бұл парақтың жалғыз мақсаты таңдалған ұяшықты қамтитын жол мен бағанды ​​көрсететін екі санды сақтау болып табылады, осылайша парақты кейінірек қауіпсіз түрде жасыра аласыз.
2. Төмендегі VBA мәнін жұмыс парағының код терезесіне енгізіңіз. бөлектеуді жүзеге асырғыңыз келетін жерде. Егжей-тегжейлі нұсқауларды бірінші мысалға қараңыз. Private Sub Worksheet_SelectionChange( ByVal Target As Range) Application.ScreenUpdating = False Worksheets( "Helper Sheet" ).Cells(2, 1) = Target.Row Worksheets( "Анықтамалық парақ" ).Cells(2, 2) = Target.Column Application.ScreenUpdating = True End Sub

   Жоғарыдағы код белсенді жолдың және бағанның координаттарын "Анықтама парағы" деп аталатын параққа орналастырады. 1-қадамда парақты басқаша атасаңыз, кодтағы жұмыс парағының атауын сәйкесінше өзгертіңіз. Жол нөмірі А2, баған нөмірі В2 деп жазылады.

3. Мақсатты жұмыс парағында бүкіл деректер жиынын таңдап, төмендегі формулалармен шартты пішімдеу ережесін жасаңыз. Қадамдық нұсқаулық жоғарыда келтірілген мысалда берілген.

Ал енді үш негізгі қолдану жағдайын егжей-тегжейлі қарастырайық.

Белсенді жолды қалай бөлектеуге болады

Меңзеріңіз орналасқан жолды бөлектеу үшін осы арқылы шартты пішімдеу ережесін орнатыңыз.формула:

=ROW()='Helper Sheet'!$A$2

Нәтижесінде пайдаланушы қазіргі таңда қай жол таңдалғанын анық көре алады:

Белсенді бағанды ​​қалай бөлектеуге болады

Таңдалған бағанды ​​бөлектеу үшін мына формуланы пайдаланып баған нөмірін БАҒАН функциясына беріңіз:

=COLUMN()='Helper Sheet'!$B$2

Енді бөлектелген баған толығымен оған назар аудара отырып, тік деректерді ыңғайлы және қиындықсыз оқуға мүмкіндік береді.

Белсенді жол мен бағанды ​​қалай бөлектеуге болады

Таңдалған жолды да, бағанды ​​да бір түсте автоматты түрде көлеңкелеу үшін ROW() және COLUMN() функцияларын бір формулаға біріктіріңіз:

=OR(ROW()='Helper Sheet'!$A$2, COLUMN()='Helper Sheet'!$B$2)

Тиісті деректер бірден назарға алынады, сондықтан сіз оны қате оқудан аулақ бола аласыз.

Артықшылықтары : оңтайландырылған өнімділік; барлық Excel нұсқаларында жұмыс істейді

Кемшіліктері : ең ұзақ орнату

Міне, Excel бағдарламасында таңдалған ұяшықтың баған мен жолын ерекшелеу әдісі. Оқығаныңыз үшін алғыс айтамын және сізді келесі аптада біздің блогта күтемін!

Жүктеп алуға арналған жұмыс кітабы

Белсенді жол мен бағанды ​​бөлектеу (.xlsm файлы)