VBA VARTYPE ఫంక్షన్ | వేరియబుల్ యొక్క డేటా రకాన్ని ఎలా కనుగొనాలి?

ఎక్సెల్ VBA వర్టైప్ ఫంక్షన్

VBA VARTYPE అంటే “వేరియబుల్ టైప్”. ఈ ఫంక్షన్ నిర్దిష్ట వేరియబుల్‌కు కేటాయించిన డేటా రకాన్ని గుర్తించడానికి మాకు సహాయపడుతుంది లేదా సరళమైన మాటలో చెప్పాలంటే వేరియబుల్‌కు ఏ విధమైన విలువ నిల్వ చేయబడిందో లేదా కేటాయించబడిందో అది కనుగొంటుంది.

సింటాక్స్

వర్నామ్: సరఫరా చేయబడిన వేరియబుల్ పేరులో నిల్వ చేయబడిన డేటాను కనుగొనడానికి మేము వేరియబుల్ పేరును సరఫరా చేయాలి.

కాబట్టి, ఇది వేరియబుల్ పేరును సింటాక్స్ లేదా ఆర్గ్యుమెంట్‌గా తీసుకుంటుంది మరియు అవుట్‌పుట్‌లో, ఇది వేరియబుల్‌కు కేటాయించిన డేటా రకాన్ని లేదా వేరియబుల్‌లో నిల్వ చేసిన డేటాను తిరిగి ఇస్తుంది.

కాబట్టి, వేరియబుల్ డేటా రకాన్ని లేదా వేరియబుల్‌కు కేటాయించిన డేటాను ఎలా కనుగొనాలో మీరు ఎప్పుడైనా ఆలోచిస్తే, ఇక్కడ మనకు VBA ఫంక్షన్ “VarType” ఉంది.

ఉదాహరణలు

మీరు ఈ VBA VARTYPE ఎక్సెల్ మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA VARTYPE Excel మూస

ఉదాహరణ # 1

VBA లో కోడ్ వ్రాసేటప్పుడు మేము సాధారణంగా వేరియబుల్ అని ప్రకటించి వారికి డేటా రకాన్ని కేటాయిస్తాము. ఉదాహరణకు దిగువ VBA కోడ్‌ను చూడండి.

కోడ్:

 ఉప VarType_Example () మసకబారిన MyVar స్ట్రింగ్ MyVar = "హలో" ముగింపు ఉప 

పై ఉదాహరణలో, మేము వేరియబుల్‌ను “స్ట్రింగ్” గా ప్రకటించాము మరియు ఈ స్ట్రింగ్ కోసం, మేము విలువను “హలో” గా కేటాయించాము.

ఇది స్ట్రెయిట్ ఫార్వర్డ్ కేస్ అయితే వేరియబుల్స్ ను వారికి కేటాయించకుండా డిక్లేర్ చేయడం కూడా సాధ్యమే, కాబట్టి అలాంటి సందర్భాల్లో, వర్టైప్ ఫంక్షన్ మనకు సహాయపడుతుంది.

కోడ్:

 ఉప VarType_Example () డిమ్ MyVar MyVar = "హలో" ముగింపు ఉప 

పై కోడ్‌లో మనం ఏ డేటా రకాన్ని కేటాయించలేదు కాని నేరుగా “హలో” గా విలువను కేటాయించాము, కాబట్టి వర్టైప్ ఫంక్షన్‌ను ఉపయోగించడం ద్వారా మనం వేరియబుల్ యొక్క డేటా రకాన్ని కనుగొనవచ్చు.

పై కోడ్‌లో VBA కోడింగ్‌లో MSGBOX ని తెరవండి.

అప్పుడు VarType ఫంక్షన్‌ను తెరవండి.

ఇప్పుడు వేరియబుల్ పేరును VARTYPE ఫంక్షన్ యొక్క ఆర్గ్యుమెంట్‌గా నమోదు చేయండి.

కోడ్:

 ఉప VarType_Example () డిమ్ MyVar MyVar = "హలో" MsgBox VarType (MyVar) ముగింపు ఉప 

ఇప్పుడు కోడ్‌ను అమలు చేసి, సందేశ పెట్టెలో మనకు ఏమి లభిస్తుందో చూడండి.

ప్రతి రకమైన వేరియబుల్ డేటా రకానికి VBA కి కొన్ని సంకేతాలు ఉన్నందున మేము ఫలితాన్ని 8 గా పొందాము, కాబట్టి మీ కోసం వివరణాత్మక జాబితా క్రింద ఉంది.

విలువస్థిరంగావివరణ
0vbEmptyవేరియబుల్ ఇంకా ప్రారంభించబడలేదు
1vbNullచెల్లుబాటు అయ్యే డేటా కేటాయించబడలేదు
2vbIntegerవేరియబుల్ విలువ “ఇంటీజర్” డేటా రకం
3vb లాంగ్వేరియబుల్ విలువ “లాంగ్” డేటా రకం
4vbSingleవేరియబుల్ విలువ “సింగిల్” డేటా రకం
5vbDoubleవేరియబుల్ విలువ “డబుల్” డేటా రకం
6vbCurrencyవేరియబుల్ విలువ “కరెన్సీ” డేటా రకం
7vbDateవేరియబుల్ విలువ “తేదీ” డేటా రకం
8vbStringవేరియబుల్ విలువ “స్ట్రింగ్” డేటా రకం
9vbObjectవేరియబుల్ విలువ “ఆబ్జెక్ట్” డేటా రకం
10vbErrorవేరియబుల్ విలువ లోపం విలువ
11vb బూలియన్వేరియబుల్ విలువ “బూలియన్” డేటా రకం
12vb వేరియంట్వేరియబుల్ విలువ “వేరియంట్” డేటా రకం (వేరియంట్ల శ్రేణులతో మాత్రమే ఉపయోగించబడుతుంది)
13vbDataObjectవేరియబుల్ విలువ డేటా యాక్సెస్ ఆబ్జెక్ట్
14vbDecimalవేరియబుల్ విలువ “దశాంశ” డేటా రకం
17vbByteవేరియబుల్ విలువ “బైట్” డేటా రకం
20vbLongLongవేరియబుల్ విలువ “లాంగ్ లాంగ్” డేటా రకం (64-బిట్ ప్లాట్‌ఫామ్‌లపై మాత్రమే చెల్లుతుంది)
36vbUserDefinedTypeవేరియబుల్ విలువ “యూజర్ డిఫైన్డ్” డేటా రకం
8192vbArrayవేరియబుల్ విలువ అర్రే

సరే, ఇప్పుడు మా కోడ్ వేరియబుల్ డేటా రకాన్ని 8 గా తిరిగి పొందింది, అనగా వేరియబుల్ పేరు “మైవర్” లో “స్ట్రింగ్” డేటా రకం ఉంది.

ఉదాహరణ # 2

ఇప్పుడు, క్రింది కోడ్ చూడండి.

కోడ్:

 ఉప VarType_Example2 () డిమ్ మైవర్ సెట్ MyVar = ThisWorkbook MsgBox VarType (MyVar) End Sub 

ఈ కోడ్‌ను రన్ చేద్దాం మరియు ఫలితం ఏమిటో చూద్దాం.

ఫలితం 9 అనగా వేరియబుల్‌లో “ఆబ్జెక్ట్” డేటా రకం ఉంటుంది. అవును, ఇది సరైనది ఎందుకంటే వేరియబుల్ “మైవర్” కోసం మేము “ఈ వర్క్‌బుక్” యొక్క వర్క్‌బుక్ సూచనను సెట్ చేసాము.

ఉదాహరణ # 3

ఇప్పుడు, క్రింది కోడ్ చూడండి.

కోడ్:

 ఉప VarType_Example3 () డిమ్ MyVar MyVar = 32500 MsgBox VarType (MyVar) End Sub 

ఇది ఫలితాన్ని 2 గా అందిస్తుంది.

ఎందుకంటే వేరియబుల్‌కు కేటాయించిన 32500 సంఖ్య “పూర్ణాంక” విలువ.

ఇప్పుడు నేను విలువను 40000 కు మార్చి ఫలితాన్ని చూస్తాను.

కోడ్:

 ఉప VarType_Example4 () డిమ్ MyVar MyVar = 40000 MsgBox VarType (MyVar) End Sub 

ఇది ఫలితాన్ని 3 గా ఇస్తుంది.

ఎందుకంటే పూర్ణాంక విలువ 32767 వద్ద ముగుస్తుంది, కాబట్టి అంతకంటే ఎక్కువ ఏదైనా VBA లాంగ్ డేటా రకంగా పరిగణించబడుతుంది.

ఇప్పుడు నేను డబుల్ కోట్స్‌లో సంఖ్యను జతచేస్తాను.

కోడ్:

 ఉప VarType_Example5 () డిమ్ మైవర్ MyVar = "40000" MsgBox VarType (MyVar) ముగింపు ఉప 

కోడ్‌ను అమలు చేసి ఫలితాన్ని చూడండి.

మేము ఫలితాన్ని 8 అనగా స్ట్రింగ్ డేటా రకంగా పొందాము.

ఎందుకంటే కుండలీకరణాల్లో సరఫరా చేయబడిన ఏదైనా స్ట్రింగ్ వేరియబుల్‌గా పరిగణించబడుతుంది.

గుర్తుంచుకోవలసిన విషయాలు

  • VARTYPE అంటే “వేరియబుల్ టైప్”.
  • డేటా రకం ప్రత్యేక సంఖ్యల ద్వారా ప్రాతినిధ్యం వహిస్తుంది కాబట్టి ఏ సంఖ్య ఏ వేరియబుల్ డేటా రకాన్ని సూచిస్తుందో అర్థం చేసుకోవడానికి పట్టికను చూడండి.