सामग्री सारणी
VBA Mod हे फंक्शन नाही तर MOD Excel वर्कशीटमधील फंक्शन आहे. VBA Mod एक ऑपरेटर आहे जो दोन संख्यांना विभाजित करतो आणि उर्वरित परत करतो. ऑपरेटर मॉड हे मॉड्युलो चे एक लहान रूप आहे जे गणिताच्या ऑपरेशन्समध्ये वापरले जाते. मॉड ऑपरेटर राऊंड अप फ्लोटिंग पॉइंट .
या लेखात, मी दाखवेन एक्सेल VBA मॉड ऑपरेटर वापरण्याची विविध उदाहरणे.
सराव करण्यासाठी डाउनलोड करा
VBA मॉड ऑपरेटरची उदाहरणे. xlsm
VBA मॉड फंक्शनची मूलभूत माहिती: सारांश & सिंटॅक्स
सारांश
VBA मोड ऑपरेटर दोन संख्यांना विभाजित करतो आणि उर्वरित परत करतो. जेथे एक विभाजक दुसरा एक संख्या म्हणून ओळखला जातो. मोड ऑपरेटर संख्या ला विभाजक ने विभाजित करतो.
वाक्यरचना
Number1 Mod Number2 (Divisor)
वितर्क
| वितर्क | आवश्यक/ पर्यायी | स्पष्टीकरण |
|---|---|---|
| क्रमांक1 | आवश्यक | ते संख्यात्मक अभिव्यक्ती आहे |
| संख्या2 | आवश्यक | तो संख्यात्मक<आहे 2> अभिव्यक्ती |
रिटर्न व्हॅल्यू
VBA मॉड ऑपरेटर उर्वरित<2 परत करतो>.
आवृत्ती
VBA मॉड ऑपरेटर Excel 2000 आणि नंतरसाठी उपलब्ध आहे.<20
मी यासाठी एक्सेल मायक्रोसॉफ्ट 365 वापरत आहेविभाग १ मध्ये स्पष्ट केले आहे.
➤ मी बटण नाव दिले सम किंवा विषम .
त्यानंतर, <1 चालविण्यासाठी बटण वर क्लिक करा>VBA कोड.
म्हणून, तुम्हाला कळेल कोणते मूल्य सम आणि कोणते विषम आहे.
येथे, 1 विषम संख्या आहे.
येथे, 2 सम<2 आहे> संख्या.
अधिक वाचा: VBA असल्यास – नंतर – Excel मध्ये इतर विधान (4 उदाहरणे)
9. उर्वरित मिळविण्यासाठी VBA मॉडमधील सेल रेंज वापरणे
तुम्ही सेल श्रेणी वापरून उर्वरित मिळवू शकता. VBA Mod .
VBA संपादक उघडण्यासाठी, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड टाइप करा. मॉड्युल .
3862
येथे, Get_Reminder_UsingVBA उप-प्रक्रियेत, मी व्हेरिएबल घोषित केले आहे n पूर्णांक म्हणून.
मग, मी फॉर लूप वापरला जिथे मी सेल संदर्भाद्वारे घोषित केलेले मूल्य ठेवले. पंक्ती 4 पासून 9 पर्यंतच्या मूल्यांसाठी लूप कार्य करेल.
नंतर उर्वरित <2 दर्शविण्यासाठी MsgBox वापरले>.
आता, कोड सेव्ह करा आणि वर्कशीटवर परत जा.
बटण घालण्यासाठी, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा. .
➤ मी बटणाला नाव दिले डायनॅमिक सेल संदर्भ .
त्यानंतर, VBA<2 चालवण्यासाठी बटण वर क्लिक करा> कोड.
म्हणून, तुम्हाला सर्व वापरलेल्या मूल्यांसाठी उर्वरित मिळेल.एकाने.
पहिला संख्या 29 जेथे विभाजक 3 आहे.
दुसरा हा संख्या -47 जेथे विभाजक आहे 5 .
पंक्ती 9 पर्यंत पोहोचेपर्यंत लूप कार्य करेल. पाचवा संख्या 59 जेथे विभाजक 6 आहे.
संबंधित सामग्री: एक्सेलमध्ये VBA यादृच्छिक कार्य कसे वापरावे (5 उदाहरणे)
एक्सेल MOD आणि मधील फरक VBA Mod
जरी बहुतेक प्रकरणांमध्ये रिटर्न व्हॅल्यू MOD फंक्शन आणि VBA मॉड ऑपरेटरसाठी समान असतात तरीही काही प्रकरणांमध्ये परिणाम एकमेकांपासून वेगळे आहेत. मी तुम्हाला त्यांच्यातील फरक दाखवतो.
| MOD फंक्शन | VBA मॉड ऑपरेटर |
|---|---|
| MOD फंक्शन पूर्णांक आणि दशांश संख्या दोन्ही मिळवते. | मॉड ऑपरेटर फक्त पूर्णांक संख्या परत करतो. |
| MOD मध्ये ऋण संख्या वापरत असताना ते <परत करत नाही. 1>नकारात्मक चिन्ह . | हे नकारात्मक संख्यांना समर्थन देते आणि नंतर नकारात्मक चिन्ह परत करते. |
लक्षात ठेवण्याच्या गोष्टी
🔺 ऑपरेटर राऊंड अप करेल दशांश/फ्लोटिंग गुण.
सराव विभाग
या स्पष्ट केलेल्या उदाहरणांचा सराव करण्यासाठी मी कार्यपुस्तिकेत सराव पत्रक दिले आहे.
निष्कर्ष
या लेखात, मी एक्सेल VBA मॉड ऑपरेटरची ९ उदाहरणे दाखवली आहेत. मी वारंवार चुका दाखविण्याची कारणे कव्हर करण्याचा प्रयत्न केला. ऑपरेटर वापरताना आपल्याला लक्षात ठेवण्यासाठी आवश्यक असलेल्या गोष्टींसह. कोणत्याही प्रकारच्या शंका आणि सूचनांसाठी खाली टिप्पणी करण्यास मोकळ्या मनाने.
ही उदाहरणे अंमलात आणा.एक्सेलमध्ये VBA मॉड फंक्शन वापरण्याची 9 उदाहरणे
1. उर्वरित मिळवण्यासाठी VBA मॉड वापरणे
तुम्हाला हवे असल्यास, तुम्ही उर्वरित VBA मॉड ऑपरेटर वापरून.
मी तुम्हाला प्रक्रिया समजावून सांगतो,
सुरुवातीसाठी, डेव्हलपर उघडा टॅब >> Visual Basic निवडा.
➤ आता, Microsoft Visual Basic for Applications ची नवीन विंडो दिसेल.
पुढे, इन्सर्ट वरून >> मॉड्युल
आता, खालील कोड मॉड्युल मध्ये टाइप करा.
4024
येथे, Get_Reminder उप प्रक्रियेमध्ये, मी व्हेरिएबल n पूर्णांक म्हणून घोषित केले आणि <1 चे परत केलेले मूल्य ठेवण्यासाठी वापरले>मॉड ऑपरेटर.
नंतर उरलेले दाखवण्यासाठी MsgBox वापरले.
आता, सेव्ह द कोड आणि वर्कशीटवर परत जा.
पुन्हा, डेव्हलपर टॅब >> उघडा. कडून घाला >> फॉर्म नियंत्रणे
आता, ड्रॅग बटण वर बटण निवडा तुम्हाला मथळा द्यायचा आहे तिथे ठेवा.
पुढे, तुम्ही बटणाला नाव देऊ शकता.
➤ मी त्याचे नाव दिले आहे स्मरणपत्र मिळवा .
⏩ आता, माउसवर उजवे क्लिक करा असाइन मॅक्रो संदर्भ मेनू दिसेल.
तेथून मॅक्रो नियुक्त करा निवडा.
⏩ A संवाद बॉक्स चा असाइन मॅक्रो दिसेल. .
मग, मॅक्रो नाव आणि मॅक्रो मध्ये निवडा.
⏩ मी मॅक्रो नाव मधून Get_Reminder निवडले आणि <1 निवडले>VBA Mod.xlsm मॅक्रो मधील .
शेवटी, ठीक आहे क्लिक करा.
त्यानंतर, Get_Reminder नावाच्या बटणावर क्लिक करा.
म्हणून, ते remainder सह msg बॉक्स दर्शवेल.
<0
तुम्ही उर्वरित मिळवण्यासाठी सर्व संख्या साठी करू शकता.
अधिक वाचा: एक्सेलमधील VBA फॉरमॅट फंक्शन (उदाहरणांसह 8 वापर)
2. उर्वरित मिळवण्यासाठी VBA मॉडमधील सेल संदर्भ वापरणे
एक्सेल शीटमधून सेल संदर्भ वापरून, तुम्ही VBA मॉड वरून उर्वरित मिळवू शकता.
उघडण्यासाठी VBA संपादक, विभाग 1 मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड मॉड्यूल मध्ये टाइप करा.
8730
येथे, Reminder_Using_CellReference मध्ये, मी व्हेरिएबल n Integer म्हणून घोषित केले आणि Mod <चे परत केलेले मूल्य ठेवण्यासाठी वापरले. 2>ऑपरेटर.
पुढे , सेल संदर्भ B4 क्रमांक1 आणि C4 क्रमांक2 (विभाजक)
नंतर <1 वापरला>MsgBox उरलेले दाखवण्यासाठी.
आता, सेव्ह कोड आणि वर्कशीटवर परत जा.
घालण्यासाठी बटण , विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
➤ मी बटण नाव दिले सेल संदर्भ .
त्यानंतर, वर क्लिक करा बटण रन करण्यासाठी VBA कोड.
म्हणून, तुम्हाला वापरलेल्या सेल संदर्भासाठी उर्वरित मिळेल.
संबंधित सामग्री: कसे व्हीबीए फंक्शनमधील मूल्य परत करा (अॅरे आणि नॉन-अॅरे व्हॅल्यू दोन्ही)
3. निगेटिव्ह नंबरमधून उर्वरित मिळवण्यासाठी VBA मोड वापरणे
द उर्वरित मोजताना VBA Mod ऋण संख्या चे देखील समर्थन करते.
VBA <2 उघडण्यासाठी>संपादक, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड मॉड्युल मध्ये टाइप करा.
3270
येथे , Reminder_From_NegativeNumber, मध्ये मी व्हेरिएबल n Integer म्हणून घोषित केले आणि Mod ऑपरेटरचे परत केलेले मूल्य ठेवण्यासाठी वापरले.<3
पुढे, सेल संदर्भ B5 क्रमांक1 आणि C5 क्रमांक2 (विभाजक)
म्हणून वापरला. नंतर उर्वरित दाखवण्यासाठी MsgBox वापरले.
आता, सेव्ह कोड आणि वर्कशीटवर परत जा.
बटण घालण्यासाठी, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
➤ मी नाव दिले आहे. e बटण नकारात्मक क्रमांकावरून स्मरणपत्र .
त्यानंतर, VBA कोड चालवण्यासाठी बटण वर क्लिक करा.
त्यामुळे, तुम्हाला ऋण संख्या साठी उर्वरित मिळेल.
अधिक वाचा: VBA IsNumeric Function कसे वापरावे (9 उदाहरणे)
4. सेलमध्ये रिमेंडर मिळवण्यासाठी VBA मोड वापरणे
उरलेले दाखवण्याऐवजी च्या माध्यमातून msg बॉक्स तुम्ही VBA MOD फंक्शन वापरून सेलमध्ये ठेवू शकता.
VBA उघडण्यासाठी संपादक, विभाग 1 मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड मॉड्यूल मध्ये टाइप करा.
4199
येथे, s ub-procedure Reminder_in_Cell मध्ये, मी ActiveCell चे स्थान मिळवण्यासाठी ActiveCell.FormulaR1C1 फॉरमॅट वापरले.
नंतर, उर्वरित मिळविण्यासाठी MOD फंक्शन वापरले.
तसेच, निवडा पद्धत वापरली.
आता. , कोड सेव्ह करा आणि वर्कशीटवर परत जा.
बटण आणि असाइन VBA कोड घालण्यासाठी विभाग 1 मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
➤ मी बटण नाव दिले सेलमधील रिमाइंडर .
पुढे, D4 सेल निवडा.<3
नंतर, VBA कोड चालवण्यासाठी बटण वर क्लिक करा.
परिणामी, तुम्हाला मिळेल निवडलेल्या सेलमध्ये उर्वरित .
याच प्रक्रियेचे अनुसरण केल्‍याने, तुम्हाला उरलेल्या सेलमध्ये उर्वरित मिळेल. संख्या. <3
अधिक वाचा: एक्सेल व्हीबीए (संपूर्ण मार्गदर्शक तत्त्व) मध्ये MsgBox फंक्शन कसे वापरावे
5. पूर्णांक भाजकासह VBA मोड वापरणे & फ्लोट क्रमांक
जर तुमचा विभाजक एक पूर्णांक प्रकार असेल, परंतु तुमचा संख्या फ्लोट मध्ये असेल टाईप करा नंतर तुम्ही VBA मॉड ऑपरेटर वापरू शकता.
VBA संपादक उघडण्यासाठी, विभागात स्पष्ट केलेल्या चरणांचे अनुसरण करा.1.
नंतर, खालील कोड मॉड्युल मध्ये टाइप करा.
8542
येथे, R eminder_From_Decimal_Number उप -प्रक्रिया, मी व्हेरिएबल n पूर्णांक म्हणून घोषित केले आणि मॉड ऑपरेटरचे परत केलेले मूल्य ठेवण्यासाठी वापरले.
पुढे, सेल संदर्भ B5 number1 आणि C5 number2 (विभाजक)
म्हणून वापरले. 1>MsgBox उर्वरित दाखवण्यासाठी.
आता, सेव्ह कोड आणि वर्कशीटवर परत जा.
इन्सर्ट करण्यासाठी बटण , विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
➤ मी बटण नाव दिले दशांश क्रमांकावरून स्मरणपत्र .
त्यानंतर, वर क्लिक करा. VBA कोड चालवण्यासाठी बटण .
म्हणून, तुम्हाला दशांश संख्या साठी उर्वरित मिळेल.
पण एक समस्या आहे की VBA राउंड अप दशांश . येथे, परिणाम 2.25 असायला हवा होता परंतु VBA मॉड ने तो 2 वर पूर्ण केला आहे.
काही असेल तर लक्षात ठेवा दशांश/ फ्लोटिंग पॉइंट VBA मॉड मध्ये 0.5 पेक्षा मोठा असेल तर तो पुढील पूर्णांक मूल्यापर्यंत पूर्णांक असेल.
जर ते VBA मॉड मध्ये 0.5 पेक्षा कमी आहे, नंतर ते विद्यमान पूर्णांक मूल्याशी राऊंड अप केले जाईल.
वाचा अधिक: एक्सेलमध्ये VBA इंट फंक्शन कसे वापरावे (3 उदाहरणे)
समान वाचन:
- एक्सेल VBA मध्ये IsNull फंक्शन कसे वापरावे (5उदाहरणे)
- Excel मध्ये VBA Str फंक्शन वापरा (4 उदाहरणे)
- VBA स्विच फंक्शन कसे वापरावे (6 योग्य उदाहरणे)
- एक्सेलमध्ये VBA लेन फंक्शन वापरा (4 उदाहरणे)
- एक्सेल शीटमधील डुप्लिकेट कसे काढायचे (7 पद्धती) <45
6. VBA मोड वापरणे जेव्हा विभाजक & संख्या दोन्ही दशांश आहेत
जर तुमचा विभाजक आणि संख्या दोन्ही दशांश/फ्लोट प्रकारात असतील, तर तुम्ही देखील वापरू शकता. VBA मॉड ऑपरेटर.
VBA संपादक उघडण्यासाठी, विभाग 1 मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड टाइप करा. मॉड्युल .
6473
येथे, उप-प्रक्रियेत Decimal_Both_Divisor_Number, मी व्हेरिएबल घोषित केले आहे n पूर्णांक म्हणून आणि मॉड ऑपरेटरचे परत केलेले मूल्य ठेवण्यासाठी वापरले.
पुढे, सेल संदर्भ B5 म्हणून वापरले. number1 आणि C5 number2 (विभाजक)
नंतर उर्वरित दर्शविण्यासाठी MsgBox वापरले.
आता, कोड सेव्ह करा आणि वर्कशीटवर परत जा.
बटण घालण्यासाठी, विभाग १ मध्ये स्पष्ट केलेल्या पायऱ्या फॉलो करा.
➤ मी बटण नाव दिले मिळवा रिमाइंडर फ्रॉम विभाजक & दशांश संख्या .
त्यानंतर, VBA कोड चालवण्यासाठी बटण वर क्लिक करा.
म्हणून, तुम्हाला उर्वरित दोन्ही दशांश भागाकार आणि संख्या .
परंतु एक समस्या आहे VBA राऊंड अप दशांश . येथे, परिणाम 1.75 असायला हवा होता परंतु VBA मॉड याला 2 असे पूर्ण केले.
संबंधित सामग्री:<2 एक्सेलमधील VBA EXP फंक्शन (5 उदाहरणे)
7. VBA मॉड 0.5 पेक्षा जास्त दशांश संख्या पूर्ण करण्यासाठी
येथे, मी करेन VBA मॉड मध्ये राऊंड अप कसे कार्य करते ते दर्शविते.
तुम्हाला दशांश बिंदू समस्या दर्शविण्यासाठी, प्रथम मी गणना करेन उर्वरित Excel MOD फंक्शन वापरून.
सेल D4 मध्ये, खालील सूत्र टाइप करा,
=MOD(B6, C6) येथे, मी भाजक म्हणून B6 क्रमांक C6 वापरले.
मग, उर्वरित मिळविण्यासाठी एंटर दाबा आणि तुम्हाला उर्वरित मिळेल जे 7.7 असेल.
आता, VBA संपादक उघडण्यासाठी VBA Mod द्वारे गणना करूया, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड मॉड्युल मध्ये टाइप करा.
3723
येथे, उप-प्रक्रिया दशांश_दोन्ही_विभाजक_संख्या, मी घोषित केले. चल e n पूर्णांक म्हणून आणि मॉड ऑपरेटरचे परत केलेले मूल्य ठेवण्यासाठी वापरले.
पुढे, सेल संदर्भ वापरला B6 क्रमांक1 म्हणून आणि C6 क्रमांक2 (विभाजक)
नंतर दर्शविण्यासाठी MsgBox वापरले उर्वरित .
आता, सेव्ह कोड आणि वर्कशीटवर परत जा.
बटण घालण्यासाठी, फॉलो करा दविभाग 1 मध्ये स्पष्ट केलेल्या पायऱ्या.
➤ मी बटण नाव दिले दशांश क्रमांकाचे राउंडअप .
त्यानंतर, बटण वर क्लिक करा <> 1>VBA कोड.
म्हणून, तुम्हाला वापरलेल्या सेल संदर्भासाठी उर्वरित मिळेल.
काळजीपूर्वक पहा उर्वरित वर जे VBA मॉड परत आले. MOD समान मूल्यांसाठी फंक्शन 7.7 परंतु VBA मॉड ऑपरेटरने 0 परत केले. जसे की VBA मूल्ये पूर्ण करतात.
अधिक वाचा: एक्सेलमध्ये VBA राउंड फंक्शन कसे वापरावे (6 द्रुत वापर)
8. सम किंवा विषम संख्या निश्चित करा
VBA मोड ही सम किंवा विषम संख्या निर्धारित करते दिलेल्या श्रेणीतून.
VBA संपादक उघडण्यासाठी, विभाग १ मध्ये स्पष्ट केलेल्या चरणांचे अनुसरण करा.
नंतर, खालील कोड मॉड्युल<मध्ये टाइप करा. २. .
मग, मी फॉर लूप वापरला जिथे मी सेल संदर्भाद्वारे घोषित केलेले मूल्य ठेवले.
पुढे, मी IF वापरले फंक्शन जेथे मी निकष n Mod 2 = 0 म्हणून सेट केला आहे जर मूल्य सत्य असेल तर ते सम विधान देईल अन्यथा विषम .<3
नंतर स्टेटमेंट्स दर्शविण्यासाठी MsgBox वापरले.
आता, सेव्ह करा कोड आणि वर्कशीटवर परत जा.
बटण घालण्यासाठी, चरणांचे अनुसरण करा
