Სარჩევი
ეს სტატია გთავაზობთ პასუხებს თქვენს შეკითხვებზე როგორ დავამატოთ ფურცელი სახელით Excel-ში VBA . თუ თქვენ ეძებთ ასეთ უნიკალურ ხრიკებს, თქვენ სწორ ადგილას მოხვედით. აქ განვიხილავთ 6 მარტივ & Excel-ში სახელის მქონე ფურცლის დამატების დადასტურებული გზები VBA .
ჩამოტვირთეთ პრაქტიკის სამუშაო წიგნი
შეგიძლიათ ჩამოტვირთოთ შემდეგი Excel სამუშაო წიგნი უკეთესი გაგებისა და ვარჯიშისთვის.
ფურცლის დამატება Name.xlsm-ითVBA კოდი სახელით ფურცლის დასამატებლად
ჩვენ გამოვიყენებთ Sheets ობიექტს დასამატებლად ფურცელი Excel-ში. ფუნდამენტური VBA კოდი სახელით ფურცლის დასამატებლად ჰგავს ქვემოთ მოცემულს.
Sheets.Add ([Before], [After], [Count], [Type])
ადრე: ეს არჩევითია. ის ამატებს ახალ ფურცელს კონკრეტულ ფურცლამდე.
შემდეგ: ეს ასევე არჩევითია. ის ამატებს ახალ ფურცელს კონკრეტული ფურცლის შემდეგ.
Count: ეს ასევე არასავალდებულო პარამეტრია. ის მიუთითებს დასამატებელი ფურცლების რაოდენობაზე.
ტიპი: ის ასევე არჩევითია. იგი განსაზღვრავს ფურცლის ტიპს. აქ ნაგულისხმევი მნიშვნელობა არის xlWorksheet .
6 სხვადასხვა გზა სახელით ფურცლის დასამატებლად Excel VBA-ში
Excel-ში შეგვიძლია დავამატოთ ახალი ფურცელი დამატება ⊕ ხატულა ფურცლის სახელის გვერდით. ოდესმე გიფიქრიათ Excel-ში იგივე ამოცანის ავტომატიზაციაზე? აღარ იფიქროთ, რადგან VBA გაიფარეთ.
აქ გვაქვს სამუშაო ფურცელი სახელად გაყიდვების ანგარიში . ის შეიცავს დღიურ გაყიდვებსანგარიში გარკვეული კაფეტერიის შესახებ. სვეტებში B , C და D არის გაყიდვების წარმომადგენლები , პროდუქტები და რაოდენობა შესაბამისად.
აქ ჩვენ დავამატებთ სხვა ფურცლებს ამ სამუშაო წიგნში VBA მაკრო -ის დახმარებით.
აქ ჩვენ გამოვიყენეთ Microsoft Excel 365 ვერსია, შეგიძლიათ გამოიყენოთ ნებისმიერი სხვა ვერსია თქვენი მოხერხებულობის მიხედვით.
1. დავამატოთ ფურცელი სახელით Excel VBA-ში
ჩვენს პირველ მეთოდში ჩვენ დავამატებთ ფურცელს სახელწოდებით მომხმარებლის შეყვანიდან . თუ გაინტერესებთ სწავლა, მიჰყევით ამ მარტივ ნაბიჯებს.
📌 ნაბიჯები:
- დასაწყისში გადადით დეველოპერი ჩანართი.
- მეორე, აირჩიეთ Visual Basic Code ჯგუფში.
- ალტერნატიულად, დააჭირეთ ALT + F11 იგივე დავალების შესასრულებლად.
შენიშვნა: დარწმუნდით, რომ დააჭირეთ ALT ღილაკი SPACEBAR -ის მარცხნივ. ოპერაცია არ შესრულდება, თუ იყენებთ სხვა ALT კლავიშებს.
- მყისიერად იხსნება Microsoft Visual Basic აპლიკაციებისთვის ფანჯარა.
- მოგვიანებით გადადით ჩასმა ჩანართზე.
- შემდეგ, აირჩიეთ მოდული პარამეტრებიდან.
- ამჟამად ის ხსნის კოდს მოდული .
- შემდეგ ჩაწერეთ შემდეგი კოდი მოდულში .
3033
კოდის დაშლა
- პირველ რიგში, ჩვენ ვუწოდებთ ქვე პროცედურას, როგორც Add_Sheet_with_Name .
- შემდეგ, ჩვენ განვსაზღვრავთ ცვლადის ტიპებს.
- მოგვიანებით დავამატეთ შეცდომის შესახებ განაახლეთ შემდეგი განცხადება. ეს უგულებელყოფს შეცდომებს.
- შემდეგ, ჩვენ გამოვიყენეთ InputBox მომხმარებლისგან ფურცლის სახელის მისაღებად. ასევე, ჩვენ შევინახეთ ტექსტის სტრიქონი InputBox sheet_name ცვლადში.
- შემდეგ, თუ sheet_name ცარიელია, მაშინ კოდი არ გაგრძელდება.
- და ბოლოს, ჩვენ ვიყენებთ Add.Name მეთოდს ახლად შექმნილი ფურცლის დასასახელებლად. აქ სახელი იგივე იქნება, რაც sheet_name ცვლადი.
- ამ მომენტში დააჭირეთ Run (⏵) ხატულა. პირიქით, შეგიძლიათ დააჭიროთ F5 თქვენს კლავიატურაზე.
- უეცრად ის ხსნის შეყვანის ველს.
- აქ შეიყვანეთ ახალი ფურცლის სახელი. ამ შემთხვევაში ველში ჩავწერეთ მოგება .
- მოგვიანებით დააწკაპუნეთ OK .
<. 13>
შენიშვნა: ჩვენ არ გვიხსენებია ადგილი ჩვენი ფურცლისთვის. ნაგულისხმევად, ის მოთავსებულია აქტიური ფურცლის წინ.
დაწვრილებით: Excel VBA ფურცლის სხვა სამუშაო წიგნში დასამატებლად (3 მოსახერხებელი მაგალითი)
2. Excel VBA-ის გამოყენება სახელით ფურცლის დასამატებლად კონკრეტული ფურცლის წინ
ჩვენს მეორე მეთოდში დავამატებთ ფურცელს სახელწოდებით კონკრეტული ფურცლის წინ. განვიხილოთ პროცესი ეტაპობრივადნაბიჯი.
📌 ნაბიჯები:
- უპირველეს ყოვლისა, გახსენით კოდი მოდულის ფანჯარა, როგორც ნაჩვენებია მეთოდი 1 .
- მეორე, ჩაწერეთ შემდეგი კოდი მასში.
3809
კოდის დაშლა
- პირველ რიგში, ჩვენ ვუწოდებთ Sub პროცედურას, როგორც Add_Sheet_Before_Specific_Sheet .
- შემდეგ, ჩვენ ვააქტიურებთ Sales Report ფურცელს. ეს დარწმუნდება, რომ კოდი იმუშავებს, თუ ჩვენ სხვა ფურცელზე ვართ.
- შემდეგ, ჩვენ ვიყენებთ Add.Name მეთოდს ახლად შექმნილი ფურცლის დასასახელებლად. ეს ფურცელი შეიქმნება ფურცლის წინ სახელწოდებით მოგება სამუშაო წიგნიდან. გარდა ამისა, ჩვენ დავარქვით უწყისს ბალანსი .
- შემდეგ, გაუშვით კოდი, როგორც ნაჩვენებია მეთოდიში. 1 .
- ამგვარად, ის დაამატებს ახალ უწყისს ბალანსს უწყისამდე სახელად მოგება .
დაწვრილებით: Excel VBA ფურცლის დასამატებლად ცვლადის სახელით (5 იდეალური მაგალითი)
3. Excel VBA ფურცლის დასამატებლად სახელით კონკრეტული ფურცლის შემდეგ
ამ მეთოდით ჩვენ დავამატებთ ფურცელს ფურცლის შემდეგ სახელად მოგება . ვნახოთ პროცესი დეტალურად.
📌 საფეხურები:
- თავიდან გამოიტანეთ კოდი მოდული ფანჯარა, როგორც ნაჩვენებია მეთოდი 1-ში .
- ამის შემდეგ ჩაწერეთ შემდეგი კოდი მასში.
5767
ეს კოდი თითქმის ჰგავს <-ის კოდს. 1>მეთოდი 2 . უბრალოდ, აქ უფრო მეტად გამოვიყენეთ პარამეტრი After ვიდრე ადრე . იმის გამო, რომ ჩვენ გვინდა დავამატოთ ახალი ფურცელი კონკრეტული ფურცლის შემდეგ.
- შემდეგ, გაუშვით კოდი, როგორც ნაჩვენებია მეთოდი 1 .
- ამგვარად, ის დაამატებს ახალ ფურცელს საწყობი ფურცლის შემდეგ სახელწოდებით მოგება .
დაწვრილებით: Excel VBA ფურცლის დასამატებლად, თუ ის არ არსებობს (სწრაფი ნაბიჯებით)
4. სახელწოდების ფურცლის ჩასმა სამუშაო წიგნის დასაწყისში
ამ განყოფილებაში ჩვენ ჩავსვამთ ახალ ფურცელს სამუშაო წიგნის დასაწყისში Excel-ში VBA -ის გამოყენებით. ასე რომ, შემდგომი შეფერხების გარეშე, ვნახოთ, როგორ ვაკეთებთ ამას.
📌 საფეხურები:
- თავდაპირველად გამოიტანეთ კოდი მოდულის ფანჯარა, როგორც ნაჩვენებია მეთოდი 1 .
- შემდეგ, ჩაწერეთ შემდეგი კოდი მასში.
1990
აქ, ჩვენ ვამატებთ ახალი სამუშაო ფურცელი სამუშაო წიგნის პირველი ფურცლის წინ. ეს ნიშნავს სამუშაო წიგნის დასაწყისში. შედეგად, ეს ახლა პირველი ფურცელია. ასევე, ჩვენ დავარქვით ფურცელს კომპანიის პროფილი .
- შემდეგ, გაუშვით კოდი, როგორც ნაჩვენებია მეთოდი 1 .
- აქედან გამომდინარე, ის დაამატებს ახალ ფურცელს კომპანიის პროფილს სამუშაო წიგნის დასაწყისში.
დაწვრილებით: Excel მაკრო: შექმენით ახალი ფურცელი და გადაარქვათ სახელი (3 იდეალური მაგალითი)
5. Excel VBA-ის გამოყენება სამუშაო წიგნის ბოლოს ფურცლის დასამატებლად
ამ განყოფილებაში დავამატებთ ფურცელს სამუშაო წიგნის ბოლო ფურცლის შემდეგ . ნება მომეცით ვაჩვენო პროცესიქვემოთ.
📌 ნაბიჯები:
- პირველ რიგში, გახსენით კოდი Module ფანჯარა, როგორც ნაჩვენებია <1-ში>მეთოდი 1 .
- მეორე, ჩასვით შემდეგი კოდი მასში.
5730
კოდის დაშლა
- პირველ რიგში, ჩვენ ვუწოდებთ Sub პროცედურას, როგორც Sheet_End_Workbook.
- შემდეგ, ჩვენ ვიყენებთ Add.Name მეთოდს ახლად შექმნილი ფურცლის დასასახელებლად. ჩვენ შევქმნით ამ ფურცელს სამუშაო წიგნის ბოლო ფურცლის შემდეგ. ჩვენ შეგვიძლია მივიღოთ ბოლო ფურცლის ნომერი Sheets.Count თვისებიდან. გარდა ამისა, ჩვენ დავარქვით ფურცელს შემოსავლის ანგარიშგება .
- ამის შემდეგ გაუშვით კოდი, როგორც ნაჩვენებია მეთოდიში. 1 .
- აქედან გამომდინარე, ის დაამატებს ახალ ფურცელს შემოსავლის ამონაწერი სამუშაო წიგნის ბოლოს.
დაწვრილებით: შექმენით ახალი სამუშაო წიგნი და შეინახეთ VBA-ს გამოყენებით Excel-ში
6. Excel VBA-ის მიერ უჯრედის მნიშვნელობის გამოყენებით მრავალი ფურცლის გაცნობა
ბოლო მეთოდისთვის, ჩვენ დავამატებთ რამდენიმე ფურცელს სამუშაო წიგნში, სახელწოდებით უჯრედების დიაპაზონიდან Excel VBA გამოყენებით. უფრო მეტიც, ჩვენ ვთხოვთ მომხმარებელს დიაპაზონის შეყვანას სახელის მისაღებად. მოდით, გადავხედოთ ქვემოთ მოცემულ ნაბიჯებს.
📌 ნაბიჯები:
- პირველ რიგში გახსენით კოდი მოდულის ფანჯარა, როგორც ნაჩვენებია მეთოდი 1 .
- შემდეგ დააკოპირეთ შემდეგი კოდი და ჩასვით მასში.
5292
კოდის დაშლა
- პირველ რიგში, ჩვენ მოვუწოდებთ ქვეპროცედურა, როგორც Add_Multiple_Sheets_Using_Cell_Value.
- შემდეგ, ჩვენ განვსაზღვრავთ ცვლადის ტიპებს.
- შემდეგ, ვიყენებთ InputBox მომხმარებლისგან მონაცემების დიაპაზონის მისაღებად.
- მეოთხე, ჩვენ ვააქტიურებთ ფურცელს გაყიდვების ანგარიში .
- მოგვიანებით ვიყენებთ ყოველი შემდეგი ციკლს, რათა სათითაოდ გავიაროთ არჩეული უჯრედების დიაპაზონი.
- შემდეგ, ჩვენ ვიყენებთ Add.Name მეთოდს ახლად შექმნილი ფურცლის დასასახელებლად. ჩვენ შევქმნით ამ ფურცლებს სამუშაო წიგნის გაყიდვების ანგარიში აქტიური ფურცლის შემდეგ.
- ახლა გაუშვით კოდი, როგორც ნაჩვენებია მეთოდი 1 .
- მყისიერად იხსნება Exceldemy შეყვანის ველი.
- შემდეგ, მიეცით უჯრედები B5:B9 დიაპაზონი ველში.
- ბოლოს, დააწკაპუნეთ OK .
- საბოლოოდ, ის ჩასვამს OK . 1>ხუთი ფურცელი დასახელებული უჯრედის მნიშვნელობების მიხედვით B5:B9 დიაპაზონში. ისინი ყველა არის ფურცლის შემდეგ გაყიდვების ანგარიში .
დასკვნა
ეს სტატია გთავაზობთ მარტივ და მოკლე გადაწყვეტილებებს ფურცლების დასამატებლად სახელებით Excel VBA . არ დაგავიწყდეთ ჩამოტვირთოთ პრაქტიკა ფაილი. გმადლობთ ამ სტატიის წაკითხვისთვის, ვიმედოვნებთ, რომ ეს სასარგებლო იყო. გთხოვთ შეგვატყობინოთ კომენტარების განყოფილებაში, თუ გაქვთ რაიმე შეკითხვა ან წინადადება. გთხოვთ ეწვიოთ ჩვენს ვებგვერდს Exceldemy მეტის შესასწავლად.