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

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

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

8 მარტივი მაგალითები VBA-ის ასარჩევად UsedRange სვეტში

შემდეგ სურათზე , ჩვენ შეგვიძლია დავინახოთ მონაცემთა ნაკრები, რომელსაც გამოვიყენებთ ყველა მაგალითისთვის. მონაცემთა ნაკრები შეიცავს გამყიდველების სახელებს , მათ მდებარეობას , რეგიონს, და გაყიდვების „ სულ თანხას “. ამ მონაცემთა ბაზაში გამოყენებული დიაპაზონი განიხილება სათაურის ჩათვლით. ასე რომ, გამოყენებული დიაპაზონი შემდეგ მონაცემთა ნაკრებში არის ( B2:E15 ).

1. აირჩიეთ UsedRange სვეტში VBA-ით Excel-ში

უპირველეს ყოვლისა, ჩვენ შევარჩევთ ყველა სვეტს ჩვენი მონაცემთა ნაკრებიდან. ამისათვის ჩვენ გამოვიყენებთ VBA select UsedRange თვისებას სვეტებში. ვნახოთ ამ მეთოდის შესრულების ნაბიჯები.

STEPS:

• დასაწყისად, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით სახელად აქტიურ ფურცელზე „ Select_Columns “.
• გარდა ამისა, აირჩიეთ ვარიანტი „ კოდის ნახვა “.

• შემდეგ, ზემოაღნიშნული მოქმედება ხსნის ცარიელ ადგილს VBA კოდის ფანჯარა ამ სამუშაო ფურცლისთვის. ჩვენ ასევე შეგვიძლია მივიღოთ ეს კოდის ფანჯარა Alt + F11 დაჭერით.
• შემდეგი, აკრიფეთ შემდეგი კოდი კოდის ფანჯარაში:

2540

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

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

2. გამოიყენეთ VBA კოპირებისთვის მთელი UsedRange სვეტში

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

ნაბიჯები:

• პირველ რიგში, გადადით აქტიურ სამუშაო ფურცლის ჩანართზე სახელად ' კოპირება '.
• შემდეგ, დააწკაპუნეთ მარჯვენა ღილაკით ამ ჩანართზე და აირჩიეთ ვარიანტი „ კოდის ნახვა “.

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

3712

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

• საბოლოოდ, ჩვენ შეგვიძლია დავინახოთ შემდეგი შედეგი. ასევე, ჩვენ შეგვიძლია დავინახოთ საზღვარი გამოყენებული დიაპაზონის გარშემო. ეს მიუთითებს, რომ კოდმა დააკოპირა მონაცემებიამ საზღვრის შიგნით.

წაიკითხეთ მეტი: Excel VBA: დააკოპირეთ დინამიური დიაპაზონი სხვა სამუშაო წიგნში

3. დათვლა ნომერი სვეტების UsedRange გამოყენებით VBA

მესამე მაგალითში, ჩვენ დავთვლით სვეტების რაოდენობას ჩვენს მონაცემთა ბაზაში excel-ის გამოყენებით VBA აირჩიეთ გამოყენებული დიაპაზონი მეთოდი სვეტში. . ეს მაგალითი დააბრუნებს სვეტების მთლიან რაოდენობას გამოყენებული დიაპაზონის შიგნით ჩვენს მონაცემთა ბაზაში შეტყობინების ყუთში. მიჰყევით ქვემოთ მოცემულ ნაბიჯებს ამ მეთოდის შესასრულებლად.

STEPS:

• პირველ რიგში, აირჩიეთ აქტიური ფურცელი სახელად „ Count_Columns “.
• მეორე, დააწკაპუნეთ მარჯვენა ღილაკით აქტიურ ფურცლის სახელზე და დააწკაპუნეთ ოფციაზე „ კოდის ნახვა “.

<. 3>

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

6675

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

• ბოლოს, ჩვენ ვიღებთ შედეგს შეტყობინების ყუთში. გამოყენებული დიაპაზონში სვეტების რაოდენობაა 4 .

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

4. Excel VBA ბოლო სვეტის რაოდენობის დასათვლელად გამოყენებული დიაპაზონში

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

ნაბიჯები:

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

• ასე რომ, ზემოაღნიშნული ბრძანება ხსნის ცარიელ VBA კოდის ფანჯარას ამ სამუშაო ფურცლისთვის. კოდის ფანჯრის გახსნის ალტერნატიული გზაა დააჭირეთ Alt + F11 .
• შემდეგ, ჩადეთ შემდეგი კოდი კოდის ფანჯარაში:

7799

• ახლა დააწკაპუნეთ Run ან დააჭირეთ F5 კლავიშს კოდის გასაშვებად.

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

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

• როგორ გამოვიყენოთ VBA თითოეული მწკრივისთვის დიაპაზონში Excel-ში
• გამოიყენეთ VBA დიაპაზონის ასარჩევად აქტიური უჯრედიდან Excel-ში (3 მეთოდი)
• Excel მაკრო: დაალაგეთ მრავალი სვეტი დინამიური დიაპაზონით (4 მეთოდი)

5. აირჩიეთ ბოლო სვეტის ბოლო უჯრედი UsedRange-დან VBA

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

ნაბიჯები:

• პირველ რიგში, აირჩიეთ აქტიური ფურცელი სახელად ' ბოლო_უჯრედი '.
• შემდეგ, დააწკაპუნეთ მარჯვენა ღილაკით ამ ფურცლის სახელზე. აირჩიეთ ვარიანტი „ კოდის ნახვა “.

• შემდეგ, ჩვენ ვიღებთ ცარიელ VBA კოდის ფანჯარას. . ასევე, შეგვიძლია დავაჭიროთ Alt + F11 რომ გაიხსნას კოდის ფანჯარა.
• ამის შემდეგ, კოდის ფანჯარაში ჩაწერეთ შემდეგი კოდი:

3546

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

• საბოლოოდ, ჩვენ ვხედავთ შედეგს შემდეგ სურათზე. ბოლო სვეტის არჩეული ბოლო უჯრედი არის უჯრედი E15 .

6. იპოვეთ არჩეული UsedRange-ის უჯრედების დიაპაზონი Excel VBA

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

STEPS:

• დასაწყისში დააწკაპუნეთ მაუსის მარჯვენა ღილაკით აქტიურ ფურცლის ჩანართზე სახელად „ უჯრედის დიაპაზონის პოვნა “.
• მეორე, აირჩიეთ ვარიანტი „ კოდის ნახვა “.

• ის გახსნის ცარიელ VBA კოდის ფანჯარას. ამ კოდის ფანჯრის გახსნის კიდევ ერთი მეთოდია დააჭირეთ Alt + F11 .
• მესამე, შეიყვანეთ შემდეგი კოდი კოდის ფანჯარაში:

1957

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

• ბოლოს, შეტყობინების ყუთი, როგორიცაა შემდეგი სურათი გვიჩვენებს შედეგს.

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

• VBA სტრიქონების ციკლისთვის და სვეტები დიაპაზონში Excel-ში (5 მაგალითი)
• როგორ გადავიტანოთ დიაპაზონი მასივში Excel VBA-ში (3 გზა)

7. ჩასმა VBA UsedRange თვისება ცარიელი უჯრედების დასათვლელად

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

STEPS:

• პირველ რიგში, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით აქტიურ ფურცლის ჩანართზე სახელად ' ცარიელი_უჯრედები '.
• შემდეგ, აირჩიეთ ვარიანტი „ კოდის ნახვა “.

• ზემოხსენებული მოქმედება ხსნის ცარიელ VBA კოდის ფანჯარას. კოდის ფანჯრის გახსნის ალტერნატიული გზაა დააჭირეთ Alt + F11 .
• შემდეგ, ჩადეთ შემდეგი კოდი კოდის ფანჯარაში:

7659

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

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

8. VBA UsedRange პირველი ცარიელი უჯრედის დასადგენად Excel-ის სვეტში

ბოლო მაგალითში ჩვენ გამოვიყენებთ excel-ს VBA სვეტში Used Range თვისების შესარჩევად, რათა აღმოვაჩინოთ პირველი ცარიელი უჯრედი ჩვენს Excel-ის სამუშაო ფურცელში. ეს მეთოდი განსაზღვრავს კონკრეტული სვეტის პირველ ცარიელ უჯრედს. ცარიელი უჯრედი ყოველთვის იქნება მონაცემთა ნაკრების გამოყენებული დიაპაზონის გარეთ. ასე რომ, თუ რომელიმე უჯრედი ცარიელია ან ცარიელია გამოყენებული დიაპაზონში, ის არ განიხილება ამ მეთოდში. ახლა მიჰყევით ქვემოთ მოცემულ ნაბიჯებს ამ მეთოდის შესასრულებლად.

STEPS:

• დასაწყისად, დააწკაპუნეთ მარჯვენა ღილაკით აქტიურზე ფურცლის ჩანართი სახელად „ First_Empty “.
• გარდა ამისა, აირჩიეთ ვარიანტი „ კოდის ნახვა “.

• ის გახსნის ცარიელ VBA კოდის ფანჯარას. ჩვენ ასევე შეგვიძლია დავაჭიროთ Alt + F11 კოდის ფანჯრის გასახსნელად.
• ასევე, ჩაწერეთ შემდეგი კოდი ცარიელ VBA კოდის ფანჯარაში:

2626

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

• და ბოლოს, ზემოთ მოცემული კოდი ჩასვამს მნიშვნელობას ' FirstEmptyCell ' უჯრედში E16 . ეს არის E სვეტის პირველი ცარიელი უჯრედი მონაცემთა ნაკრების გამოყენებული დიაპაზონის შემდეგ.

წაიკითხეთ მეტი: Excel VBA to დაარეგულირეთ დიაპაზონი ცარიელ უჯრედამდე (4 მაგალითი)

დასკვნა

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