VBA వారపు రోజు | VBA లో స్టెప్ బై స్టెప్ గైడ్ టు వీక్ డే ఫంక్షన్
ఎక్సెల్ VBA వీక్ డే ఫంక్షన్
వీబీఏలో వారపు రోజు ఇచ్చిన తేదీ యొక్క వారపు రోజును ఇన్‌పుట్‌గా గుర్తించడానికి ఉపయోగించే తేదీ మరియు సమయ ఫంక్షన్, ఈ ఫంక్షన్ 1 నుండి 7 పరిధి వరకు పూర్ణాంక విలువను అందిస్తుంది, ఈ ఫంక్షన్‌కు అందించిన ఐచ్ఛిక వాదన ఉంది, ఇది మొదటి రోజు వారం కానీ మేము వారంలోని మొదటి రోజును అందించకపోతే, ఫంక్షన్ ఆదివారం అప్రమేయంగా వారంలోని మొదటి రోజుగా umes హిస్తుంది.
మేము ఒక నిర్దిష్ట తేదీని చూడటం ద్వారా వారపు రోజు సంఖ్యను చెప్పగలమా? అవును, వారం ప్రారంభ రోజును బట్టి మేము ఆ వారం రోజు సంఖ్యను తెలియజేయవచ్చు. రెగ్యులర్ వర్క్‌షీట్ ఫంక్షన్లలో, ఒక నిర్దిష్ట తేదీకి వారం సంఖ్యను చెప్పడానికి ఎక్సెల్ లో WEEKDAY అనే ఫంక్షన్ ఉంది. VBA లో కూడా మనకు అదే విషయం ఉంది.
వీక్ డే ఫంక్షన్ ఏమి చేస్తుంది?
వారపు రోజు ఫంక్షన్ వారంలో అందించిన తేదీ యొక్క రోజు సంఖ్యను అందిస్తుంది. ఉదాహరణకు, మీకు ఏప్రిల్ 01 నుండి ఏప్రిల్ 07 వరకు తేదీలు ఉంటే మరియు మీరు ఏప్రిల్ 05 వ తేదీ తెలుసుకోవాలనుకుంటే, వారం ప్రారంభ రోజు సోమవారం నుండి ఉంటే అది 5 వ రోజు.
దీన్ని కనుగొనడానికి వర్క్‌షీట్‌లో అలాగే VBA లో “వీక్ డే” అనే ఫంక్షన్ ఉంది. క్రింద ఫంక్షన్ యొక్క వాక్యనిర్మాణం ఉంది.
తేదీ: ఏ తేదీ కోసం మేము వారపు రోజును కనుగొనడానికి ప్రయత్నిస్తున్నాము. ఇది సరైన ఆకృతితో సరైన తేదీగా ఉండాలి.
[వారపు మొదటి రోజు]: అందించిన వారపు రోజును నిర్ణయించడానికి తేదీ మేము వారంలో మొదటి రోజు ఏమిటో చెప్పాలి. అప్రమేయంగా, VBA “సోమవారం” ను వారం ప్రారంభ రోజుగా పరిగణిస్తుంది. ఇది కాకుండా, మేము ఈ క్రింది రోజులను కూడా సరఫరా చేయవచ్చు.
ఉదాహరణలు
మీరు ఈ VBA వీక్‌డే ఫంక్షన్ ఎక్సెల్ మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA వీక్‌డే ఫంక్షన్ ఎక్సెల్ మూసఉదాహరణ # 1
కార్యకలాపాలను ప్రారంభించడానికి మొదట ఒక సాధారణ ఉదాహరణతో ప్రారంభిస్తాను. ఇప్పుడు మేము “10-ఏప్రిల్ -2019” తేదీకి వారపు రోజును కనుగొనడానికి ప్రయత్నిస్తాము.
దశ 1: వేరియబుల్‌ను స్ట్రింగ్‌గా నిర్వచించండి
కోడ్:
ఉప వారపు రోజు_ఉదాహరణ 1 () మసకబారిన స్ట్రింగ్ ఎండ్ సబ్
దశ 2: వేరియబుల్‌కు విలువను కేటాయించండి
WEEKDAY ఫంక్షన్‌ను వర్తింపజేయడం ద్వారా “k” అనే వేరియబుల్‌కు విలువను కేటాయించండి.
కోడ్:
ఉప వారపు రోజు_ఉదాహరణ 1 () మసకబారిన స్ట్రింగ్ k = వారపు రోజు (ముగింపు ఉప
దశ 3: ఫంక్షన్‌లో తేదీని నమోదు చేయండి
మేము ఇక్కడ పరీక్షిస్తున్న తేదీ “10-Apr-2019”, కాబట్టి తేదీని “10-Apr-2019” గా పాస్ చేయండి.
కోడ్:
ఉప వారపు రోజు_ఉదాహరణ 1 () మసకబారిన స్ట్రింగ్ k = వారపు రోజు ("10-Apr-2019" ముగింపు ఉప 
దశ 4: MsgBox లో వేరియబుల్ విలువను చూపించు
అప్రమేయంగా, ఇది వారంలోని మొదటి రోజును “సోమవారం” గా తీసుకుంటుంది, కాబట్టి ఈ భాగాన్ని విస్మరించండి. బ్రాకెట్ మూసివేయండి. తదుపరి పంక్తిలో VBA సందేశ పెట్టెలో వేరియబుల్ “k” విలువను చూపించు.
కోడ్:
ఉప వారపు రోజు_ఉదాహరణ 1 () మసకబారిన స్ట్రింగ్ k = వారపు రోజు ("10-Apr-2019") MsgBox k ఎండ్ సబ్ 
సరే, మేము పూర్తి చేసాము.
మేము కోడ్‌ను అమలు చేస్తే ఫలితాన్ని “4” గా పొందుతాము ఎందుకంటే ఆదివారం నుండి అందించిన తేదీ (10-ఏప్రిల్ -2019) వారంలోని 4 వ రోజున వస్తుంది.
గమనిక: నా సిస్టమ్ ప్రారంభ వారం “ఆదివారం”.
అదేవిధంగా, మీరు వారం ప్రారంభ రోజును మార్చుకుంటే అది మారుతూ ఉంటుంది. దీనికి ఉదాహరణ ఉదాహరణ క్రింద ఉంది.
కోడ్:
k = వారపు రోజు ("10-Apr-2019", vbMonday) 'ఇది 3 k = వారపు రోజు ("10-Apr-2019", vbT Tuesday)' ఇది 2 k = వారపు రోజు ("10-Apr-2019", vbWed Wednesday) 'ఇది 1 k = వారపు రోజు ("10-Apr-2019", vbThursday)' ఇది 7 k = వారపు రోజు ("10-Apr-2019", vbFriday) 'ఇది 6 k = వారపు రోజు ("10-Apr-2019" ", vbSaturday) 'ఇది 5 k = వారపు రోజు (" 10-Apr-2019 ", vbSunday)' ఇది తిరిగి 4 ఉదాహరణ # 2 - తేదీ వారాంతంలో ఉందో లేదో వస్తాయి
మీకు ఈ క్రింది తేదీ ఉందని అనుకోండి మరియు మీరు తరువాతి వారాంతపు తేదీని కనుగొనాలనుకుంటున్నాము, అప్పుడు మేము ఫలితాలను చేరుకోవడానికి వారపు ఫంక్షన్‌ను ఉపయోగించవచ్చు.
ఫలితాన్ని చేరుకోవడానికి మేము WEEKDAY ని IF కండిషన్ మరియు లూప్‌లతో ఉపయోగించాలి. లాజిక్ పొందడానికి మీరు లైన్ ద్వారా లైన్ వెళ్ళడానికి నేను కోడ్ వ్రాశాను.
కోడ్:
ఉప వారాంతపు_ తేదీలు () మసకబారిన k = 2 నుండి 9 వరకు వారపు రోజు (కణాలు (k, 1). విలువ, vbMonday) = 1 అప్పుడు కణాలు (k, 2) .వాల్యూ = కణాలు (k, 1) + 5 వారపు రోజు . (k, 2) .వాల్యూ = కణాలు (k, 1) + 3 వేరే వారపు రోజు (కణాలు (k, 1). విలువ, vbMonday) = 4 అప్పుడు కణాలు (k, 2) .విలువ = కణాలు (k, 1) + 2 వేరే వారపు రోజు (కణాలు (k, 1). విలువ, vbMonday) = 5 అప్పుడు కణాలు (k, 2) .విలువ = కణాలు (k, 1) + 1 ఇతర కణాలు (k, 2). విలువ = "ఇది వాస్తవానికి వారాంతం తేదీ "తరువాత ఉంటే ముగింపు k ముగింపు ఉప
ఇది దిగువ ఫలితాలకు చేరుకుంటుంది.
B6 & B7 కణాలను చూడండి “ఇది వాస్తవానికి వారాంతపు తేదీ” ఎందుకంటే “04-May-2019” మరియు “06-Apr-2019” తేదీలు వాస్తవానికి వారాంతపు తేదీలు, కాబట్టి వారాంతపు తేదీని చూపించాల్సిన అవసరం లేదు వారాంతపు తేదీల కోసం. అప్రమేయంగా, మేము ఈ ఫలితాన్ని పొందుతాము.
