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

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

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

6 Excel VBA-ის მაგალითები დიაპაზონიდან ცხრილის შესაქმნელად

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

ვთქვათ, გვაქვს მარტივი მონაცემთა ნაკრები, რომელიც შეიცავს ზოგიერთ ელემენტს სვეტში B , ამ საქონლის რაოდენობა სვეტში C და მთლიანი გაყიდვები თითოეული ელემენტისთვის სვეტში D . ახლა ჩვენ გვინდა მონაცემთა დიაპაზონი გადავიყვანოთ ცხრილში. მოდით ვაჩვენოთ სხვადასხვა მაგალითები და ნაბიჯ-ნაბიჯ ინსტრუქციები ცხრილის შესაქმნელად დიაპაზონიდან B4:D9 Excel VBA-ით.

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

expression .Add(SourceType, Source, LinkSource, HasHeaders,Destination)

და გამოიყენეთ SourceType xlSrcRange .

1. Excel VBA დიაპაზონიდან ცხრილის გენერირებისთვის

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

ნაბიჯები:

• პირველ რიგში, გადადით Developer ჩანართზე ლენტიდან.
• მეორე, Code კატეგორიიდან დააწკაპუნეთ Visual Basic გასახსნელად Visual Basic რედაქტორი . ან დააჭირეთ Alt + F11 Visual Basic Editor გასახსნელად.
• ამის ნაცვლად, შეგიძლიათ უბრალოდ დააწკაპუნოთ მარჯვენა ღილაკით თქვენს სამუშაო ფურცელზე და გადახვიდეთ კოდის ნახვა . ეს ასევე გადაგიყვანთ Visual Basic რედაქტორში .

• ეს გამოჩნდება Visual Basic რედაქტორში სადაც ვწერთ ჩვენს კოდებს დიაპაზონიდან ცხრილის შესაქმნელად.
• მესამე, დააწკაპუნეთ მოდულზე ჩამოსაშლელი მენიუს ზოლიდან ჩასმა .

• ეს შექმნის მოდულს თქვენს სამუშაო წიგნში.
• და დააკოპირეთ და ჩასვით VBA კოდი ნაჩვენებია ქვემოთ.

VBA კოდი:

1489

• ამის შემდეგ გაუშვით კოდი RubSub ღილაკზე დაწკაპუნებით ან კლავიატურაზე დაჭერითმალსახმობი F5 .

თქვენ არ გჭირდებათ კოდის შეცვლა. ყველაფერი რაც შეგიძლიათ გააკეთოთ არის უბრალოდ შეცვალოთ დიაპაზონი თქვენი მოთხოვნების შესაბამისად.

• და ბოლოს, ნაბიჯების გადადგმა შექმნის ცხრილს დიაპაზონიდან B4:D9 .

VBA კოდის განმარტება

6694

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

7347

ეს არის ძირითადი კოდის ხაზი, რომლითაც დიაპაზონი გარდაიქმნება ცხრილად. როგორც უკვე ვიცით, რომ ListObjects.Add დიაპაზონი Excel-ის ცხრილად გადასაქცევად. და ჩვენ ვიყენებთ xlSrcRange როგორც წყაროს ტიპს. ასევე, ჩვენ ვაცხადებთ ჩვენს დიაპაზონს დიაპაზონი(“B4:D9”) . და ბოლოს, დაასახელეთ ჩვენი ცხრილი, როგორც Table1 .

1719

ეს დაასრულებს პროცედურას.

დაწვრილებით: როგორ განაახლოთ Pivot ცხრილის დიაპაზონი (5 შესაფერისი მეთოდი)

2. ცხრილის აგება დიაპაზონიდან Excel VBA-ს გამოყენებით

მოდით ვნახოთ სხვა მაგალითი დიაპაზონიდან ცხრილის ასაგებად Excel VBA-ს გამოყენებით.

STEPS:

• პირველ რიგში, გადადით Develope r ჩანართზე ლენტიდან.
• მეორე, დააწკაპუნეთ Visual Basic გასახსნელად Visual Basic Editor .
• Visual Basic Editor გახსნის კიდევ ერთი გზაა უბრალოდ დააჭირეთ Alt + F11 .
• ან დააწკაპუნეთ მარჯვენა ღილაკით ფურცელზე , შემდეგ აირჩიეთ კოდის ნახვა .
• შემდეგი, გადადით ჩასმა დააირჩიეთ მოდული ჩამოსაშლელი მენიუდან.
• და ეს გაიხსნება ვიზუალური ძირითადი ფანჯარა.
• ამის შემდეგ დააკოპირეთ და ჩასვით VBA კოდი ქვემოთ.

VBA კოდი:

3016

• შემდეგ, დააჭირეთ F5 ღილაკს ან დააწკაპუნეთ გაუშვით Sub ღილაკი კოდის გასაშვებად.

• და თქვენ მიიღებთ შედეგს როგორც ნაჩვენებია მეთოდი 1 .

VBA კოდის ახსნა

7836

DIM განცხადება VBA<2-ში> აღნიშნავს „ განაცხადე, “ და ის უნდა იყოს გამოყენებული ცვლადის გამოსაცხადებლად. ასე რომ, ჩვენ ვაცხადებთ ჩვენს დიაპაზონს tb2 და სამუშაო ფურცელს ws .

3211

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

4692

კოდის ამ ხაზით ჩვენ ვქმნით ცხრილს დიაპაზონიდან და ვასახელებთ ჩვენს ცხრილს Table2 .

დაწვრილებით: როგორ გამოვიყენოთ Excel ცხრილი VBA-ით (9 შესაძლო გზა)

3. შექმენით ცხრილი დიაპაზონიდან VBA-ით Excel-ში

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

ნაბიჯები:

• დასაწყებად აირჩიეთ მთელი დიაპაზონი, რომლის გადაქცევა გსურთ ცხრილად.
• მეორე, დააწკაპუნეთ დეველოპერი ჩანართზე ლენტზე.
• მესამე, გაუშვით Visual Basic Editor Visual-ზე დაწკაპუნებითBasic .
• ალტერნატიულად, შეგიძლიათ შეხვიდეთ Visual Basic Editor დაჭერით Alt + F11 .
• ან, მარჯვნივ -დააწკაპუნეთ ფურცელზე და აირჩიეთ კოდის ნახვა მენიუდან.
• შემდეგი, აირჩიეთ მოდული ჩამოსაშლელი ველიდან ჩასმა. .
• და გამოჩნდება ვიზუალური ძირითადი ფანჯარა.
• ჩაწერეთ კოდი იქ.

VBA კოდი:

8489

• და ბოლოს, დააჭირეთ F5 ღილაკს კოდის გასაშვებად.

• და ეს შექმნის ცხრილი მონაცემთა დიაპაზონიდან, როგორც მივიღეთ მეთოდი 1 .

დაწვრილებით: როგორ შევქმნათ ცხრილი Excel-ში (მორგებით )

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

• გამოთვლილი ველის ჯამი გაყოფილი რაოდენობაზე კრებსით ცხრილში
• როგორ ვაჩვენოთ სიხშირის ფარდობითი განაწილება Excel-ში
• Excel Pivot Table ჯგუფი კვირაში (3 შესაფერისი მაგალითი)
• [გამოსწორება] არ შეიძლება თარიღების დაჯგუფება Pivot Table-ში: 4 შესაძლო გადაწყვეტა
• როგორ შევქმნათ ამორტიზაციის ცხრილი Excel-ში (4 მეთოდი) <1 3>

4. გამოიყენეთ VBA დიაპაზონიდან დინამიური ცხრილის შესაქმნელად

მოდით, გადავხედოთ დიაპაზონიდან ცხრილის გენერირების სხვა გზას Excel VBA-ს გამოყენებით.

ნაბიჯები:

• დასაწყებად გახსენით ლენტი და აირჩიეთ დეველოპერი ვარიანტი.
• შემდეგ, Visual Basic რედაქტორზე წვდომისთვის დააწკაპუნეთ Visual Basic .
• დაჭერით Alt + F11 ასევე გამოჩნდება Visual Basicრედაქტორი .
• ალტერნატიულად, დააწკაპუნეთ მარჯვენა ღილაკით ფურცელზე და აირჩიეთ კოდის ნახვა მენიუდან, რომელიც გამოჩნდება.
• ახლა, ჩასმა ჩამოსაშლელი ვარიანტი, აირჩიეთ მოდული .
• შემდეგ დააკოპირეთ და ჩასვით VBA კოდი, რომელიც მოჰყვება.

VBA კოდი:

6348

• გაუშვით კოდი F5 ღილაკზე დაჭერით.

• როგორც ილუსტრირებულია მეთოდის 1 ილუსტრაციაში, ცხრილი აგებული იქნება დიაპაზონიდან.

VBA კოდის განმარტება

8894

ეს ხაზი მიუთითებს ქვეპროცედურის სახელს.

7113

ეს ორი სტრიქონი გამოიყენება ცვლადის დეკლარაციისთვის.

4934

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

5934

ესენი არიან, შესაბამისად, რათა იპოვონ ბოლო მწკრივი და ბოლო სვეტი.

4064

დიაპაზონი ცხრილის შესაქმნელად.

1467

შექმენით ცხრილი ზემოთ მითითებულ დიაპაზონში.

6180

ცხრილის სახელის მითითება

2591

დანიშნეთ ცხრილის სტილი.

დაწვრილებით: შექმენით ცხრილი Excel-ში მალსახმობების გამოყენებით (8 მეთოდი)

5. შექმენით დინამიური ცხრილი დიაპაზონიდან

ახლა, გადახედეთ სხვა Excel VBA მეთოდს დიაპაზონიდან ცხრილის შესაქმნელად.

ნაბიჯები:

• დასაწყებად გახსენით ლენტი და აირჩიეთ დეველოპერი ჩამოსაშლელი მენიუდან.
• შემდეგ აირჩიეთ Visual Basic გასახსნელად Visual Basic რედაქტორი .
• Visual Basic რედაქტორი ასევე შეიძლება იყოს წვდომა Alt + F11 დაჭერით.
• ალტერნატიულად, შეგიძლიათ დააწკაპუნოთ მაუსის მარჯვენა ღილაკით ფურცელზე და აირჩიოთ კოდის ნახვა ამომხტარი მენიუდან.
• ამის შემდეგ აირჩიეთ მოდული მოდულიდან 1>ჩასვით ჩასაშლელი მენიუ.
• შემდეგ დააკოპირეთ და ჩასვით შემდეგი VBA კოდი.

VBA კოდი:

3195

• ბოლოს, გაუშვით კოდი კლავიატურაზე F5 დაჭერით და შედეგს დაინახავთ სამუშაო ფურცელში.

• და, როგორც ნაჩვენებია მეთოდის 1 ილუსტრაციაში, ცხრილი აგებული იქნება დიაპაზონიდან.

დაწვრილებით: როგორ გახადეთ Excel-ის ცხრილები ლამაზად (8 ეფექტური რჩევა)

6. გამოიყენეთ Excel VBA დინამიური ცხრილის შესაქმნელად

მოდით გამოვიკვლიოთ დიაპაზონიდან ცხრილის აგების სხვა Excel VBA გზა.

ნაბიჯები:

• დასაწყისში გადადით დეველოპერი ჩანართზე > Visual Basic > ჩასმა > მოდული .
• ან, მარჯვენა დაწკაპუნებით სამუშაო ფურცელზე გაიხსნება ფანჯარა. იქიდან გადადით View Code .
• და ეს მიგიყვანთ Visual Basic Editor ველზე, სადაც შეგვიძლია დავწეროთ VBA მაკროები.
• მეორეს მხრივ, Alt + F11 დაჭერით ასევე გაიხსნება Visual Basic რედაქტორი .
• ამის შემდეგ აკრიფეთ VBA კოდი. .

VBA კოდი:

4684

• და გაუშვით კოდი, რომ ნახოთ შედეგი F5 კლავიშის დაჭერით .

• და, ცხრილი შეიქმნება დიაპაზონიდან, როგორც ნაჩვენებია <1 სურათზე>მეთოდი 1 .

დაწვრილებით: როგორ შევქმნათ ცხრილი Excel-ში მონაცემებით (5 გზა)

დასკვნა

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