VBA చివరి వరుస | చివరిగా ఉపయోగించిన వరుసను కనుగొనడానికి టాప్ 3 పద్ధతులు?
VBA లో మనం చివరి వరుసను కనుగొనవలసి వచ్చినప్పుడు చాలా భిన్నమైన పద్ధతులు ఉన్నాయి మరియు సాధారణంగా ఉపయోగించే పద్ధతి ఎండ్ (XLDown) పద్ధతి మరియు VBA, End (XLDown) లోని ఫైండ్ ఫంక్షన్ ఉపయోగించి చివరి విలువను కనుగొనడం వంటి ఇతర పద్ధతులు ఉన్నాయి. ). చివరి వరుసకు వెళ్ళడానికి వరుస సులభమైన మార్గం.
ఎక్సెల్ VBA చివరి వరుస
కోడ్ రాయడం మీరు VBA లో చేసిన మొదటి పురోగతి అయితే, కోడ్ను డైనమిక్ చేయడం మీ తదుపరి దశ. ఎక్సెల్ సెల్ రిఫరెన్సులతో నిండి ఉంది, మనం సెల్ ను సూచించిన క్షణం అది స్థిరంగా మారుతుంది. మా డేటా పెరిగితే, మేము సెల్ రిఫరెన్స్కు తిరిగి వెళ్లి, ఫలితాన్ని తాజాగా చెప్పడానికి రిఫరెన్స్లను మార్చాలి.
ఉదాహరణకు ఈ క్రింది కోడ్ను చూడండి.
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 1 () పరిధి ("D2"). విలువ = వర్క్షీట్ఫంక్షన్.సమ్ (పరిధి ("B2: B7")) ముగింపు ఉప
పై కోడ్ D2 సెల్ విలువలో రేంజ్ యొక్క సమ్మషన్ (“B2: B7”) అని చెబుతుంది.
ఇప్పుడు నేను జాబితాకు మరిన్ని విలువలను చేర్చుతాను.
ఇప్పుడు నేను కోడ్ను అమలు చేస్తే, అది నాకు నవీకరణల ఫలితాన్ని ఇవ్వదు, అయితే ఇది ఇప్పటికీ పాత శ్రేణికి అంటుకుంటుంది, అంటే పరిధి (“B2: B7”).
ఇక్కడే డైనమిక్ కోడ్ చాలా ముఖ్యమైనది.
కోడ్ను డైనమిక్ చేసే ప్రక్రియలో, కాలమ్లో చివరిగా ఉపయోగించిన అడ్డు వరుసను కనుగొనడం చాలా ముఖ్యం. ఈ వ్యాసంలో, ఎక్సెల్ VBA లో చివరి వరుసను కనుగొనే మార్గాలను చర్చిస్తాము.
నిలువు వరుసలో చివరిగా ఉపయోగించిన వరుసను ఎలా కనుగొనాలి?
ఎక్సెల్ VBA లో చివరిగా ఉపయోగించిన అడ్డు వరుసను కనుగొనడానికి ఉదాహరణలు క్రింద ఉన్నాయి.
మీరు ఈ VBA చివరి వరుస మూసను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు - VBA చివరి వరుస మూసవిధానం # 1
నేను మీకు కోడ్ను వివరించే ముందు, మీరు సాధారణ వర్క్షీట్లోని చివరి వరుసకు ఎలా వెళ్తారో మీరు గుర్తుంచుకోవాలని నేను కోరుకుంటున్నాను.
మేము సత్వరమార్గం కీని ఉపయోగిస్తాము Ctrl + డౌన్ బాణం.
ఏదైనా ఖాళీ సెల్ ముందు ఇది చివరిగా ఉపయోగించిన వరుసకు తీసుకువెళుతుంది. చివరి వరుసను కనుగొనడానికి మేము VBA లో కూడా అదే పద్ధతిని ఉపయోగిస్తాము.
దశ 1: వేరియబుల్ను లాంగ్గా నిర్వచించండి.
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసక ఎల్ఆర్ పొడవుగా 'ఎల్ఆర్ అర్థం చేసుకోవడానికి = చివరి వరుస ముగింపు ఉప
దశ 2: ఈ వేరియబుల్ కోసం, మేము చివరిగా ఉపయోగించిన అడ్డు వరుస సంఖ్యను కేటాయిస్తాము.
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసక ఎల్ఆర్ పొడవుగా 'ఎల్ఆర్ అర్థం చేసుకోవడానికి = చివరి వరుస ఎల్ఆర్ = ముగింపు ఉప
దశ 3: కోడ్ను ఇలా వ్రాయండి సెల్స్ (వరుసలు. కౌంట్,
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసకబారిన LR పొడవుగా 'LR = చివరి వరుస LR = కణాలు (వరుసలు. గణన, ముగింపు ఉప
దశ 4: ఇప్పుడు కాలమ్ సంఖ్యను 1 గా పేర్కొనండి.
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసకబారిన LR పొడవుగా 'LR = చివరి వరుస LR = కణాలు (అడ్డు వరుసలు, 1) అర్థం చేసుకోవడానికి
సెల్స్ (అడ్డు వరుసలు, 1) మొదటి నిలువు వరుసలో ఎన్ని వరుసలు ఉన్నాయో లెక్కించడం.
కాబట్టి పై VBA కోడ్ మమ్మల్ని ఎక్సెల్ షీట్ యొక్క చివరి వరుసకు తీసుకువెళుతుంది.
దశ 5: చివరిగా ఉపయోగించిన అడ్డు వరుసకు వెళ్ళడానికి మేము షీట్ యొక్క చివరి సెల్ లో ఉంటే, మేము సత్వరమార్గం కీని నొక్కండి Ctrl + పైకి బాణం కీ.
VBA లో మనం ఎండ్ కీని ఉపయోగించాలి మరియు అనగా ఎండ్ VBA xlUp
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసకబారిన LR పొడవుగా 'LR = చివరి వరుస LR = కణాలు (అడ్డు వరుసలు, 1) అర్థం చేసుకోవడానికి .మరియు (xlUp) ముగింపు ఉప
దశ 6: ఇప్పుడు అది దిగువ నుండి చివరిగా ఉపయోగించిన వరుసకు తీసుకువెళుతుంది. ఇప్పుడు మనకు ఈ వరుస సంఖ్య అవసరం. కాబట్టి అడ్డు వరుస సంఖ్యను పొందడానికి ఆస్తి ROW ని ఉపయోగించండి.
కోడ్:
ఉప చివరి_రో_ఉదాహరణ 2 () మసకబారిన LR పొడవుగా 'LR = చివరి వరుస LR = కణాలు (అడ్డు వరుసలు, 1) అర్థం చేసుకోవడానికి .మరియు (xlUp) .రో ఎండ్ సబ్
దశ 7: ఇప్పుడు వేరియబుల్ చివరిగా ఉపయోగించిన అడ్డు వరుస సంఖ్యను కలిగి ఉంది. VBA కోడ్లోని సందేశ పెట్టెలో ఈ వేరియబుల్ విలువను చూపించు.
కోడ్:
ఉప చివరి_రో_ఎక్సంపుల్ 2 () మసక ఎల్ఆర్ పొడవుగా 'ఎల్ఆర్ = చివరి వరుస ఎల్ఆర్ = కణాలు (అడ్డు వరుసలు, 1) .ఎండ్ (xlUp) .రౌ MsgBox LR ఎండ్ సబ్
ఈ కోడ్ను F5 కీని ఉపయోగించి లేదా మానవీయంగా అమలు చేయండి, ఇది చివరిగా ఉపయోగించిన అడ్డు వరుసను ప్రదర్శిస్తుంది.
అవుట్పుట్:
ఈ వర్క్షీట్లో చివరిగా ఉపయోగించిన వరుస 13.
ఇప్పుడు నేను మరో పంక్తిని తొలగించి కోడ్ను అమలు చేసి కోడ్ యొక్క చైతన్యాన్ని చూస్తాను.
సరే, ఇప్పుడు ఫలితం స్వయంచాలకంగా చివరి వరుసను తీసుకుంటుంది.
డైనమిక్ VBA చివరి వరుస కోడ్ ఇదే.
నేను మునుపటి ఉదాహరణలో చూపినట్లుగా వరుస సంఖ్యను సంఖ్యా విలువ నుండి LR కు మార్చండి.
కోడ్:
ఉప చివరి_రో_ఎగ్జాంపుల్ 2 () మసకబారిన LR ను అర్థం చేసుకోవడానికి 'LR = చివరి వరుస LR = కణాలు (అడ్డు వరుసలు, 1) .మరియు (xlUp) .రో శ్రేణి ("D2"). బి "& ఎల్ఆర్)) ఎండ్ సబ్
నేను B13 ను తీసివేసి, LR అనే వేరియబుల్ పేరును జోడించాను.
ఇప్పుడు మీరు ఎన్ని వరుసలను జోడించినా అది స్వయంచాలకంగా నవీకరించబడిన సూచనను తీసుకుంటుంది.
విధానం # 2
రేంజ్ ఆబ్జెక్ట్ మరియు ప్రత్యేక VBA కణాల ఆస్తిని కూడా ఉపయోగించడం ద్వారా మేము VBA లో చివరి వరుసను కనుగొనవచ్చు.
కోడ్:
ఉప చివరి_రో_ఎగ్జాంపుల్ 3 () మసక ఎల్ఆర్ లాంగ్ ఎల్ఆర్ = రేంజ్ ("ఎ: ఎ"). స్పెషల్ సెల్స్ (xlCellTypeLastCell) .రో MsgBox LR ఎండ్ సబ్
కోడ్ మీకు చివరిగా ఉపయోగించిన అడ్డు వరుసను కూడా ఇస్తుంది. ఉదాహరణకు, దిగువ వర్క్షీట్ చిత్రాన్ని చూడండి.
నేను కోడ్ను మాన్యువల్గా నడుపుతుంటే లేదా ఎఫ్ 5 కీ ఫలితాన్ని ఉపయోగిస్తే 12 అవుతుంది ఎందుకంటే 12 చివరిగా ఉపయోగించిన వరుస.
అవుట్పుట్:
ఇప్పుడు నేను 12 వ వరుసను తొలగిస్తాను మరియు ఫలితాన్ని చూస్తాను.
నేను ఒక అడ్డు వరుసను తొలగించినప్పటికీ, అది ఇప్పటికీ ఫలితాన్ని 12 గా చూపిస్తోంది.
ఈ కోడ్ పని చేయడానికి, ప్రతి చర్య తర్వాత మేము సేవ్ బటన్ను నొక్కాలి, అప్పుడు ఈ కోడ్ ఖచ్చితమైన ఫలితాలను ఇస్తుంది.
నేను వర్క్బుక్ను సేవ్ చేసాను మరియు ఇప్పుడు ఫలితాన్ని చూడండి.
విధానం # 3
మేము ఉపయోగించిన పరిధిలో VBA చివరి వరుసను కనుగొనవచ్చు. క్రింద కోడ్ చివరిగా ఉపయోగించిన అడ్డు వరుసను కూడా అందిస్తుంది.
కోడ్:
ఉప చివరి_రో_ఎగ్జాంపుల్ 4 () మసకబారిన LR పొడవుగా LR = ActiveSheet.UsedRange.Rows (ActiveSheet.UsedRange.Rows.Count) .Row MsgBox LR End Sub
ఇది చివరిగా ఉపయోగించిన అడ్డు వరుసను కూడా అందిస్తుంది.
అవుట్పుట్: