ఎక్సెల్ లో రౌండ్ అప్ నంబర్స్ నుండి VBA రౌండప్ ఫన్సిటన్
ఎక్సెల్ VBA రౌండ్అప్ ఫంక్షన్
వర్క్‌షీట్ ఫంక్షన్ మాదిరిగానే మేము సంఖ్యలను దగ్గరి పూర్ణాంకాలకు చుట్టుముట్టాము, VBA లో మనకు a రౌండ్అప్ ఫంక్షన్ ఇది మనకు దశాంశ బిందువును తగ్గిస్తుంది మరియు రౌండప్ ఫంక్షన్‌ను ఉపయోగించటానికి వాక్యనిర్మాణం క్రింది విధంగా ఉంటుంది రౌండ్ అప్ (సంఖ్య, దశాంశం తరువాత అంకెలు సంఖ్య) ఫంక్షన్‌లో ఈ రెండు వాదనలు తప్పనిసరి.
మేము సంఖ్యలు మరియు గణనలతో పనిచేసేటప్పుడు మొత్తం సంఖ్య తర్వాత భిన్న సంఖ్యలను పొందుతాము మరియు ఇది రోజువారీ వ్యాపారంలో చాలా సాధారణం. మేము సాధారణంగా దశాంశ విలువల గురించి బాధపడము ఎందుకంటే ఇది మా తుది ఫలితంపై ఎటువంటి ప్రభావాన్ని చూపదు. ఆ పరిస్థితులలో, మేము సంఖ్యలను సమీప మొత్తం సంఖ్యకు లేదా తక్షణ మొత్తం సంఖ్యకు చుట్టుముట్టాలి. రౌండ్అప్ ఫంక్షన్‌ను ఉపయోగించడం ద్వారా మనం నిజంగా ఈ పనిని చేయవచ్చు.
రౌండ్అప్ ఫంక్షన్ కోసం మీరు VBA లో శోధించినట్లయితే, అది వర్క్‌షీట్ ఫంక్షన్ కనుక మీరు దానిని కనుగొనలేదు. రౌండ్అప్ ఫంక్షన్‌ను యాక్సెస్ చేయడానికి, మేము vba వర్క్‌షీట్ ఫంక్షన్ క్లాస్‌ని ఉపయోగించాలి.
దీనికి ముందు రౌండ్అప్ ఫంక్షన్ యొక్క వాక్యనిర్మాణం గుర్తుకు వస్తుంది.
ఉదాహరణలు
మీరు ఈ VBA రౌండ్అప్ ఎక్సెల్ మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA రౌండ్అప్ ఎక్సెల్ మూస“288.5264” సంఖ్యను చుట్టుముట్టే పనిని చేద్దాం. ఈ ఉదాహరణతో అన్ని సంఖ్యలను చూస్తాము.
ఉదాహరణ # 1 - రెండవ వాదన సున్నా అయినప్పుడు
క్రింద ఉన్న VBA కోడ్ చూడండి.
కోడ్:
ఉప రౌండ్అప్_ఎక్సాంపుల్ 1 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, 0) MsgBox k ఎండ్ సబ్
- మీరు పై కోడ్‌ను అమలు చేసినప్పుడు అది అందించిన సంఖ్యను అనగా 288.5264 ని సమీప మొత్తం సంఖ్యకు మారుస్తుంది, అంటే 289
ఉదాహరణ # 2 - రెండవ వాదన 1 అయినప్పుడు
మేము రెండవ వాదనగా ఒకదాన్ని దాటినప్పుడు ఏమి జరుగుతుందో చూడటానికి క్రింది కోడ్‌ను చూడండి.
కోడ్:
ఉప రౌండ్అప్_ఎక్సాంపుల్ 2 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, 1) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఇచ్చిన సంఖ్యను ఒక దశాంశ బిందువుగా మారుస్తుంది, అనగా 288.6
ఉదాహరణ # 3 - రెండవ వాదన 2 అయినప్పుడు
రెండవ వాదనగా మనం రెండు దాటినప్పుడు ఏమి జరుగుతుందో చూడటానికి క్రింది కోడ్ చూడండి.
కోడ్:
ఉప రౌండ్అప్_ఎక్సాంపుల్ 3 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, 2) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఇచ్చిన సంఖ్యను రెండు దశాంశ బిందువులకు మారుస్తుంది, అనగా 288.53
ఉదాహరణ # 4 - రెండవ వాదన 3 అయినప్పుడు
మేము రెండవ వాదనగా మూడు దాటినప్పుడు ఏమి జరుగుతుందో చూడటానికి ఈ క్రింది కోడ్‌ను చూడండి.
కోడ్:
ఉప రౌండ్అప్_ఎక్సాంపుల్ 4 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, 3) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఇచ్చిన సంఖ్యను మూడు దశాంశ బిందువులకు మారుస్తుంది, అనగా 288.527
ఉదాహరణ # 5 - రెండవ వాదన -1 అయినప్పుడు
మేము రెండవ వాదనగా మైనస్ వన్ పాస్ చేసినప్పుడు ఏమి జరుగుతుందో చూడటానికి క్రింది కోడ్ చూడండి.
కోడ్:
ఉప రౌండ్అప్_ఎక్సాంపుల్ 5 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, -1) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఇచ్చిన సంఖ్యను సమీప పదికి మారుస్తుంది, అంటే 290.
ఉదాహరణ # 6 - రెండవ వాదన -2 అయినప్పుడు
మేము రెండవ వాదనగా మైనస్ రెండు దాటినప్పుడు ఏమి జరుగుతుందో చూడటానికి క్రింది కోడ్ చూడండి.
కోడ్:
సబ్ రౌండ్అప్_ఎక్సాంపుల్ 6 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, -2) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఇచ్చిన సంఖ్యను సమీప వందకు మారుస్తుంది, అంటే 300.
ఉదాహరణ # 7 - రెండవ వాదన -3 అయినప్పుడు
మేము రెండవ వాదనగా మైనస్ మూడు దాటినప్పుడు ఏమి జరుగుతుందో చూడటానికి క్రింది కోడ్ చూడండి.
కోడ్:
సబ్ రౌండ్అప్_ఎక్సాంపుల్ 7 () డిమ్ కె డబుల్ k = వర్క్‌షీట్ఫంక్షన్.రౌండ్అప్ (288.5264, -3) MsgBox k ఎండ్ సబ్
- ఈ కోడ్ ఆ సంఖ్యను సమీప వెయ్యికి మారుస్తుంది, అంటే 1000.
ఇలా, మేము అందించిన రెండవ ఆర్గ్యుమెంట్ ఆధారంగా సంఖ్యలను చుట్టుముట్టడానికి వర్క్‌షీట్ ఫంక్షన్ క్లాస్‌లో భాగంగా VBA లోని ROUNDUP ఫంక్షన్‌ను ఉపయోగించవచ్చు.
