VBA చొప్పించు వరుస (ఉదాహరణ, కోడ్) | అడ్డు వరుసను చొప్పించడానికి టాప్ 5 ఎక్సెల్ VBA విధానం
VBA లో అడ్డు వరుసను చొప్పించడం VBA లో ఒక కాలమ్ను ఇన్సర్ట్ చేయడానికి కొంత భిన్నంగా ఉంటుంది, నిలువు వరుసలలో మేము మొత్తం కాలమ్ పద్ధతిని ఉపయోగించాము కాని అడ్డు వరుసలను ఇన్సర్ట్ చేయడానికి ఇన్సర్ట్ కమాండ్తో వర్క్షీట్ పద్ధతిని ఉపయోగిస్తాము, మేము ఇన్సర్ట్ చేయదలిచిన వరుస సూచనను కూడా అందిస్తాము నిలువు వరుసల మాదిరిగానే మరొక అడ్డు వరుస.
VBA ఎక్సెల్ తో అడ్డు వరుసను చొప్పించండి
మేము VBA కోడింగ్తో ఎక్సెల్లో చేసే అన్ని చర్యలను చేయగలము. మేము కాపీ చేయవచ్చు, అతికించవచ్చు, తొలగించవచ్చు మరియు VBA భాష ద్వారా మరెన్నో పనులు చేయవచ్చు. ఎక్సెల్ లో మనం తరచుగా చేసే పద్దతిలో “రోను చొప్పించడం” ఒకటి. ఈ వ్యాసంలో, VBA లో చొప్పించు వరుస పద్ధతిని ఎలా చేయాలో మేము మీకు చూపుతాము.
ఎక్సెల్ VBA లో అడ్డు వరుసను ఎలా ఇన్సర్ట్ చేయాలి?
ఎక్సెల్ లో వరుసను చొప్పించడానికి VBA ని ఉపయోగించే వివిధ పద్ధతులు క్రింద ఉన్నాయి.
విధానం # 1 - చొప్పించు పద్ధతిని ఉపయోగించడం
వరుసను చొప్పించడానికి VBA లో, మేము ఎక్సెల్ వర్క్షీట్లో ఉపయోగించిన ఇలాంటి టెక్నిక్ని ఉపయోగించాలి. VBA లో మేము అడ్డు వరుసను చొప్పించడానికి శ్రేణి వస్తువును ఉపయోగించాలి.
ఉదాహరణకు, క్రింది కోడ్ను చూడండి.
కోడ్:
ఉప InsertRow_Example1 () పరిధి ("A1"). ముగింపు ఉపని చొప్పించండి
ఈ కోడ్ A1 సెల్ నుండి B1 కి కదులుతుంది మరియు ఏకైక సెల్ ను ఇన్సర్ట్ చేస్తుంది.
ఇది డేటాను నిర్వహించే విషయంలో చాలా సమస్యలను కలిగిస్తుంది. ఇది పేర్కొన్న సెల్ను క్రిందికి కదిలిస్తుంది మరియు అన్ని ఇతర అనుబంధ నిలువు వరుసలు ఒకే విధంగా ఉంటాయి.
విధానం # 2 - మొత్తం వరుస ఆస్తిని ఉపయోగించడం
ఎగువ చొప్పించు వరుస మేము వాస్తవానికి అనేక పద్ధతులను ఉపయోగించవచ్చు. దిగువ పద్ధతి ఎంచుకున్న సెల్ పైన మొత్తం అడ్డు వరుసను చొప్పిస్తుంది.
దశ 1: పేర్కొనండి సెల్ చిరునామా ప్రధమ.
కోడ్:
ఉప InsertRow_Example2 () పరిధి ("A1"). ఎండ్ సబ్
దశ 2: ఉపయోగించటానికి బదులుగా “మొత్తం వరుస”ఆస్తి.
కోడ్:
ఉప InsertRow_Example2 () పరిధి ("A1"). మొత్తం రో. ఎండ్ సబ్
దశ 3: మొత్తం వరుస ఆస్తిని యాక్సెస్ చేసిన తరువాత చొప్పించు పద్ధతి.
కోడ్:
ఉప InsertRow_Example2 () పరిధి ("A1"). మొత్తం రో.ఇండ్ ఎండ్ సబ్
ఇది సెల్ A1 పైన ఉన్న అడ్డు వరుసను ఇన్సర్ట్ చేస్తుంది. A1 మొదటి వరుస కాబట్టి ఇది A1 సెల్ నుండి B1 కి కదులుతుంది.
పై చిత్రంలో మీరు చేయగలిగినట్లుగా, ఇది మొత్తం అడ్డు వరుసను చొప్పించాలి, ఒకే సెల్ కాదు.
విధానం # 3 - వరుస సంఖ్యలను ఉపయోగించడం
పై ఉదాహరణలో, మేము సింగిల్-సెల్ చిరునామాను ఉపయోగించాము మరియు అడ్డు వరుసను చేర్చాము. అయితే, మేము వరుస సంఖ్యలను ఉపయోగించి వాటిని కూడా చేర్చవచ్చు.
మీరు 5 వ వరుస క్రింద ఒక అడ్డు వరుసను చొప్పించాలనుకుంటున్నారని అనుకోండి, మొదట మేము RANGE ఆబ్జెక్ట్ ఉపయోగించి వరుస సంఖ్యలను పేర్కొనాలి.
కోడ్:
ఉప InsertRow_Example3 () పరిధి ("6: 6"). ఎండ్ సబ్
మేము మొత్తం అడ్డు వరుసను 6: 6 గా పేర్కొన్నందున, ఇక్కడ మొత్తం వరుస ఆస్తిని ఉపయోగించాలి, మనం నేరుగా “ఇన్సర్ట్” పద్ధతిని ఉపయోగించవచ్చు.
కోడ్:
ఉప InsertRow_Example3 () పరిధి ("6: 6"). ముగింపు ఉపని చొప్పించండి
ఇది మొత్తం అడ్డు వరుసను ఒకే సెల్ కాదు.
ఒకవేళ మీరు 5 వ వరుస క్రింద రెండు అడ్డు వరుసలను చొప్పించాలనుకుంటే, మేము మొదట 2 అడ్డు వరుసలను ఎన్నుకోవాలి మరియు తరువాత INSERT పద్ధతిని ఉపయోగించాలి.
ఉప InsertRow_Example3 () పరిధి ("6: 7"). ముగింపు ఉపని చొప్పించండి
ఇది 5 వ వరుస క్రింద రెండు వరుసలను చొప్పిస్తుంది.
ఇలా, మేము వర్క్షీట్లో సాధ్యమైనంత ఎక్కువ అడ్డు వరుసలను చేర్చవచ్చు.
విధానం # 4 - యాక్టివ్ సెల్ ప్రాపర్టీని ఉపయోగించడం
అడ్డు వరుసలను చొప్పించడానికి మేము యాక్టివ్ సెల్ VBA ఆస్తిని ఉపయోగించవచ్చు. క్రియాశీల కణం ప్రస్తుతం ఎంచుకున్న సెల్ తప్ప మరొకటి కాదు.
మీరు సెల్ B5 సెల్లో ఉన్నారని అనుకోండి మరియు మీరు పైన వరుసను చొప్పించాలనుకుంటే మీరు క్రియాశీల సెల్ ఆస్తిని ఉపయోగించవచ్చు.
ఉప InsertRow_Example4 () ActiveCell.EntireRow.Insert End Sub
ఇది క్రియాశీల సెల్ పైన వరుసను చొప్పిస్తుంది.
విధానం # 5 - ఆఫ్సెట్ ఫంక్షన్తో యాక్టివ్ సెల్ ప్రాపర్టీని ఉపయోగించడం
క్రియాశీల సెల్ యొక్క 2 వరుసల తర్వాత మీరు వరుసను చొప్పించాలనుకుంటున్నారని అనుకోండి, మేము వరుసల సంఖ్యను ఆఫ్సెట్ చేయడానికి ఆఫ్సెట్ ఫంక్షన్ను ఉపయోగించాలి.
మీరు B5 సెల్ లో ఉన్నారని అనుకోండి.
మీరు క్రియాశీల సెల్ నుండి 2 వ వరుస తర్వాత అడ్డు వరుసను చొప్పించాలనుకుంటే, మేము ఈ క్రింది కోడ్ను ఉపయోగించవచ్చు.
కోడ్:
ఉప InsertRow_Example5 () ActiveCell.Offset (2, 0) .ఎంటర్రో.ఇండ్ ఎండ్ సబ్
ఇది 6 వ వరుస తర్వాత అడ్డు వరుసను చొప్పిస్తుంది.
ప్రత్యామ్నాయ వరుసలను చొప్పించండి
ప్రత్యామ్నాయ అడ్డు వరుసలను చొప్పించడం తరచుగా నేను చాలాసార్లు చూశాను. దిగువ డేటా చిత్రాన్ని చూడటానికి.
ఇప్పుడు మనం ప్రత్యామ్నాయ అడ్డు వరుసలను చేర్చాలి. ప్రతి ప్రత్యామ్నాయ అడ్డు వరుసను చొప్పించడానికి మేము ఉచ్చులను ఉపయోగించాలి.
కోడ్:
ఉప ఇన్సర్ట్ రో_ఎక్సాంపుల్ 6 () డిమ్ కె పూర్ణాంక డిమ్ ఎక్స్ గా ఇంటీజర్ ఎక్స్ = 1 కి కె = 1 నుండి 4 కణాలకు (ఎక్స్, 1) .ఎంటైర్ రో.ఇన్సర్ట్ ఎక్స్ = ఎక్స్ + 2 నెక్స్ట్ కె ఎండ్ సబ్
ఇది ఇలా వరుసలను చొప్పిస్తుంది.
మీరు ఈ VBA ఇన్సర్ట్ రో ఎక్సెల్ ను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు. VBA రో ఎక్సెల్ మూసను చొప్పించండి