Სარჩევი
ბუნებრივია, შეიძლება დაგჭირდეთ ფაილის გახსნა მშობელი Excel ფაილიდან VBA-ს გამოყენებით სხვა დირექტორიაში. მაგრამ ამავდროულად, ჩვენ გვაქვს სხვადასხვა ტიპის კრიტერიუმები იმის შესახებ, თუ როგორ გვინდა გავხსნათ სამუშაო წიგნი. თუ გაინტერესებთ, როგორ შეგიძლიათ გახსნათ სამუშაო წიგნი ცვლადის სახელით, მაშინ ეს სტატია შეიძლება გამოგადგეთ. ამ სტატიაში განვიხილავთ, თუ როგორ შეგიძლიათ გახსნათ სამუშაო წიგნი ცვლადის სახელით VBA-ს გამოყენებით Excel-ში დახვეწილი ახსნა-განმარტებით.
ჩამოტვირთეთ პრაქტიკის სამუშაო წიგნი
ჩამოტვირთეთ ეს პრაქტიკული სამუშაო წიგნი ქვემოთ.
გახსენით სამუშაო წიგნი ცვლადის სახელით VBA.xlsm გამოყენებით
Sample.xlsx
4 Easy სამუშაო წიგნის გახსნის გზები ცვლადის სახელით VBA-ს გამოყენებით Excel-ში
ჩვენ ვაპირებთ გამოვიყენოთ ქვემოთ მოცემული მონაცემთა ნაკრები დემონსტრაციისთვის. ჩვენ გვაქვს რამდენიმე პროდუქტის ინფორმაცია მათი ID-ით. ეს არის ნიმუშის ფაილი, რომლის გახსნას ვაპირებთ VBA კოდის გამოყენებით.
1. Workbook-ის გამოყენება. Open Property
Using the Workbook .Open თვისება, ჩვენ შეგვიძლია გავხსნათ ფაილები დირექტორიას ხსენებით, ან მდებარეობის არ ხსენებით. ჩვენ ასევე შეგვიძლია გავხადოთ გახსნილი ფაილი მხოლოდ კითხვად.
1.1 გახსენით სამუშაო წიგნის ხსენება ფაილის გზა
შემდეგი მეთოდით, ჩვენ ვაპირებთ გამოვიყენოთ Workbook.Open Property ფაილის გახსნა უშუალოდ ფაილის მდებარეობის აღნიშნული დირექტორიადან. არ აქვს მნიშვნელობა სად მდებარეობს ფაილი, ჩვენ შეგვიძლია გავხსნათ ფაილირომელიც არის Sub Open_File_with_Add_Property()
⮚ შემდეგ ჩვენ ვაცხადებთ File_Path ცვლადს, როგორც String type.
8359
⮚ და დააყენეთ File_Path ცვლადი ფაილის ადგილმდებარეობაზე.
8749
⮚ ჩვენ ვაცხადებთ wb როგორც ცვლადს Workbook ტიპში.
9490
⮚ შემდეგ სამუშაო წიგნაკი დაემატება File_Path მდებარეობაში შენახული დირექტორიადან Workbook.Add თვისების გამოყენებით.
2879
⮚ ბოლოს ვასრულებთ. ამ კოდის ქვეპროცედურა.
დაწვრილებით: [შესწორდა!] ობიექტის სამუშაო წიგნის გახსნის მეთოდი ვერ მოხერხდა (4 გამოსავალი)
დასკვნა
შესაჯამებლად, საკითხს, თუ როგორ შეგვიძლია გავხსნათ სამუშაო წიგნები ცვლადის სახელებით VBA-ს გამოყენებით, აქ მოცემულია 4 განსხვავებული მაგალითი. VBA მაკრო მეთოდი მოითხოვს წინასწარ VBA-სთან დაკავშირებულ ცოდნას, რათა თავიდან იქნას აცილებული.
ამ პრობლემის გამო, ხელმისაწვდომია მაკრო ჩართული სამუშაო წიგნი, სადაც შეგიძლიათ ივარჯიშოთ. ეს მეთოდები.
შეგიძლიათ დაუსვათ ნებისმიერი შეკითხვა ან გამოხმაურება კომენტარების განყოფილების მეშვეობით. ნებისმიერი შემოთავაზება Exceldemy საზოგადოების გასაუმჯობესებლად ძალიან დასაფასებელია
მარტივად.ნაბიჯები
- ჩვენ გვაქვს ფაილი შენახული დოკუმენტების საქაღალდეში, რომელიც უნდა გავხსნათ.
- ჩვენ გამოვიყენებთ ფაილს დაასახელეთ როგორც ცვლადი და შემდეგ გახსენით ფაილი პატარა VBA მაკროს გამოყენებით.
- ფაილის ზუსტი ფაილის დირექტორია ნაჩვენებია ქვემოთ თვისებების ფანჯარაში.
- პირველ რიგში, გადადით Developer ჩანართზე და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთ დეველოპერის ჩანართი . ან ასევე შეგიძლიათ დააჭიროთ ' Alt+F11' Visual Basic რედაქტორის გასახსნელად .
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასმა > მოდული .
<. 13>
6553
- შემდეგ დახურეთ მოდულის ფანჯარა.
- ამის შემდეგ გადადით View ჩანართზე > Macros .
- შემდეგ დააწკაპუნეთ ნახვა მაკრო .
- დაწკაპუნების შემდეგ მაკროს ნახვა, აირჩიეთ მაკრო, რომელიც ახლახან შექმენით. სახელი აქ არის Open_with_File_Path . შემდეგ დააწკაპუნეთ Run .
- ამის შემდეგ Sample ფაილი გაიხსნება.
პროცედურა, რომელიც არის Open_with_File_Path .
9229
⮚ შემდეგ, ჩვენ ვათავსებთ ფაილის მდებარეობას File_Path ცვლადში
4027
⮚შემდეგ ვაცხადებთ ჩვენს ცვლადს wrkbk , რომლის ტიპია სამუშაო წიგნი.
5201
⮚ შემდეგ, ვხსნით File_Path დირექტორიაში დასახელებულ ფაილს და ვაყენებთ ფაილს. როგორც wrkbk ცვლადი.
2777
⮚ ბოლოს ვასრულებთ ამ კოდის ქვეპროცედურას.
დაწვრილებით: როგორ სამუშაო წიგნის გახსნა ბილიკიდან Excel VBA-ს გამოყენებით (4 მაგალითი)
1.2 გახსენით სამუშაო წიგნი ფაილის გზის ხსენების გარეშე
შემდეგი მეთოდით ჩვენ გავხსნით ფაილს მშობელი საქაღალდიდან, სადაც მთავარი ფაილი შენახულია. ფაილის გახსნა შესაძლებელია კოდში რაიმე მდებარეობის მითითების გარეშე. ეს ფაილი უბრალოდ უნდა იყოს იმავე საქაღალდეში, როგორც მშობელი საქაღალდე.
ნაბიჯები
- ჩვენ გვაქვს სხვა ფაილი შენახული იმავე დირექტორიაში, სადაც მშობელი Excel ფაილი ახლა შენახულია.
- ფაილის სახელია 1.
- პირველ რიგში, გადადით დეველოპერზე ჩანართი და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთ დეველოპერის ჩანართი . ან თქვენ ასევე შეგიძლიათ დააჭიროთ ' Alt+F11 ' Visual Basic რედაქტორის გასახსნელად .
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასმა > მოდული .
<. 13>
4406
- შემდეგ დახურეთ მოდულის ფანჯარა.
- ამის შემდეგ გადადით View ჩანართზე > Macros .
- შემდეგ დააწკაპუნეთ ნახვამაკროები .
- მაკროს ნახვაზე დაწკაპუნების შემდეგ აირჩიეთ მაკრო, რომელიც ახლახან შექმენით. სახელი აქ არის Open_without_File_Path . შემდეგ დააწკაპუნეთ Run.
- Run დაჭერის შემდეგ შეამჩნევთ, რომ ფაილი სახელად 1 გახსნილია.
- და ასე ვხსნით სამუშაო წიგნს ცვლადის სახელით VBA-ს გამოყენებით Excel-ში.
🔎 კოდი
7971
⮚ პირველ რიგში, ჩვენ ვაძლევთ სახელს ქვეპროცედურისთვის, რომელიც არის Sub Open_without_File_Path()
7006
⮚ ჩვენ ვაცხადებთ wrkbk როგორც ცვლადი სამუშაო წიგნის ტიპის
7314
⮚ ჩვენ ვხსნით ფაილს მშობელი დირექტორიადან, სახელად 1.xlsx .
5062
⮚ ბოლოს ვასრულებთ ქვეპროცედურას ამ კოდის.
1.3 გახსენით სამუშაო წიგნი, როგორც მხოლოდ წაკითხული
მეთოდი საკმაოდ ჰგავს პირველ მეთოდს, მაგრამ აქ ჩვენ გავხსნით ფაილს მხოლოდ წაკითხვის რეჟიმში, რაც იმას ნიშნავს, რომ არ გავხსნით შეუძლია შეცვალოს ნებისმიერი მონაცემი ან მნიშვნელობა Excel ფაილში.
ნაბიჯები
- ფაილი, რომლის გახსნაც გვინდა, ინახება დოკუმენტის საქაღალდეში.
- და ეს არის ფაილი, რომლის გახსნა გვინდა მხოლოდ წაკითხვის სახით.
- პირველ რიგში, გადადით დეველოპერზე ჩანართი და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთ დეველოპერის ჩანართი . ან ასევე შეგიძლიათ დააჭიროთ „ Alt+F11 “ Visual Basic რედაქტორის გასახსნელად.
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასვით > მოდული .
- შემდეგ, მოდული რედაქტორის ფანჯარაში ჩაწერეთ შემდეგი კოდი:
7190
- შემდეგ დახურეთ Module ფანჯარა.
- ამის შემდეგ გადადით View ჩანართზე > მაკროები .
- შემდეგ დააწკაპუნეთ მაკროს ნახვა .
- ნახვის დაწკაპუნების შემდეგ მაკროები, აირჩიეთ მაკროები, რომლებიც ახლა შექმენით. სახელი აქ არის Open_with_File_Read_Only . შემდეგ დააწკაპუნეთ Run .
- დაჭერით Run , დავინახავთ, რომ ფაილი ახლა გახსნილია როგორც მხოლოდ წაკითხვადი, როგორც ნაჩვენებია სათაურის ზოლში.
🔎 კოდის დაშლა
5893
⮚ პირველ რიგში, ჩვენ ვაძლევთ სახელს ქვეპროცედურისთვის, რომელიც არის Open_with_File_Read_Only()
4159
⮚ ჩვენ ვაცხადებთ wrkbk ცვლადად სამუშაო წიგნის ტიპში
9072
⮚ შემდეგ ფაილი გაიხსნება დანიშნული დირექტორიადან და ფაილი დაყენდება მხოლოდ წაკითხვად ბოლო არგუმენტით.
8462
⮚ ბოლოს ვასრულებთ ამ კოდის ქვეპროცედურა.
დაწვრილებით: როგორ გავხსნათ სამუშაო წიგნი, როგორც მხოლოდ წაკითხული Excel VBA-ით
2. Message Box-ის გამოყენება
თითქმის წინა მეთოდის მსგავსად, ჩვენ შეგვიძლია გავხსნათ ფაილები VBA კოდის მეშვეობით აქ Excel-ში, მაგრამ ამ შემთხვევაში, ჩვენ აქ ჩავრთავთ მცირე შეტყობინებების ველს.
ნაბიჯები
- პირველ რიგში, გადადით Developer ჩანართზე და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთდეველოპერის ჩანართი . ან თქვენ ასევე შეგიძლიათ დააჭიროთ ' Alt+F11' Visual Basic რედაქტორის გასახსნელად .
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასმა > მოდული .
<. 13>
7261
- შემდეგ დახურეთ მოდულის ფანჯარა.
- ამის შემდეგ გადადით View ჩანართზე > Macros .
- შემდეგ დააწკაპუნეთ ნახვა მაკრო .
- დაწკაპუნების შემდეგ მაკროს ნახვა, აირჩიეთ მაკრო, რომელიც ახლახან შექმენით. სახელი აქ არის Open_File_with_Messege_Box . შემდეგ დააწკაპუნეთ Run .
- შემდეგ მივიღეთ გამაფრთხილებელი ველი, რომელიც აჩვენებს, რომ ფაილი წარმატებით გაიხსნა .
- შემდეგ დააწკაპუნეთ OK .
- და შემდეგ დავინახავთ, რომ ფაილი არის ახლა გახსნა.
- და შემდეგ ვცდილობთ ოდნავ შევცვალოთ კოდი.
- ვცვლით ფაილის სახელს Sample10 და რეალურად არ არის ფაილი სახელად Sample10 დოკუმენტების საქაღალდეში.
- შემდეგ ჩვენ ხელახლა გაუშვით კოდი და არის შეტყობინების ყუთი: ფაილის გახსნა ვერ მოხერხდა .
- დააწკაპუნეთ OK შემდეგ.
Open_with_File_Read_Only()
3895
⮚ ჩვენგამოაცხადეთ wrkbk , როგორც ცვლადი სამუშაო წიგნში type
8478
9575
⮚ ეს სტრიქონი შეამოწმებს არის თუ არა ფაილი სახელად Sample დირექტორიაში ხელმისაწვდომი თუ არა, თუ ფაილი იქ არის, მაშინ ის გახსენით ფაილი და ამავე დროს გამოჩნდება შეტყობინება.
1127
⮚ თუ დირექტორიაში არ არის ფაილი სახელწოდებით Sample , მაშინ ეს შეტყობინება მიეწოდება.
7751
⮚ ბოლოს ვასრულებთ ამ კოდის ქვეპროცედურას.
2446
⮚ ბოლოს ვასრულებთ ამ კოდის ქვეპროცედურას.
დაწვრილებით: როგორ გავხსნათ სამუშაო წიგნი და გავუშვათ მაკრო VBA-ს გამოყენებით (4 მაგალითი)
3. დიალოგური ფანჯრის გამოყენება ფაილის გასახსნელად
ფაილის მდებარეობის დირექტორიას ამოღება და ყოველ ჯერზე მათი იმპორტი VBA კოდში საკმაოდ რთულია. პრობლემის მოსაგვარებლად, ჩვენ გაჩვენებთ, თუ როგორ შეგიძლიათ გამოიყენოთ დიალოგური ფანჯარა ნებისმიერი დირექტორიადან ფაილის ასარჩევად.
ნაბიჯები
- ახლა ჩვენ გავხსნით ფაილს ფაილების მკვლევარის დიალოგური ფანჯრის გამოყენებით.
- პირველ რიგში, გადადით Developer ჩანართზე და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთ დეველოპერის ჩანართი . ან ასევე შეგიძლიათ დააჭიროთ ' Alt+F11' Visual Basic რედაქტორის გასახსნელად .
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასმა > მოდული .
<. 13>
1502
- შემდეგ დახურეთ მოდული ფანჯარა.
- ამის შემდეგ გადადით View ჩანართზე > Macros .
- შემდეგ დააწკაპუნეთ Macros View .
- დაწკაპუნების შემდეგ მაკროს ნახვა, აირჩიეთ მაკრო, რომელიც ახლახან შექმენით. სახელი აქ არის Open_File_with_Dialog_Box . შემდეგ დააწკაპუნეთ Run .
- და შემდეგ იხსნება ახალი ფანჯარა. ფაილების მკვლევარის დიალოგურ ფანჯარაში აირჩიეთ ნიმუში და დააწკაპუნეთ OK .
- შემდეგ ფაილი სახელად ნიმუში გახსნილია.
- და ასე ვხსნით სამუშაო წიგნს ცვლადის სახელით VBA-ს გამოყენებით Excel-ში.
>
2310
⮚ ჩვენ ვაცხადებთ Dbox როგორც ცვლადს FileDialog type
6965
⮚ ჩვენ ვაცხადებთ File_Path როგორც ცვლადი <6-ში>ფაილის_გზა
როგორც სტრიქონი type
2783
⮚ პირველი ხაზიდან იქნება დიალოგური ფანჯარა. შემდეგი ხაზი აღნიშნავს დიალოგური ფანჯრის სახელს და ფაილის ტიპს.
⮚ Dbox.Title დაადგენს დიალოგური ფანჯრის სათაურს. და FileType
დააყენეთ ფაილის ტიპი.
1485
⮚ Dbox.Filters.Clear გაასუფთავებს დიაოგში გამოყენებულ ნებისმიერ წინა ფილტრს
4629
⮚ Dbox.Show გააჩენს დიალოგურ ფანჯარას ფაილზე.
⮚ ეს ხაზი განსაზღვრავს მომხმარებელმა შეარჩია თუ არა ერთზე მეტი ფაილი. თუ მომხმარებელი აირჩევს იმაზე მეტსერთი ფაილი, მთელი პროცედურა შეჩერდება.
3251
⮚ ბოლოს ამ კოდის ქვეპროცედურას ვასრულებთ.
დაწვრილებით: როგორ გავხსნათ საქაღალდე და აირჩიეთ ფაილი Excel VBA-ს გამოყენებით (4 მაგალითი)
4. სამუშაო წიგნის გამოყენებით. საკუთრების დამატება
წინა მეთოდებისგან განსხვავებით, ჩვენ შევქმნით ახალ Excel ფაილს წინასწარ განსაზღვრულ დირექტორიაში და შემდეგ ჩვენ გავხსნით მას სამუშაო წიგნის გამოყენებით. დაამატეთ თვისება.
ნაბიჯები
- პირველ რიგში, გადადით Developer ჩანართზე და დააწკაპუნეთ Visual Basic . თუ ეს არ გაქვთ, უნდა ჩართოთ დეველოპერის ჩანართი . ან ასევე შეგიძლიათ დააჭიროთ ' Alt+F11' Visual Basic რედაქტორის გასახსნელად .
- შემდეგ იქნება ახალი დიალოგური ფანჯარა, ამ დიალოგურ ფანჯარაში დააწკაპუნეთ ჩასმა > მოდული .
<. 0>შემდეგ, Moduleრედაქტორის ფანჯარაში აკრიფეთ შემდეგი კოდი:
7019
- შემდეგ დახურეთ Module ფანჯარა.
- შემდეგ რომ გადადით View ჩანართზე > Macros .
- შემდეგ დააწკაპუნეთ View Macros .
- დაწკაპუნებით მაკროს ნახვა, აირჩიეთ მაკრო, რომელიც ახლა შექმენით. სახელი აქ არის Open_File_with_Add_Property . შემდეგ დააწკაპუნეთ Run .
- Run დაწკაპუნების შემდეგ შეამჩნევთ, რომ ახლა არის ახალი ფაილი შეიქმნა და გაიხსნა.
🔎 კოდის დაყოფა
⮚ პირველ რიგში, ჩვენ გთავაზობთ ქვეპროცედურის დასახელება