ამ სახელმძღვანელოში თქვენ შეისწავლით 3 განსხვავებულ გზას Excel-ში არჩეული უჯრედის მწკრივისა და სვეტის დინამიურად მონიშვნისთვის.

დიდი სამუშაო ფურცლის დიდი ხნის განმავლობაში ნახვისას, თქვენ შეიძლება საბოლოოდ დაკარგოს კვალი იმისა, თუ სად არის თქვენი კურსორი და რომელ მონაცემებს უყურებთ. იმისათვის, რომ იცოდეთ ზუსტად სად იმყოფებით ნებისმიერ მომენტში, მიიღეთ Excel, რათა ავტომატურად მონიშნოს თქვენთვის აქტიური მწკრივი და სვეტი! ბუნებრივია, ხაზგასმა უნდა იყოს დინამიური და შეიცვალოს ყოველი სხვა უჯრედის არჩევისას. არსებითად, ეს არის ის, რის მიღწევასაც ვაპირებთ:

ავტომატურად მონიშნეთ არჩეული უჯრედის მწკრივი და სვეტი VBA-ით

ეს მაგალითი გვიჩვენებს, თუ როგორ შეგიძლიათ მონიშნოთ აქტიური სვეტი და მწკრივი პროგრამულად VBA-ით. ამისთვის ჩვენ გამოვიყენებთ SelectionChange მოვლენას Worksheet ობიექტის.

პირველ რიგში, თქვენ გაასუფთავებთ ფურცლის ყველა უჯრედის ფონის ფერს <დაყენებით. 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).

უპირატესობები : ყველაფერი კეთდება backend-ში; მომხმარებლის მხრიდან არ არის საჭირო კორექტირება/მორგება; მუშაობს Excel-ის ყველა ვერსიაში.

ნაკლოვანებები : არსებობს ორი არსებითი უარყოფითი მხარე, რაც ამ ტექნიკას გამოუყენებელს ხდის გარკვეულ პირობებში:

• კოდი ასუფთავებს ფონს სამუშაო ფურცლის ყველა უჯრედის ფერები . თუ თქვენ გაქვთ ფერადი უჯრედები, არ გამოიყენოთ ეს გამოსავალი, რადგან თქვენი მორგებული ფორმატირება დაიკარგება.
• ამ კოდის შესრულება ბლოკავს გაუქმების ფუნქციას ფურცელზე და თქვენ ვერ შეძლებთ მცდარი მოქმედების გაუქმებას Ctrl + Z დაჭერით.

მონიშნეთ აქტიური მწკრივი და სვეტი VBA-ს გარეშე

საუკეთესო, რაც შეგიძლიათ მიიღოთ არჩეული მწკრივის ხაზგასასმელად და / ან სვეტი VBA-ის გარეშე არის Excel-ის პირობითი ფორმატირება. მის დასაყენებლად, განახორციელეთ შემდეგი ნაბიჯები:

1. აირჩიეთ თქვენი მონაცემთა ბაზა, რომელშიც უნდა მოხდეს ხაზგასმა.
2. ჩანართზე მთავარი , ჩანართში სტილები ჯგუფში, დააწკაპუნეთ ახალი წესი .
3. ახალი ფორმატირების წესი დიალოგურ ფანჯარაში აირჩიეთ გამოიყენეთ ფორმულა, რათა დაადგინოთ რომელი უჯრედები ფორმატი .
4. ფორმატის მნიშვნელობებში, სადაც ეს ფორმულაარის true ველი, შეიყვანეთ ერთ-ერთი შემდეგი ფორმულა:

   აქტიური მწკრივის ხაზგასასმელად :

   =CELL("row")=ROW()

   აქტიური სვეტის ხაზგასასმელად :

   =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 და უფრო მაღალ ვერსიაში, მეთოდი არ მუშაობს ადრინდელ ვერსიებში.

მონიშნეთ არჩეული სტრიქონი და სვეტი პირობითი ფორმატირებისა და VBA-ს გამოყენებით

იმ შემთხვევაში, თუ წინა მეთოდი მნიშვნელოვნად შეანელებს თქვენს სამუშაო წიგნს, შეგიძლიათ დავალებას სხვაგვარად მიუდგეთ - ამის ნაცვლად. სამუშაო ფურცლის ხელახალი გაანგარიშებისას მომხმარებლის ყოველ გადაადგილებაზე, მიიღეთ აქტიური მწკრივის/სვეტის ნომერი VBA-ს დახმარებით და შემდეგ მიიტანეთ ეს რიცხვი ROW() ან COLUMN() ფუნქციაში პირობითი ფორმატირების ფორმულების გამოყენებით.

შეასრულე ეს,აქ არის ნაბიჯები, რომლებიც უნდა შეასრულოთ:

1. დაამატეთ ახალი ცარიელი ფურცელი თქვენს სამუშაო წიგნში და დაარქვით Helper Sheet . ამ ფურცლის ერთადერთი მიზანია შეინახოს ორი რიცხვი, რომლებიც წარმოადგენენ მწკრივს და სვეტს, რომელიც შეიცავს შერჩეულ უჯრედს, ასე რომ თქვენ შეგიძლიათ უსაფრთხოდ დამალოთ ფურცელი მოგვიანებით.
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

   ზემოაღნიშნული კოდი ათავსებს აქტიური მწკრივის და სვეტის კოორდინატებს ფურცელზე სახელად "Helper Sheet". თუ თქვენს ფურცელს სხვაგვარად დაარქვით 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 ფაილი)