Энэ зааварт та Excel програмын сонгосон нүдний мөр, баганыг динамикаар тодруулах 3 өөр аргыг сурах болно.

Их хэмжээний ажлын хуудсыг удаан үзэх үед эцэст нь таны курсор хаана байгаа болон ямар өгөгдлийг харж байгаагаа хянахаа больж магадгүй. Хэзээ ч хаана байгаагаа мэдэхийн тулд Excel програмыг ашиглан идэвхтэй мөр, баганыг автоматаар тодруулаарай! Мэдээжийн хэрэг, тодруулга нь динамик байх ёстой бөгөөд өөр нүд сонгох бүрт өөрчлөгдөх ёстой. Үндсэндээ энэ бол бидний хүрэхийг зорьж байгаа зүйл юм:

VBA-тай сонгосон нүдний мөр ба баганыг автоматаар тодруулах

Энэ жишээ нь VBA-ийн тусламжтайгаар идэвхтэй багана, мөрийг хэрхэн программчлан тодруулж болохыг харуулж байна. Үүний тулд бид Ажлын хуудас объектын SelectionChange үйл явдлыг ашиглах болно.

Эхлээд <-г тохируулснаар хуудасны бүх нүднүүдийн дэвсгэр өнгийг арилгана. 1>ColorIndex шинж чанарыг 0 болгож тохируулна уу. Дараа нь та идэвхтэй нүдний мөр ба баганыг бүхэлд нь тодруулж, тэдгээрийн ColorIndex шинж чанарыг хүссэн өнгөний индексийн дугаарт тохируулна уу.

Кодыг өөрчлөх

Хэрэв та өөрийн хэрэгцээнд зориулж кодыг өөрчлөхийг хүсвэл эдгээр жижиг зөвлөмжүүд хэрэг болно:

• Манай жишээ код нь дээрх gif-д үзүүлсэн хоёр өөр өнгийг ашигладаг - мөрийн хувьд 38, баганын хувьд 24 өнгөний индекс. Тодруулсан өнгийг өөрчлөхийн тулд тэдгээрийг өөрийн сонгосон ColorIndex кодоор солиход л болно.
• Мөр ба баганыг ижил аргаар өнгөтэй болгохын тулд ижил зүйлийг ашиглана уу. аль алиных нь өнгөт индексийн дугаар.
• Зөвхөн идэвхтэй мөр -г тодруулахын тулд энэ мөрийг хасах буюу тайлбар бичнэ үү: .EntireColumn.Interior.ColorIndex = 24
• Зөвхөн идэвхтэй баганыг тодруулахын тулд энэ мөрийг хасах буюу тайлбар бичнэ үү: .EntireRow.Interior.ColorIndex = 38

Кодыг хэрхэн нэмэх вэ өөрийн ажлын хуудас руу

Тухайн ажлын хуудасны арын дэвсгэр дээр кодыг чимээгүй гүйцэтгэхийн тулд та үүнийг ердийн модульд биш харин тухайн ажлын хуудсанд хамаарах кодын цонхонд оруулах хэрэгтэй. Үүнийг хийхийн тулд дараах алхмуудыг хийгээрэй:

1. Ажил дэвтэртээ Alt + F11 товчийг дарж VBA засварлагч руу очно уу.
2. Зүүн талд байгаа Project Explorer дээр та' Бүх нээлттэй ажлын дэвтэр болон тэдгээрийн ажлын хуудасны жагсаалтыг харах болно. Хэрэв танд харагдахгүй бол Ctrl + R товчлолыг ашиглан Project Explorer цонхыг харна уу.
3. Зорилтот ажлын номыг олоорой. Өөрийн Microsoft Excel-дObjects хавтсанд, тодруулахыг хүссэн хуудсан дээрээ давхар товшино уу. Энэ жишээнд энэ нь Хуудас 1 байна.
4. Баруун талд байгаа Кодын цонхонд дээрх кодыг буулгана уу.
5. Файлаа Макро идэвхжүүлсэн ажлын ном болгон хадгална уу. (.xlsm).

Давуу тал : бүх зүйл арын хэсэгт хийгддэг; хэрэглэгчийн талд ямар ч тохируулга/тохируулга хийх шаардлагагүй; Энэ нь Excel-ийн бүх хувилбарт ажилладаг.

Сул тал : тодорхой нөхцөлд энэ техникийг ашиглах боломжгүй болгодог хоёр чухал сул тал байдаг:

• Код арын дэвсгэрийг арилгадаг. Ажлын хуудасны бүх нүдний өнгө . Хэрэв танд өнгөт нүд байгаа бол энэ шийдлийг бүү ашигла, учир нь таны захиалгат формат алдагдах болно.
• Энэ кодыг ажиллуулснаар хуудас дээрх буцаах функцийг блоклодог. Та Ctrl + Z товчийг дарснаар алдаатай үйлдлийг буцаах боломжгүй болно.

VBA-гүй идэвхтэй мөр ба баганыг тодруулах

Сонгосон мөр болон /эсвэл VBA-гүй багана нь Excel-ийн нөхцөлт формат юм. Үүнийг тохируулахын тулд дараах алхмуудыг хийгээрэй:

1. Тодруулга хийх өгөгдлийн багцаа сонгоно уу.
2. Нүүр хуудас табын Styles бүлэгт Шинэ дүрэм -г товшино уу.
3. Шинэ форматын дүрэм харилцах цонхноос Аль нүдийг тодорхойлох томьёог ашиглахыг сонгоно уу. формат .
4. Энэ томъёоны утгыг форматлахүнэн талбарт дараах томьёоны аль нэгийг оруулна уу:

   идэвхтэй мөр -г тодруулахын тулд:

   =CELL("row")=ROW()

   идэвхтэй багана -г тодруулахын тулд :

   =CELL("col")=COLUMN()

   идэвхтэй мөр ба баганыг тодруулахын тулд:

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

   Бүх томьёо нь CELL функцийг ашиглана. сонгосон нүдний мөр/баганын дугаарыг буцаана.

5. Формат товчийг товшоод Дүүргэх таб руу шилжиж, дуртай өнгөө сонгоно уу.
6. OK товчийг хоёр удаа дарж хаа. харилцах цонхны аль алинд нь.

Хэрэв танд илүү нарийвчилсан заавар хэрэгтэй гэж бодож байвал Томьёонд суурилсан нөхцөлт форматын дүрмийг хэрхэн үүсгэх талаар үзнэ үү.

Энэ жишээний хувьд бид OR-ийг сонгосон. багана болон мөрийг хоёуланг нь ижил өнгөөр ​​сүүдэрлэх томъёо. Энэ нь бага ажил шаарддаг бөгөөд ихэнх тохиолдолд тохиромжтой.

Харамсалтай нь энэ шийдэл нь 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( "Helper Sheet" ).Cells(2, 2) = Target.Column Application.ScreenUpdating = True End Sub

   Дээрх код нь идэвхтэй мөр ба баганын координатыг "Тусламжийн хуудас" нэртэй хуудсанд байрлуулна. Хэрэв та 1-р алхамд хуудасныхаа нэрийг өөр өөрөөр нэрлэсэн бол кодын ажлын хуудасны нэрийг зохих ёсоор нь өөрчил. Мөрийн дугаарыг A2, баганын дугаарыг B2 гэж бичнэ.

3. Зорилтот ажлын хуудсандаа өгөгдлийн багцыг бүхэлд нь сонгоод доорх томьёогоор нөхцөлт форматлах дүрмийг үүсгэнэ үү. Дээрх жишээнд алхам алхмаар зааварчилгааг өгсөн болно.

Тэгээд одоо гурван үндсэн хэрэглээний тохиолдлыг дэлгэрэнгүй авч үзье.

Идэвхтэй мөрийг хэрхэн тодруулах талаар

Таны курсорыг байрлуулсан мөрийг тодруулахын тулд үүнтэй хамт нөхцөлт форматлах дүрмийг тохируулна уу.томъёо:

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

Үүний үр дүнд хэрэглэгч аль мөр сонгогдсоныг тодорхой харж чадна:

Идэвхтэй баганыг хэрхэн тодруулах вэ

Сонгосон баганыг тодруулахын тулд баганын дугаарыг COLUMN функцэд дараах томъёогоор оруулна:

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

Одоо тодруулсан багана нь босоо өгөгдлийг бүхэлд нь түүн дээр төвлөрүүлж хялбар, хялбар унших боломжийг танд олгоно.

Идэвхтэй мөр, баганыг хэрхэн тодруулах вэ

Сонгосон мөр, баганыг хоёуланг нь автоматаар ижил өнгөөр ​​сүүдэрлэхийн тулд ROW() болон COLUMN() функцуудыг нэг томъёонд нэгтгэнэ:

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

Холбогдох өгөгдлүүдийг нэн даруй анхааралдаа авснаар та үүнийг буруу уншихаас зайлсхийх боломжтой.

Давуу тал : оновчтой гүйцэтгэл; Энэ нь Excel-ийн бүх хувилбарт ажилладаг

Сул тал : хамгийн урт тохиргоо

Ингэж Excel-ийн сонгосон нүдний багана, мөрийг тодруулж болно. Уншиж байгаад баярлалаа, ирэх долоо хоногт манай блог дээр уулзахыг тэсэн ядан хүлээж байна!

Татаж авах дасгалын ном

Идэвхтэй мөр, баганыг тодруулах (.xlsm файл)