सामग्री सारणी
या लेखात, आम्ही एक्सेल VBA मध्ये स्ट्रिंगला नंबरमध्ये रूपांतरित करण्याच्या अनेक पद्धतींवर चर्चा करू. आम्ही अंगभूत फंक्शन्स कसे वापरायचे आणि VBA कोड उदाहरणांसह स्ट्रिंगला नंबरमध्ये रूपांतरित करण्यासाठी त्यांचा वापर करून कस्टम फंक्शन कसे तयार करायचे ते पाहू.
सराव वर्कबुक डाउनलोड करा
तुम्ही हा लेख वाचत असताना व्यायाम करण्यासाठी हे सराव वर्कबुक डाउनलोड करा.
स्ट्रिंगला नंबर.xlsm मध्ये रूपांतरित करा
स्ट्रिंगला नंबरमध्ये रूपांतरित करण्याचे ३ मार्ग एक्सेल VBA मध्ये
1. प्रकार रूपांतरण फंक्शन्स वापरून स्ट्रिंगला नंबरमध्ये रूपांतरित करा
एक्सेल अनेक बिल्ट-इन प्रकार रूपांतरण कार्ये प्रदान करते. स्ट्रिंग डेटाटाइपमधून विविध डेटाटाइपमध्ये सहजपणे रूपांतरित करण्यासाठी आम्ही ते आमच्या VBA कोडमध्ये वापरू शकतो.
1.1 स्ट्रिंग पूर्णांकात
स्ट्रिंग मध्ये रूपांतरित करण्यासाठी पूर्णांक , आपण आमच्या कोडमध्ये CInt फंक्शन वापरू शकतो. CInt फंक्शन केवळ एक आर्ग्युमेंट घेते आणि ते संख्यात्मक मूल्य असावे. व्हिज्युअल कोड एडिटरमध्ये खालील कोड वापरून पाहू.
3751
रन करण्यासाठी F5 दाबा कोड . आउटपुट MsgBox मध्ये दर्शविले आहे.
CInt फंक्शन रूपांतरित संख्यात्मक स्ट्रिंग मूल्य (“12.3” ) ते पूर्णांक 12.
CInt फंक्शन बद्दल अधिक समजून घेण्यासाठी, खालील चालवा कोड एडिटरमध्ये कोड आणि निरीक्षण करा परिणाम .
3727
आउटपुट येथे आहे स्क्रीनशॉट चे अनुसरण करा.
कोड स्पष्टीकरण
या कोडमध्ये, आम्ही साठी… सेलच्या स्ट्रिंगवर CInt फंक्शन लागू करण्यासाठी पुढील लूप B3:B7. आउटपुट सेल C3:C7 मध्ये मुद्रित केले जातात. आम्ही सेल्स फंक्शन इनपुट व्हॅल्यू आणि आउटपुट व्हॅल्यू कोठे मुद्रित करायचे हे निर्दिष्ट करण्यासाठी वापरले.
परिणाम
CInt फंक्शन 25.5 चे पुढील पूर्णांक संख्या 26 मध्ये रूपांतरित केले. दुसरीकडे, ते 10.3 रूपांतरित केले 10 मध्ये, 11 नाही. जेव्हा दशांश अंकीय मूल्य .5 पेक्षा कमी असते, तेव्हा फंक्शन समान संख्येपर्यंत पूर्ण होते. परंतु दशांश अंकीय स्ट्रिंग मूल्य पुढील पूर्णांक संख्येमध्ये बदलते जर ते समान किंवा .5 पेक्षा मोठे असेल.
टीप
पूर्णांक मूल्याची श्रेणी -32,768 ते 32,767 दरम्यान असते. जर आपण अंकीय मूल्य ठेवले जे या श्रेणीच्या बाहेर असेल, तर एक्सेल त्रुटी दर्शवेल.
1.2 स्ट्रिंग लाँग
CLng फंक्शन अंकीय स्ट्रिंग व्हॅल्यूला लांब डेटाटाइप मध्ये रूपांतरित करते. हे CInt फंक्शन प्रमाणेच कार्य करते. मुख्य फरक त्याच्या श्रेणी मध्ये आहे जो -2,147,483,648 आणि 2,147,483,647 दरम्यान आहे.
The code to run is here below:1885
येथे, सेल B3:B9 काही संख्यात्मक स्ट्रिंग मूल्य , आणि रूपांतरित l ऑंग नंबर सेल्समध्ये आहेत C3:C9. CLng फंक्शन रूपांतरित -32800 आणि 32800 यशस्वीरित्या लांब संख्या जे CInt फंक्शन करू शकले नाही. पण इनपुट संख्यात्मक मूल्य रेंजच्या बाहेर असल्यास त्रुटी देखील मिळेल.
1.3 स्ट्रिंग ते दशांश
CDec फंक्शन वापरून आपण रूपांतरित करू शकतो a संख्यात्मक स्ट्रिंग मूल्य ते दशांश डेटाटाइप. सेलमधील B3:B7 दशांश डेटाटाइपमध्ये रूपांतरित संख्यात्मक मूल्ये मध्ये खालील कोड चालवा.
9414
1.4 स्ट्रिंग टू सिंगल
या उदाहरणात, आम्ही इनपुट स्ट्रिंग्स सिंगल डेटाटाइप मध्ये बदलू (एकल -परिसिजन फ्लोटिंग पॉइंट) संख्या. यासाठी, आपल्याला CSng फंक्शन वापरावे लागेल.
एकल डेटाटाइप श्रेणी- (i) -3.402823E38 ते -1.401298E-45 ऋण संख्यांसाठी.
(ii) 1.401298E-45 ते 3.402823E38 साठी सकारात्मक संख्या.
खालील कोड व्हिज्युअल बेसिक एडिटरमध्ये चालवा.
9900
आउटपुटमध्ये, सेल B3:B9 काही संख्यात्मक स्ट्रिंग मूल्य, आणि रूपांतरित सिंगल डेटाटाइप क्रमांक सेल्समध्ये आहेत C3:C9. पण त्याला त्रुटी देखील मिळेल जर इनपुट संख्यात्मक मूल्य श्रेणीबाहेर असेल.
1.5 स्ट्रिंग टू डबल
या उदाहरणात, आम्ही इनपुट स्ट्रिंग्स डबल डेटाटाइप (डबल-प्रिसिजन फ्लोटिंग) मध्ये बदलू. -बिंदू) संख्या. यासाठी आपल्याला आवश्यक आहे CDbl फंक्शन वापरण्यासाठी.
दुहेरी डेटाटाइप श्रेणी- (i) -1.7
5763313486231E308 ते -4.94065645841247E-324 <3 साठी>ऋण संख्या.
(ii) 4.94065645841247E-324 ते 1.7
5763313486232E3 समान पोझिट नंबर पोझिटसाठी .
खालील कोड व्हिज्युअल बेसिक एडिटरमध्ये चालवा.
5763
आउटपुटमध्ये, सेल B3:B9 काही असतात संख्यात्मक स्ट्रिंग मूल्य आणि रूपांतरित दुहेरी डेटाटाइप क्रमांक सेल्समध्ये आहेत C3:C9. परंतु त्यास त्रुटी देखील मिळेल इनपुट असल्यास 3>संख्यात्मक मूल्य हे श्रेणीबाहेर आहे.
1.6 स्ट्रिंग टू करन्सी
चलन डेटा प्रकार जेव्हा गणना पैसा शी संबंधित असेल तेव्हा सुलभ आहे. शिवाय, जर आम्हाला निश्चित – बिंदू गणना मध्ये अधिक अचूकता हवी असेल, तर चलन डेटा प्रकार वापरणे हा एक चांगला पर्याय आहे. स्ट्रिंगला चलन डेटा प्रकार मध्ये रूपांतरित करण्यासाठी आम्हाला CCur फंक्शन वापरावे लागेल. डेटा प्रकार श्रेणी -922,337,203,685,477.5808 पासून 922,337,203,685,477.5808 पर्यंत.
कोड ते रूपांतरित संख्यात्मक st मूल्य सेलमधील 4> B3:B7 ते चलन डेटा प्रकार सेलमधील C3:C7 येथे खाली आहे.
8280
<1
1.7 स्ट्रिंग टू बाइट
CByte फंक्शन संख्यात्मक स्ट्रिंग व्हॅल्यूजला बाइट डेटा प्रकार मध्ये रूपांतरित करते जे पासून श्रेणीत असते. 0 ते 255.
कोड असे आहेफॉलो करते :
3659
आउटपुटमध्ये, सेल B3:B9 काही संख्यात्मक स्ट्रिंग मूल्य, आणि रूपांतरित बाइट डेटा प्रकार क्रमांक सेल्समध्ये आहेत C3:C9. पण त्याला त्रुटी <4 देखील मिळेल>जर इनपुट संख्यात्मक मूल्य श्रेणीबाहेर असेल.
अधिक वाचा: एक्सेल मध्ये VBA वापरून स्ट्रिंग लाँग मध्ये कसे रूपांतरित करावे
समान रीडिंग्स
- एक्सेल VBA मध्ये स्ट्रिंगला दुहेरीमध्ये रूपांतरित करा (5 पद्धती)
- एक्सेल व्हीबीए (मॅक्रोसह 3 उदाहरणे) सह मजकूर क्रमांकावर कसा रूपांतरित करायचा
- एक्सेलमधील नंबरमध्ये रूपांतरित त्रुटीचे निराकरण करा (6 पद्धती)
- वैज्ञानिक नोटेशनला एक्सेलमध्ये नंबरमध्ये कसे रूपांतरित करावे (7 पद्धती)
2. सानुकूल VBA फंक्शनचा वापर एक्सेलमध्ये स्ट्रिंगला नंबरमध्ये तपासण्यासाठी आणि रूपांतरित करण्यासाठी
या चित्रात, रूपांतर करण्यासाठी आम्ही कस्टम फंक्शन बनवणार आहोत. संख्यांना तार. आम्ही नंतर बिल्ट-इन फंक्शन आमच्या वर्कशीटमध्ये हे कस्टम फंक्शन वापरू शकतो. या उदाहरणात, आम्ही कस्टम फंक्शन तयार करताना CInt फंक्शन स्ट्रिंग्सचे पूर्णांक कन्व्हर्ट करण्यासाठी कन्व्हर्ट करू. आम्ही पद्धत 1 मध्ये वर्णन केलेली सर्व इतर फंक्शन्स स्ट्रिंग्स वेगवेगळ्या डेटा प्रकारांमध्ये रूपांतरित करण्यासाठी देखील वापरू शकतो. आता, हे पूर्ण करण्यासाठी खालील चरणांचे अनुसरण करा.
चरण:
- येथे, सेलमध्ये B3:B7, आमच्याकडे काही आहेत संख्यात्मक स्ट्रिंगमूल्ये.
- आता, व्हिज्युअल बेसिक एडिटरमध्ये, खालील कोड कॉपी आणि पेस्ट करा आणि नंतर सेव्ह करण्यासाठी Ctrl + S दाबा
9218
- सेलमध्ये C3 , टायपिंग सुरू करा कार्याचे नाव ( StringToNumber ). एक्सेल वापरण्यासाठी स्वयंचलितपणे फंक्शन सुचवेल. फंक्शन प्रविष्ट करण्यासाठी टॅब की दाबा.
- सेल संदर्भ B3 ठेवा केवळ युक्तिवाद म्हणून.
- आता, कंस बंद केल्यानंतर एंटर दाबा.
- लागू करण्यासाठी सेलच्या उजव्या तळाशी कोपर्यात फिल हँडल शोधा C3 सेल्सचे फंक्शन C4:C7.
- अंतिम आउटपुट स्ट्रिंग व्हॅल्यूजमधील प्रतिष्ठित पूर्णांक संख्या आहे .
3. VBA कोड सेलच्या निवडलेल्या श्रेणीला एक्सेल मधील संख्यांमध्ये रूपांतरित करण्यासाठी
या चित्रात, आम्ही निवडलेल्या सेलची श्रेणी मध्ये रूपांतरित करू पूर्णांक संख्यांमध्ये स्ट्रिंग व्हॅल्यू आहेत. कोणत्याही सेलमध्ये नॉन-न्यूमेरिक मूल्य असल्यास, आउटपुट डॅश (-) रेषा ऐवजी असेल. चरण :
- सेल्स निवडा B3:B6 संख्यात्मक स्ट्रिंग्स मूल्ये आणि B7 ज्यामध्ये आहे a नॉन-न्यूमेरिक
- Visual Basic Editor कॉपी आणि खालील पेस्ट करा कोड .
Sub StringToNumber() Dim convertedNum As Variant For Each cell In Selection If IsNumeric(cell) Then If IsEmpty(cell) Then convertedNum = "-" Else convertedNum = CInt(cell) End If Else convertedNum = "-" End If With cell .Value = convertedNum .HorizontalAlignment = xlCenter End With Next cell End Sub
- आता, रन आउटपुट मध्ये दाखवल्याप्रमाणे F5 दाबा खालील स्क्रीनशॉट .
नोट्स
- आम्ही वापरले isNumeric फंक्शन दुसरे आणि तिसरे पद्धती आमच्या VBA कोडमध्ये जे अभिव्यक्ती एका संख्येत रूपांतरित केली जाऊ शकते की नाही हे तपासते.
- पद्धतीमध्ये 1 , आम्ही बिल्ट-इन फंक्शन्स (CInt, CDbl, CSng…..) वापरले ते न्यूमेरिक स्ट्रिंग व्हॅल्यूज ते संख्या मध्ये रूपांतरित करण्यासाठी. पण नॉन-न्यूमेरिक व्हॅल्यू असल्यास, ते न जुळणारी एरर दाखवेल.
निष्कर्ष
आता, एक्सेलमधील स्ट्रिंग व्हॅल्यूजला नंबर्समध्ये कसे रूपांतरित करायचे हे आपल्याला माहित आहे. आशा आहे की, ते तुम्हाला ही कार्यक्षमता अधिक आत्मविश्वासाने वापरण्यास प्रोत्साहित करेल. कोणतेही प्रश्न किंवा सूचना खालील टिप्पणी बॉक्समध्ये टाकण्यास विसरू नका.