VBA స్క్వేర్ రూట్ ఫంక్షన్ | VBA లో SQR ఉపయోగించి SQRT ను ఎలా లెక్కించాలి?
ఎక్సెల్ VBA స్క్వేర్ రూట్ (SQR) ఫంక్షన్
VBA లో మనకు “SQR” అని పిలువబడే అంతర్నిర్మిత ఫంక్షన్ ఉంది, ఈ ఫంక్షన్ ఇన్పుట్లో అందించిన సంఖ్యకు వర్గమూలాన్ని అందిస్తుంది. స్క్వేర్ రూట్ ఫంక్షన్కు దాని ఫంక్షన్కు ఒక వాదన మాత్రమే అవసరం, అంటే సంఖ్య.
SQRT అనేది ఎక్సెల్ మరియు VBA రెండింటిలోనూ స్క్వేర్ రూట్ ఫంక్షన్, ఈ ఫంక్షన్ను ఉపయోగించే పద్ధతి SQR (సంఖ్య) క్రింది విధంగా ఉంటుంది మరియు ఎక్సెల్లో ఇచ్చిన సంఖ్య యొక్క వర్గమూలాన్ని లెక్కించడానికి ఉపయోగిస్తారు, అయితే నామకరణం భిన్నంగా ఉంటుంది మరియు ఇది SQRT గా వ్రాయబడింది VBA లో SQR కు.
క్రింద SQR ఫంక్షన్ యొక్క వాక్యనిర్మాణం ఉంది.
సంఖ్య: ఈ వాదన కోసం, మేము వర్గమూలాన్ని కనుగొనడానికి ప్రయత్నిస్తున్న సంఖ్యను సరఫరా చేయాలి. ఈ సంఖ్య వేరియబుల్కు కేటాయించిన సంఖ్య లేదా సంఖ్య యొక్క ప్రత్యక్ష సరఫరా కావచ్చు లేదా సెల్ రిఫరెన్స్ ఉన్న సంఖ్య చెల్లుతుంది.
ఈ ఫంక్షన్ వర్క్షీట్ ఫంక్షన్తో పాటు VBA ఫంక్షన్ రెండింటిలోనూ లభిస్తుంది కాని వర్క్షీట్లో ఇది SQRT గా లభిస్తుంది.
ఎక్సెల్ VBA లో స్క్వేర్ రూట్ యొక్క ఉదాహరణలు
మీరు ఈ VBA SQRT ఫంక్షన్ ఎక్సెల్ మూసను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు - VBA SQRT ఫంక్షన్ ఎక్సెల్ మూసఉదాహరణ # 1
ఇప్పుడు మేము 64 సంఖ్యకు వర్గమూలాన్ని కనుగొనడానికి కోడ్ రాయడానికి ప్రయత్నిస్తాము.
మొదట, vba సబ్ట్రౌటిన్ను ప్రారంభించండి.
కోడ్:
ఉప స్క్వేర్_ రూట్_ ఉదాహరణ () ముగింపు ఉప
రెండు వేరియబుల్స్ను పూర్ణాంకంగా నిర్వచించండి, ఒకటి సంఖ్యను నిల్వ చేయడం మరియు మరొకటి స్క్వేర్ రూట్ విలువ యొక్క ఫలితాన్ని చూపించడం.
కోడ్:
సబ్ స్క్వేర్_ రూట్_ఎక్సాంపుల్ () డిమ్ యాక్చువల్ నంబర్ ఇంటీజర్ డిమ్ స్క్వేర్ నంబర్ గా ఇంటీజర్ ఎండ్ సబ్
వేరియబుల్ కోసం “యాక్చువల్ నంబర్” సంఖ్య 64 యొక్క విలువను కేటాయించండి.
కోడ్:
సబ్ స్క్వేర్_ రూట్_ఎక్సంపుల్ () డిమ్ యాక్చువల్ నంబర్ ఇంటీజర్ డిమ్ స్క్వేర్ నంబర్ గా ఇంటీజర్ యాక్చువల్ నంబర్ = 64 ఎండ్ సబ్
మరొక వేరియబుల్ కోసం, మేము స్క్వేర్ రూట్ విలువను కేటాయిస్తాము, వేరియబుల్ పేరును నమోదు చేయండి, సమాన పాడండి మరియు SQR ఫంక్షన్ను తెరవండి.
SQR ఫంక్షన్ యొక్క ఏకైక వాదన “సంఖ్య”, ఎందుకంటే మనం ఇప్పటికే 64 సంఖ్యను వేరియబుల్ “ActualNumber” కు కేటాయించాము, SQR ఫంక్షన్లో అదే వేరియబుల్ పేరును సరఫరా చేద్దాం.
తరువాత సందేశ పెట్టెలో ఫలితాన్ని చూపించు. ఇప్పుడు స్క్వేర్ రూట్ సంఖ్య వేరియబుల్ "స్క్వేర్ నంబర్" కు కేటాయించబడింది, అదే వేరియబుల్ పేరును సందేశ పెట్టెకు చూపిస్తుంది.
కోడ్:
సబ్ స్క్వేర్_రూట్_ఎక్సంపుల్ () డిమ్ యాక్చువల్ నంబర్ ఇంటీజర్ డిమ్ స్క్వేర్ నంబర్ గా ఇంటీజర్ యాక్చువల్ నంబర్ = 64 స్క్వేర్ నంబర్ = స్క్వేర్ (యాక్చువల్ నంబర్)
సరే, కోడింగ్తో మేము పూర్తి చేశాము.
ఎక్సెల్ సత్వరమార్గం కీ F5 ను ఉపయోగించి కోడ్ను అమలు చేయండి మరియు సందేశ పెట్టెలో మనకు ఏమి లభిస్తుందో చూడండి.
64 సంఖ్య యొక్క స్క్వేర్ రూట్ 8 అనగా. 8 * 8 = 64
ఉదాహరణ # 2
VBA లో sqrt ను లెక్కించేటప్పుడు మనం గుర్తుంచుకోవలసిన మరో విషయం ఏమిటంటే, వేరియబుల్ డేటా రకం పూర్ణాంకం లేదా పొడవుగా ఉన్నప్పుడు ఫలితం సమీప పూర్ణాంకం లేదా మొత్తం సంఖ్య విలువకు గుండ్రంగా ఉంటుంది.
ఉదాహరణకు, మీరు 70 సంఖ్యకు వర్గమూలాన్ని కనుగొనడానికి ప్రయత్నిస్తుంటే, దీనికి వర్గమూలం లేదు, కానీ VBA లో ఇది 8 గా మాత్రమే చూపిస్తుంది ఎందుకంటే 8 సమీప స్క్వేర్ రూట్ పూర్ణాంక విలువ.
క్రింది కోడ్ చూడండి.
కోడ్:
సబ్ స్క్వేర్_ రూట్_ఎక్సాంపుల్ 1 () డిమ్ యాక్చువల్ నంబర్ ఇంటీజర్ డిమ్ స్క్వేర్ నంబర్ గా ఇంటీజర్ యాక్చువల్ నంబర్ = 70 స్క్వేర్ నంబర్ = స్క్వేర్ (యాక్చువల్ నంబర్) MsgBox స్క్వేర్ నంబర్ ఎండ్ సబ్
70 యొక్క వాస్తవ స్క్వేర్ రూట్ సంఖ్య ఫలితం 8.3666, కానీ VBA తో ఇది సమీప పూర్ణాంక విలువ 8 కి రౌండ్ అవుతుంది.
ఈ లోపాన్ని సరిదిద్దడానికి మనం చేయగలిగేది ఏమిటంటే, వేరియబుల్ “స్క్వేర్ నంబర్” యొక్క డేటా రకాన్ని “డబుల్” గా మార్చాలి.
కోడ్:
సబ్ స్క్వేర్_ రూట్_ఎక్సాంపుల్ 1 () డిమ్ యాక్చువల్ నంబర్ ఇంటీజర్ డిమ్ స్క్వేర్ నంబర్ గా డబుల్ యాక్చువల్ నంబర్ = 70 స్క్వేర్ నంబర్ = స్క్వేర్ (యాక్చువల్ నంబర్) MsgBox స్క్వేర్ నంబర్ ఎండ్ సబ్
ఇప్పుడు కోడ్ను మాన్యువల్గా లేదా ఎఫ్ 5 కీ ద్వారా రన్ చేసి ఫలితాన్ని చూడండి.
మీరు చూడగలిగినట్లుగా ఫలితం ఇప్పుడు ఖచ్చితమైనది, అనగా 8.366602 దీనికి కారణం “స్క్వేర్ నంబర్” అనే వేరియబుల్కు మేము కేటాయించిన డేటా రకం.
గుర్తుంచుకోవలసిన విషయాలు
- సంఖ్య ఫార్ములా యొక్క వర్గమూలాన్ని కనుగొనటానికి VBA లో SQR మరియు వర్క్షీట్లో ఇది SQRT.
- మేము SQR ఫంక్షన్కు సరఫరా చేసే సంఖ్య సానుకూల సంఖ్య అయి ఉండాలి, లేకపోతే మనకు #NUM లభిస్తుంది! లోపం.