वीबीए: पथ से कार्यपुस्तिका कैसे खोलें


किसी विशिष्ट पथ से Excel कार्यपुस्तिका खोलने के लिए आप VBA में Workbooks.Open विधि का उपयोग कर सकते हैं।

इस फ़ंक्शन को व्यवहार में उपयोग करने का एक सामान्य तरीका यहां दिया गया है:

 SubOpenWorkbook ()

Dim wb As Workbook
Dim FilePath As String

FilePath = InputBox("Please Enter File Path")
Workbooks.Open FilePath

End Sub

जब यह मैक्रो निष्पादित होता है, तो एक इनपुट बॉक्स दिखाई देगा जहां उपयोगकर्ता किसी विशिष्ट एक्सेल कार्यपुस्तिका का पथ दर्ज कर सकता है।

फिर मैक्रो स्वचालित रूप से विशिष्ट पथ में स्थित कार्यपुस्तिका ढूंढेगा और उसे एक्सेल में खोलेगा।

निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस वाक्यविन्यास का उपयोग कैसे करें।

उदाहरण: वीबीए का उपयोग करके पथ से कार्यपुस्तिका कैसे खोलें

मान लें कि हमारे पास my_workbook2.xlsx नामक एक एक्सेल वर्कबुक निम्नलिखित स्थान पर स्थित है:

C:\Users\bob\Documents\my_workbook2.xlsx

मान लीजिए कि हम इस कार्यपुस्तिका को स्वचालित रूप से खोलने के लिए VBA का उपयोग करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 SubOpenWorkbook ()

Dim wb As Workbook
Dim FilePath As String

FilePath = InputBox("Please Enter File Path")
Workbooks.Open FilePath

End Sub

एक बार जब हम इस मैक्रो को चलाएंगे, तो एक बॉक्स दिखाई देगा जहां हम इनपुट बॉक्स में कार्यपुस्तिका का पथ दर्ज कर सकते हैं:

एक बार जब हम ओके पर क्लिक करते हैं, तो मैक्रो हमारे द्वारा निर्दिष्ट पथ में स्थित एक्सेल वर्कबुक को खोल देगा।

ध्यान दें कि यदि आप किसी ऐसी फ़ाइल पथ में कार्यपुस्तिका का नाम दर्ज करते हैं जो मौजूद नहीं है, तो VBA एक त्रुटि संदेश उत्पन्न करेगा।

उदाहरण के लिए, मान लीजिए कि हम my_workbook3.xlsx नाम की एक कार्यपुस्तिका खोलने का प्रयास कर रहे थे, जो मौजूद नहीं है।

VBA निम्न त्रुटि संदेश उत्पन्न करेगा:

इससे हमें पता चलता है कि हमारे द्वारा निर्दिष्ट फ़ाइल पथ मौजूद नहीं है।

नोट : आप यहां VBA में Workbooks.Open विधि के लिए संपूर्ण दस्तावेज़ पा सकते हैं।

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए: किसी कार्यपुस्तिका में शीटों की संख्या कैसे गिनें
वीबीए: किसी कार्यपुस्तिका को कैसे सहेजें और बंद करें
वीबीए: जांचें कि कार्यपुस्तिका खुली है या नहीं

एक टिप्पणी जोड़ने

आपका ईमेल पता प्रकाशित नहीं किया जाएगा. आवश्यक फ़ील्ड चिह्नित हैं *