ამ სტატიაში მე გაჩვენებთ, თუ როგორ შეიძლება გაყინოთ Excel-ის სამუშაო ფურცლის პანელები აპლიკაციების Visual Basic-ით (VBA). Excel-ში მუშაობისას ხშირად გვჭირდება პანელის გაყინვა. სამუშაო ფურცელი მოხერხებულობისთვის და უკეთესი გამოცდილებისთვის. დღეს თქვენ შეიტყობთ, თუ როგორ შეგიძლიათ ამის გაკეთება VBA -ით.

გაყინეთ პანელები VBA-ით Excel-ში (სწრაფი ნახვა)

6077

ჩამოტვირთეთ სავარჯიშო სამუშაო წიგნი

ჩამოტვირთეთ ეს სავარჯიშო სამუშაო წიგნი ამ სტატიის კითხვის დროს ვარჯიშისთვის.

შესავალი Excel-ის გაყინვის პანელის შესახებ

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

მაგალითად, შეხედეთ ქვემოთ მოცემულ მონაცემთა ნაკრებს. აქ ჩვენ გავყინეთ სამუშაო ფურცელი მწკრივამდე 3 ( წლები ) და სვეტი B ( პროდუქტების სახელი ).

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

იგივე სვეტისთვის B , სანამ ჩვენ მარჯვნივ გადავალთ.

ახლა, სამუშაო ფურცლის პანელის ხელით გასაყინად, აირჩიეთ უჯრედი მწკრივისა და სვეტის შემდეგ (უჯრედი C4 ამ მაგალითში) და გადადით ნახვა >გაყინვის მინები > გაყინეთ პანელები Excel-ის ხელსაწყოთა ზოლში.

მხოლოდ მწკრივის გასაყინად აირჩიეთ მთელი რიგი და გადადით ნახვა > გაყინვის მინები > გაყინეთ პანელები Excel-ის ხელსაწყოთა ზოლში.

მსგავსად, მხოლოდ სვეტის გასაყინად, აირჩიეთ მთელი სვეტი და გადადით ნახვა > გაყინვის მინები > გაყინეთ პანელები Excel-ის ხელსაწყოთა ზოლში.

⧭ შენიშვნები:

• აირჩიეთ ზედა მწკრივის გაყინვა მხოლოდ ზედა მწკრივის გასაყინად.
• მსგავსად, აირჩიეთ პირველი სვეტის გაყინვა მხოლოდ პირველი სვეტის გასაყინად.

5 მეთოდი VBA-ით გაყინვის პანელების Excel-ში

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

1. Excel-ში VBA-ით მხოლოდ მწკრივის გაყინვა

პირველ რიგში, ვნახოთ, როგორ შეგვიძლია მხოლოდ მწკრივის გაყინვა VBA -ით.

როგორც ადრე განვიხილეთ, გაყინეთ მხოლოდ ერთი მწკრივი, ჯერ უნდა აირჩიოთ მთელი რიგი გასაყინად მწკრივის ქვემოთ (მწკრივი 4 ამ მაგალითში).

შემდეგ უნდა გამოიყენოთ გაყინვის პანელების ბრძანება.

ასე რომ, VBA კოდი იქნება:

⧭ VBA კოდი:

1632

⧭ გამომავალი:

გაუშვით ეს კოდი. და იპოვით აქტიურ სამუშაო ფურცელს გაყინულ მწკრივამდე 3 .

⧭ შენიშვნები:

• აქ ჩვენ გამოვიყენეთ უჯრედი C4 სამუშაო ფურცლის 4 რიგის ნებისმიერი უჯრედის ასარჩევად. შენაირჩიეთ ის თქვენი საჭიროების მიხედვით.
• კოდის ბოლო სტრიქონი Range(“C4”). აირჩიეთ არის მთელი რიგის არჩევის გაუქმების მიზნით 4 ( ნებისმიერი შერჩევის გაუქმება ნიშნავს ახალი შერჩევის არჩევას, როგორც Excel-ში რაღაც უნდა დარჩეს არჩეული). თუ გსურთ, შეგიძლიათ გამოტოვოთ ეს ხაზი.

დაწვრილებით: როგორ გავაყინოთ ზედა მწკრივი Excel-ში (4 მარტივი მეთოდი)

2. გაყინეთ მხოლოდ სვეტი VBA-ით Excel-ში

ჩვენ ვნახეთ, როგორ შეგვიძლია გავყინოთ მწკრივი VBA -ით. ახლა ვნახოთ, როგორ გავაყინოთ სვეტი VBA -ით.

მწკრივის მსგავსად, მხოლოდ სვეტის გასაყინად, ჯერ უნდა აირჩიოთ მთელი სვეტი მარჯვნივ, რათა გაყინოთ. (სვეტი C ამ მაგალითში).

შემდეგ თქვენ უნდა გამოიყენოთ Freeze Panes ბრძანება.

ასე რომ, VBA კოდი იქნება:

⧭ VBA კოდი:

2796

⧭ გამომავალი:

გაუშვით ეს კოდი. და იპოვით აქტიურ სამუშაო ფურცელს გაყინულ სვეტამდე C .

⧭ შენიშვნები:

• აქ ჩვენ გამოვიყენეთ უჯრედი C4 სამუშაო ფურცლის C სვეტის ნებისმიერი უჯრედის ასარჩევად. თქვენ ირჩევთ მას თქვენი საჭიროების მიხედვით.
• კოდის ბოლო სტრიქონი Range(“C4”). აირჩიეთ არის მთელი სვეტის არჩევის გაუქმების მიზნით C (ნებისმიერი შერჩევის გაუქმება ნიშნავს ახალი შერჩევის არჩევას, როგორც Excel-ში რაღაც უნდა დარჩეს არჩეული). თუ გსურთ, შეგიძლიათ გამოტოვოთ ეს ხაზი.

დაწვრილებით: როგორ გავყინოთ 2 სვეტიExcel-ში (5 მეთოდი)

3. გაყინეთ ორივე მწკრივი და სვეტი VBA-ით Excel-ში

ჩვენ ვნახეთ, თუ როგორ შეგვიძლია ცალკე გავყინოთ მწკრივი და სვეტი. ამჯერად, ვნახოთ, როგორ შეგვიძლია გავაყინოთ მწკრივი და სვეტი ერთად.

იმისთვის, რომ მწკრივისა და სვეტის ერთად გაყინოთ, თქვენ უნდა აირჩიოთ უჯრედი მწკრივის ქვემოთ გასაყინად და პირდაპირ სვეტამდე. უნდა იყოს გაყინული (უჯრედი C4 ამ მაგალითში).

შემდეგ თქვენ უნდა გამოიყენოთ Freeze Panes ბრძანება.

ასე რომ, VBA კოდი იქნება:

⧭ VBA კოდი:

2684

⧭ გამომავალი:

გაუშვით ეს კოდი. და იპოვით აქტიურ სამუშაო ფურცელს გაყინულ მწკრივამდე 3 და სვეტამდე C .

⧭ შენიშვნები:

• აქ ჩვენ გამოვიყენეთ უჯრედი C4 , რათა აირჩიოთ უჯრედი 3 მწკრივის ქვემოთ და მარჯვნივ B სვეტამდე. ეს არის უჯრედი C4 . თქვენ ირჩევთ მას თქვენი საჭიროების მიხედვით.

დაწვრილებით: როგორ გავაყინოთ არჩეული პანელები Excel-ში (10 გზა)

მსგავსი წაკითხვები:

• როგორ გავაყინოთ მრავალი პანელი Excel-ში (4 კრიტერიუმი)
• კლავიატურის მალსახმობი Excel-ში პანელის გასაყინად (3 მალსახმობი)
• როგორ გავყინოთ პირველი 3 სვეტი Excel-ში (4 სწრაფი გზა)

4. შექმენით მომხმარებლის ფორმა Excel-ში VBA პანელის გასაყინად

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

ახლა ჩვენ განვავითარებთ მომხმარებლის ფორმას, რათა მივიღოთ ყველაფერიცალკეული ამოცანები ერთი ინტერფეისის ფარგლებში.

⧭ ნაბიჯ-ნაბიჯ პროცედურა მომხმარებლის ფორმის შემუშავებისთვის:

⧪ ნაბიჯი 1:

• დააჭირეთ ALT+F11 თქვენს კლავიატურაზე, რათა გახსნათ Visual Basic
• Visual Basic რედაქტორში გადადით ჩასმა > UserForm ახალი მომხმარებლის ფორმის ჩასასმელად .

⧪ ნაბიჯი 2:

• ახალი UserForm სახელწოდებით UserForm1 შეიქმნება VBA
• მარცხნივ 1>UserForm , თქვენ მიიღებთ ToolBox სახელწოდებით Control . გადაიტანეთ მაუსი ხელსაწყოთა ყუთზე და მოძებნეთ TextBox (TextBox1) . ერთის პოვნის შემდეგ, გადაიტანეთ ის UserForm -ის ზევით.
• მსგავსად, გადაიტანეთ ListBox ( ListBox1 ) მარჯვნივ Textbox და CommandButton (Commandbutton1) UserForm -ის ქვედა მარჯვენა კუთხეში. შეცვალეთ CommandButton ჩვენება OK . თქვენი UserForm ახლა ასე უნდა გამოიყურებოდეს:

⧪ ნაბიჯი 3:

ჩადეთ მოდული ( ჩასმა > მოდული ) VBA ხელსაწყოთა ყუთიდან

⧪ ნაბიჯი 4 :

ჩადეთ შემდეგი VBA კოდი მოდულში .

7444

⧪ ნაბიჯი 5:

ორჯერ დააწკაპუნეთ CommandButton გამოსახულ როგორც OK . გაიხსნება პირადი ქვე, სახელწოდებით CommandButton1_Click . ჩადეთ შემდეგი კოდი იქ:

8769

⧪ ნაბიჯი6:

მსგავსად ორჯერ დააწკაპუნეთ TextBox1 . გაიხსნება პირადი ქვე, სახელწოდებით TextBox1_Change . ჩადეთ შემდეგი კოდი იქ.

1119

⧪ ნაბიჯი 7:

თქვენი UserForm ახლა მზად არის გამოყენება. აირჩიეთ უჯრედი ქვემოთ გასაყინ მწკრივში და მარჯვნივ გასაყინი სვეტისკენ (უჯრედი C4 აქ) და გაუშვით მაკრო სახელწოდებით Run_UserForm .

⧪ ნაბიჯი 8:

• ჩაიტვირთება UserForm . თქვენ იპოვით არჩეული უჯრედის მისამართს ( C4 ) TextBox -ში. თუ გსურთ, შეგიძლიათ შეცვალოთ ეს.
• შემდეგ აირჩიეთ ListBox -ში არსებული სამი ვარიანტიდან რომელიმე. აქ მსურს მწკრივისა და სვეტის გაყინვა, ამიტომ ავირჩიე ორივე მწკრივისა და სვეტის გაყინვა .
• შემდეგ დააწკაპუნეთ OK .

⧪ ნაბიჯი 9:

თქვენ იპოვით სამუშაო ფურცელს თქვენი სურვილის მიხედვით გაყინულ. (აქ გაყინულია მწკრივამდე 3 და სვეტი B ).

დაკავშირებული კონტენტი: როგორ გავყინოთ ჩარჩო Excel-ში (6 სწრაფი ხრიკი)

5. Excel-ში გაყინვის პანელების ალტერნატივა: გაყავით ფანჯარა VBA-ით

ჩვენ ბევრი ვისაუბრეთ გაყინვის პანელების შესახებ Excel-ში. ახლა ვნახოთ გაყინვის პანელების ძალიან სასარგებლო ალტერნატივა Excel-ში, Split Window ბრძანება.

შეგიძლიათ ActiveWindow.SplitRow ან ActiveWindow.SplitColumn VBA -ში სამუშაო ფურცლის მწკრივის ან სვეტის მიხედვით გასაყოფადბრძენი.

მაგალითად, სამუშაო ფურცლის გასაყოფად 3 მწკრივიდან, გამოიყენეთ:

4232

მსგავსად, სამუშაო ფურცლის გასაყოფად სვეტიდან B , გამოყენება:

3215

⧭ VBA კოდი:

2038

⧭ გამომავალი:

გაუშვით კოდი, ის გაყოფს აქტიურ სამუშაო ფურცელს 3 და სვეტიდან B .

დაკავშირებული კონტენტი : როგორ გამოვიყენოთ მორგებული გაყინვის პანელები Excel-ში (3 მარტივი გზა)

რა უნდა გახსოვდეთ

• გამოყენებამდე გაყინეთ პანელები Excel-ში უნდა გააალოთ ყველა გაყინვის პანელი უკვე გამოყენებული. წინააღმდეგ შემთხვევაში, Freeze Panes ბრძანება არ იმუშავებს.
• Freeze Panes ბრძანება არ იმუშავებს შერწყმული უჯრედების მეშვეობით. ამიტომ გაათავისუფლეთ ისინი სანამ გამოიყენებთ Freeze Panes ბრძანებას, თუ არსებობს.

დასკვნა

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