Excel VBA:फुल स्क्रीन में यूजरफॉर्म दिखाएं (4 आसान तरीके)

अक्सर उपयोगकर्ता प्रपत्र हम उत्पन्न करते हैं काफी बड़ा है और इसमें एक छोटी सी जगह में बहुत सारी जानकारी है। उन सभी को एक तंग जगह पर रखने से उपयोगकर्ता प्रपत्र . की स्पष्टता में बाधा आ सकती है . यदि आप यह जानने के लिए उत्सुक हैं कि आप उपयोगकर्ता प्रपत्र . कैसे दिखा सकते हैं एक्सेल में वीबीए का उपयोग करके पूर्ण स्क्रीन में, तो यह लेख आपके काम आ सकता है। इस लेख में, हम चर्चा करते हैं कि आप उपयोगकर्ता प्रपत्र . कैसे दिखा सकते हैं विस्तृत विवरण के साथ VBA का उपयोग करके Excel में पूर्ण स्क्रीन पर।

इस अभ्यास कार्यपुस्तिका को नीचे डाउनलोड करें।

एक्सेल में वीबीए का उपयोग करके फुल स्क्रीन में यूजरफॉर्म दिखाने के 4 आसान तरीके

हम नीचे दिए गए डेटासेट का उपयोग यह प्रदर्शित करने के लिए करने जा रहे हैं कि आप उपयोगकर्ता प्रपत्र . कैसे दिखा सकते हैं एक्सेल वीबीए का उपयोग करके पूर्ण स्क्रीन में। फ़ाइल को xlsm . में सहेजा जाना चाहिए नियमित xlsx . के बजाय प्रारूपित करें प्रारूप।

हम नीचे दिए गए VBA का उपयोग करने जा रहे हैं कोड जो दिखाने . जा रहा है उपयोगकर्ता प्रपत्र पूर्ण स्क्रीन . में बिना किसी परेशानी के।

कदम

• शुरू करने के लिए, डेवलपर . पर क्लिक करें टैब करें और फिर विजुअल बेसिक select चुनें ।

• एक बार जब आप विजुअल बेसिक खोल लेते हैं विंडो में, सम्मिलित करें . पर क्लिक करें ।
• अगले चरण में, उपयोगकर्ता प्रपत्र select चुनें ड्रॉप-डाउन मेनू से.

• उसके बाद एक आयताकार विंडो बॉक्स दिखाई देगा।
• गुणों . पर फलक, आप उस विंडो का नाम बदल सकते हैं और कैप्शन कर सकते हैं।
• और यह उपयोगकर्ता प्रपत्र का उपयोग करने के लिए बॉक्स है , आप विभिन्न आकार, बटन, चेकबॉक्स आदि जोड़ सकते हैं और उन्हें शीट से लिंक कर सकते हैं।

• फिर उस बॉक्स पर डबल क्लिक करें।
• और आप देखेंगे कि एक संपादक विंडो है। उस संपादक विंडो में, नीचे दिया गया कोड पेस्ट करें।

Private Sub UserForm_Activate()
Application.WindowState = xlMaximized
With Application
Me.Top = .Top
Me.Left = .Left
Me.Height = .Height
Me.Width = .Width
End With
End Sub

• जैसे ही आपने कोड दर्ज किया है, सहेजें . पर क्लिक करें आइकन पर क्लिक करें और फिर उपयोगकर्ता प्रपत्र . पर दो बार क्लिक करें
• यह आपको मुख्य उपयोगकर्ता प्रपत्र . पर ले जाएगा फिर से बॉक्स।
• अब उदाहरण के लिए, उपयोगकर्ता प्रपत्र . में कुछ तत्व जोड़ें
• हमने कुछ टेक्स्ट बॉक्स added जोड़े हैं और कुछ कमांड बटन , एक इनपुट बॉक्स के साथ।
• फिर चलाएं . पर क्लिक करें छवि में दिखाया गया बटन।

• चलाएं . पर क्लिक करना आदेश, हम उपयोगकर्ता प्रपत्र . देख सकते हैं
• उपयोगकर्ता प्रपत्र . के बाद निष्पादित किया जाता है, तो हम देख सकते हैं कि उपयोगकर्ता प्रपत्र अब स्क्रीन के पूरे हिस्से पर कब्जा कर रहा है। जैसा कि नीचे चित्र में दिखाया गया है।

🔎 VBA कोड विश्लेषण

• सबसे पहले, हम उपयोगकर्ता प्रपत्र . चुनते हैं वस्तु के रूप में और सक्रिय करें प्रक्रिया के रूप में।
• अगली पंक्ति में, विंडोस्टेट अभी चल रहे एप्लिकेशन की विंडो कंडीशन को दर्शाएगा। इस कमांड लाइन की स्थिति को xlMaximized . के रूप में सेट करना एप्लिकेशन की विंडो को अधिकतम करेगा।
• अगली पंक्ति में, हम एप्लिकेशन विंडो का चयन करते हैं।
• फिर हम 4 अलग-अलग पंक्तियों को इनपुट करते हैं, जो सभी विंडो को ऊपर, नीचे, बाएँ और दाएँ दिशाओं में अधिकतम बनाती हैं।
• आखिरकार, कोड की उप-प्रक्रिया समाप्त करें।

हम नीचे दिए गए VBA का उपयोग करने जा रहे हैं कोड जो दिखाने . जा रहा है उपयोगकर्ता प्रपत्र पूर्ण स्क्रीन . में बिना किसी परेशानी के।

कदम

• शुरू करने के लिए, डेवलपर . पर क्लिक करें टैब करें और फिर विजुअल बेसिक select चुनें ।

• एक बार जब आप विजुअल बेसिक खोल लेते हैं विंडो में, सम्मिलित करें . पर क्लिक करें ।
• अगले चरण में, उपयोगकर्ता प्रपत्र select चुनें ड्रॉप-डाउन मेनू से।

• उसके बाद एक आयताकार विंडो बॉक्स दिखाई देगा।
• गुणों . पर फलक, आप उस विंडो का नाम बदल सकते हैं और कैप्शन कर सकते हैं।
• और यह उपयोगकर्ता प्रपत्र का उपयोग करने के लिए बॉक्स है , आप विभिन्न आकार, बटन, चेकबॉक्स आदि जोड़ सकते हैं और उन्हें शीट से लिंक कर सकते हैं।

• फिर उस बॉक्स पर डबल क्लिक करें।
• और आप देखेंगे कि एक संपादक विंडो है। उस संपादक विंडो में, नीचे दिया गया कोड पेस्ट करें।

Private Sub UserForm_Activate()
Me.Height = Application.Height
Me.Width = Application.Width
Me.Left = Application.Left
Me.Top = Application.Top
End Sub

Private Sub UserForm_Click()

End Sub

Private Sub UserForm_Initialize()
Application.WindowState = xlMaximized
End Sub

• जैसे ही आपने कोड दर्ज किया है, सहेजें . पर क्लिक करें आइकन पर क्लिक करें और फिर उपयोगकर्ता प्रपत्र . पर दो बार क्लिक करें
• यह आपको मुख्य उपयोगकर्ता प्रपत्र . पर ले जाएगा फिर से बॉक्स।
• अब उदाहरण के लिए, उपयोगकर्ता प्रपत्र . में कुछ तत्व जोड़ें विंडो, हमने कुछ टेक्स्ट बॉक्स . जोड़े हैं और कुछ कमांड बटन , एक इनपुट बॉक्स के साथ।
• फिर चलाएं . पर क्लिक करें छवि में दिखाया गया बटन।

• चलाएं . पर क्लिक करना आदेश, हम उपयोगकर्ता प्रपत्र . देख सकते हैं
• उपयोगकर्ता प्रपत्र . के बाद निष्पादित किया जाता है, तो हम देख सकते हैं कि उपयोगकर्ता प्रपत्र अब स्क्रीन के पूरे हिस्से पर कब्जा कर रहा है। जैसा कि छवि . में दिखाया गया है नीचे।

🔎 VBA कोड विश्लेषण

• सबसे पहले, हम उपयोगकर्ता प्रपत्र . चुनते हैं वस्तु के रूप में और सक्रिय करें प्रक्रिया के रूप में।
• अगली 4 पंक्तियों में, विंडो की ऊंचाई, चौड़ाई बाएं और दाएं आयाम लेंगे और उन्हें ऊंचाई के रूप में संग्रहीत करेंगे , मी.चौड़ाई , मैं.बाएं , मी.टॉप.
• फिर हम कोड की उप-प्रक्रिया समाप्त करते हैं।
• सबसे पहले, हम उपयोगकर्ता प्रपत्र . चुनते हैं वस्तु के रूप में और आरंभ करें प्रक्रिया के रूप में।
• फिर अगली पंक्ति सभी दिशाओं में विंडो के संग्रहीत मूल्य को अधिकतम करेगी जिसके परिणामस्वरूप विंडो का पूर्ण-स्क्रीन अधिकतमकरण होगा, जो सभी विंडो को ऊपर, नीचे, बाएँ और दाएँ दिशाओं में अधिकतम कर देगा ।
• आखिरकार, हम कोड की उप-प्रक्रिया को समाप्त करते हैं।

नीचे दिखाया गया VBA कोड छोटे उपयोगकर्ता प्रपत्र . को रूपांतरित कर देगा विंडो को पूर्ण-स्क्रीन . में बदलें खिड़की।

कदम

• शुरू करने के लिए, डेवलपर . पर क्लिक करें टैब करें और फिर विजुअल बेसिक select चुनें ।

• एक बार जब आप विजुअल बेसिक खोल लेते हैं विंडो में, सम्मिलित करें . पर क्लिक करें ।
• अगले चरण में, उपयोगकर्ता प्रपत्र select चुनें ड्रॉप-डाउन मेनू से.

• उसके बाद एक आयताकार विंडो बॉक्स दिखाई देगा।
• गुणों . पर फलक, आप उस विंडो का नाम बदल सकते हैं और कैप्शन कर सकते हैं।
• और यह उपयोगकर्ता प्रपत्र का उपयोग करने के लिए बॉक्स है , आप विभिन्न आकार, बटन, चेकबॉक्स आदि जोड़ सकते हैं और उन्हें शीट से लिंक कर सकते हैं।

• फिर उस बॉक्स पर डबल क्लिक करें।
• और आप देखेंगे कि एक संपादक विंडो है। उस संपादक विंडो में, नीचे दिया गया कोड पेस्ट करें।

Private Sub UserForm_Initialize()
    With Fullscreen_form_3
        .Height = Application.Height
        .Width = Application.Width
    End With
End Sub

• जैसे ही आपने कोड दर्ज किया है, सहेजें . पर क्लिक करें आइकन पर क्लिक करें और फिर उपयोगकर्ता प्रपत्र . पर दो बार क्लिक करें
• यह आपको मुख्य उपयोगकर्ता प्रपत्र . पर ले जाएगा फिर से बॉक्स।
• अब उदाहरण के लिए, कुछ तत्वों को उपयोगकर्ता प्रपत्र . में जोड़ें
• हमने कुछ टेक्स्ट बॉक्स added जोड़े हैं और कुछ कमांड बटन , एक इनपुट बॉक्स . के साथ ।
• फिर चलाएं . पर क्लिक करें छवि में दिखाया गया बटन।

• चलाएं . पर क्लिक करना आदेश, हम उपयोगकर्ता प्रपत्र . देख सकते हैं
• उपयोगकर्ता प्रपत्र . के बाद निष्पादित किया जाता है, तो हम देख सकते हैं कि उपयोगकर्ता प्रपत्र अब स्क्रीन के पूरे हिस्से पर कब्जा कर रहा है। जैसा कि छवि . में दिखाया गया है

🔎 VBA कोड विश्लेषण

• सबसे पहले, हम उपयोगकर्ता प्रपत्र . चुनते हैं वस्तु के रूप में और आरंभ करें प्रक्रिया के रूप में।
• हम अगली पंक्ति में Userform एप्लिकेशन विंडो का चयन करेंगे।
• फिर हमने एप्लिकेशन की ऊंचाई और चौड़ाई को .ऊंचाई . में सहेजा है और .चौड़ाई
• आखिरकार, हम कोड की उप-प्रक्रिया को समाप्त करते हैं।

निम्नलिखित VBA कोड छोटे उपयोगकर्ता प्रपत्र . का विस्तार करता है पूर्णस्क्रीन पर कब्जा करने के लिए पैनल। ।

कदम

• शुरू करने के लिए, डेवलपर . पर क्लिक करें टैब करें और फिर विजुअल बेसिक select चुनें ।

• एक बार जब आप विजुअल बेसिक खोल लेते हैं विंडो में, सम्मिलित करें . पर क्लिक करें ।
• अगले चरण में, उपयोगकर्ता प्रपत्र select चुनें ड्रॉप-डाउन मेनू से।

• उसके बाद एक आयताकार विंडो बॉक्स दिखाई देगा।
• गुणों . पर फलक, आप उस विंडो का नाम बदल सकते हैं और कैप्शन कर सकते हैं।
• और यह उपयोगकर्ता प्रपत्र का उपयोग करने के लिए बॉक्स है , आप विभिन्न आकार, बटन, चेकबॉक्स आदि जोड़ सकते हैं और उन्हें शीट से लिंक कर सकते हैं।

• फिर उस बॉक्स पर डबल क्लिक करें।
• और आप देखेंगे कि एक संपादक विंडो है। उस संपादक विंडो में, नीचे दिया गया कोड पेस्ट करें।

Private Sub UserForm_Initialize()
Dim xlws As XlWindowState
xlws = Application.WindowState
Application.WindowState = xlMaximized
With Fullscreen_form_4
    .Top = Application.Top
    .Left = Application.Left
    .Width = Application.Width
    .Height = Application.Height
    .Show
End With
Application.WindowState = xlws
End Sub

• जैसे ही आपने कोड दर्ज किया है, सहेजें . पर क्लिक करें आइकन पर क्लिक करें और फिर उपयोगकर्ता प्रपत्र . पर दो बार क्लिक करें
• यह आपको मुख्य उपयोगकर्ता प्रपत्र . पर ले जाएगा फिर से बॉक्स।
• अब उदाहरण के लिए, उपयोगकर्ता प्रपत्र . में कुछ तत्व जोड़ें
• हमने कुछ टेक्स्ट बॉक्स added जोड़े हैं और कुछ कमांड बटन , एक इनपुट बॉक्स . के साथ ।
• फिर चलाएं . पर क्लिक करें छवि में दिखाया गया बटन।

• चलाएं . पर क्लिक करना आदेश, हम उपयोगकर्ता प्रपत्र  . देख सकते हैं निष्पादित।
• उपयोगकर्ता प्रपत्र . के बाद निष्पादित किया जाता है, तो हम देख सकते हैं कि उपयोगकर्ता प्रपत्र अब स्क्रीन के पूरे हिस्से पर कब्जा कर रहा है। जैसा कि छवि . में दिखाया गया है

🔎 VBA कोड विश्लेषण

• सबसे पहले, हम उपयोगकर्ता प्रपत्र . चुनते हैं वस्तु के रूप में और आरंभ करें प्रक्रिया के रूप में।
• अगली पंक्ति में, हम xlws . घोषित करते हैं XlWindowState . के लिए चर के रूप में टाइप करें।
• अगली पंक्ति में, विंडोस्टेट अभी चल रहे एप्लिकेशन की विंडो कंडीशन को दर्शाएगा। और हम xlws . डालते हैं वर्तमान विंडो स्थिति के रूप में।
• विंडोस्टेट की स्थिति सेट करना कमांड लाइन xlMaximized . के रूप में एप्लिकेशन की विंडो को अधिकतम करेगा।
• अगली पंक्ति में, हम एप्लिकेशन विंडो का चयन करते हैं।
• फिर हम 4 अलग-अलग पंक्तियों को इनपुट करते हैं, जो सभी विंडो को ऊपर, नीचे, बाएँ और दाएँ दिशाओं में अधिकतम बनाती हैं।
• आखिरकार, कोड की उप-प्रक्रिया समाप्त करें।

निष्कर्ष

संक्षेप में, यह मुद्दा कि हम उपयोगकर्ता प्रपत्र . कैसे दिखा सकते हैं पूर्ण स्क्रीन का उत्तर यहां 4 भिन्न VBA मैक्रो . द्वारा दिया गया है कोड उदाहरण। हालांकि कोड काफी समय कुशल हैं VBA मैक्रो विधि के लिए पहले VBA-संबंधित की आवश्यकता होती है खरोंच से समझने के लिए ज्ञान।

इस समस्या के लिए, एक मैक्रो-सक्षम कार्यपुस्तिका संलग्न है जहाँ आप इन विधियों का अभ्यास कर सकते हैं।

टिप्पणी अनुभाग के माध्यम से कोई भी प्रश्न या प्रतिक्रिया पूछने के लिए स्वतंत्र महसूस करें। Exceldemy . की बेहतरी के लिए कोई सुझाव समुदाय अत्यधिक प्रशंसनीय होगा