VBA శ్రేణిని ప్రకటించండి | VBA లో శ్రేణులను ఎలా ప్రకటించాలి?

ఎక్సెల్ VBA డిక్లేర్ అర్రే

VBA లో శ్రేణి యొక్క ప్రకటన అదే మసక స్టేట్మెంట్ లేదా స్టాటిక్ పబ్లిక్ లేదా ప్రైవేట్ స్టేట్మెంట్ ద్వారా వేరియబుల్స్ మాదిరిగానే ఉంటుంది, శ్రేణిని ప్రకటించడంలో మరియు వేరియబుల్ డిక్లేర్ చేయడంలో ఉన్న తేడా ఏమిటంటే, శ్రేణిని ప్రకటించేటప్పుడు మనం శ్రేణి యొక్క పరిమాణాన్ని అందించాలి శ్రేణి యొక్క ఎగువ బౌండ్ మరియు శ్రేణి యొక్క దిగువ బౌండ్.

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

శ్రేణి అనేది ఒక రకమైన వేరియబుల్, ఇది ఒకటి కంటే ఎక్కువ విలువలను కలిగి ఉంటుంది, సాధారణ వేరియబుల్స్ మాదిరిగా కాకుండా, ఒకేసారి ఒక విలువను మాత్రమే కలిగి ఉంటుంది. శ్రేణి VBA లో వేరియబుల్స్ ప్రకటించే అధునాతన వెర్షన్. ఉదాహరణకు, మీరు 5 విద్యార్థుల పేర్లను వేరియబుల్స్‌కు కేటాయించాలనుకునే పరిస్థితిని imagine హించుకోండి మరియు సాధారణ ఆచరణలో, మేము వ్యక్తిగత విద్యార్థుల పేర్లను ఒక్కొక్కటిగా కేటాయించే ఐదు వేరియబుల్స్‌కు ఐదు వేరియబుల్స్‌ని ప్రకటిస్తాము, క్రింద ఉన్న ఉదాహరణ కోడ్.

కోడ్:

 సబ్ అర్రే_ఎక్సాంపుల్ () డిమ్ స్టూడెంట్ 1 స్ట్రింగ్ డిమ్ స్టూడెంట్ 2 స్ట్రింగ్ డిమ్ స్టూడెంట్ 3 స్ట్రింగ్ డిమ్ స్టూడెంట్ 4 గా స్ట్రింగ్ డిమ్ స్టూడెంట్ 5 స్ట్రింగ్ ఎండ్ సబ్ గా 

చాలా వేరియబుల్స్ డిక్లేర్ చేయడానికి బదులుగా, అన్ని విద్యార్థుల పేర్లను కలిగి ఉండే ఒకే వేరియబుల్ శ్రేణిని ప్రకటించే ఆలోచన ఎలా ఉంటుంది.

అవును, VBA లో శ్రేణిని ప్రకటించడం ద్వారా ఇది సాధ్యపడుతుంది.

ఉదాహరణలు

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

ఉదాహరణ # 1

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

మొదట, ఉపప్రాసెసర్ ప్రారంభించండి.

కోడ్:

 ఉప శ్రేణి_ ఉదాహరణ () ముగింపు ఉప 

ఇప్పుడు, ఎప్పటిలాగే, వేరియబుల్‌ను స్ట్రింగ్‌గా ప్రకటించండి.

కోడ్:

 ఉప శ్రేణి_ ఉదాహరణ () మసక విద్యార్థి స్ట్రింగ్ ఎండ్ సబ్ 

వేరియబుల్ ప్రకటించిన తర్వాత ఇప్పుడు అది ఎన్ని విలువలను కలిగి ఉందో నిర్ధారించుకోండి. ఈ సందర్భంలో, నేను ఐదుగురు విద్యార్థుల పేర్లను నిల్వ చేయాలనుకుంటున్నాను, కాబట్టి ఇప్పుడు మనం శ్రేణి పరిమాణాన్ని పరిష్కరించాలి, అంటే 1 నుండి 5 వరకు. బ్రాకెట్లలో వేరియబుల్ చేయడానికి అదే విషయాన్ని సరఫరా చేయండి.

కోడ్:

 ఉప శ్రేణి_ ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5 వరకు) స్ట్రింగ్ ఎండ్ సబ్ 

ఇప్పుడు ఈ సింగిల్ వేరియబుల్ కోసం, మేము 5 విద్యార్థుల పేర్లను నిల్వ చేయవచ్చు.

కోడ్:

 ఉప శ్రేణి_ ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5) స్ట్రింగ్ విద్యార్థిగా (1) = "జాన్" విద్యార్థి (2) = "పీటర్" విద్యార్థి (3) = "రికీ" విద్యార్థి (4) = "మైఖేల్" విద్యార్థి (5) = "అండర్సన్" ఎండ్ సబ్ 

వేరియబుల్‌ను శ్రేణిగా ప్రకటించడం ద్వారా మనం ఎన్ని పంక్తులను తగ్గించామో చూడండి. VBA లోని లూప్‌ల లోపల దీన్ని జతచేయడం ద్వారా మేము ఈ కోడ్‌ను ఇంకా తగ్గించవచ్చు.

ఇప్పుడు ఒక ఉదాహరణ కోసం, వర్క్‌షీట్ కణాలలో నాకు ఉన్న అదే ఐదు పేర్లు

ఇప్పుడు నేను ఈ సంఖ్యలను VBA లోని సందేశ పెట్టెలో చూపించాలనుకుంటున్నాను, సరే లూప్‌ల కోసం ఇంకొక వేరియబుల్‌ను ఇంటీజర్ డేటా రకంగా ప్రకటిద్దాం.

కోడ్:

 ఉప శ్రేణి_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5) స్ట్రింగ్ డిమ్ K గా పూర్ణాంక ముగింపు ఉప 

ఎప్పటిలాగే, నేను శ్రేణి వేరియబుల్‌ను 1 నుండి 5 పరిమాణంగా ఉంచాను.

ఇప్పుడు VBA లో నెక్స్ట్ లూప్ కొరకు తెరవండి మరియు మనకు ఐదు పేర్లు ఉన్నందున 1 నుండి 5 వరకు పరిమితిని నమోదు చేయండి.

కోడ్:

 ఉప శ్రేణి_ ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5 వరకు) స్ట్రింగ్ డిమ్ K గా పూర్ణాంకంగా K = 1 నుండి 5 తదుపరి K ఎండ్ సబ్ 

శ్రేణి వేరియబుల్‌కు విలువలను కేటాయించడానికి, సంఖ్యల స్థానం సరఫరా ఉచ్చులు వేరియబుల్ “k” కోసం విద్యార్థి (1), విద్యార్థి (2) ను చూపించే మునుపటి మార్గాన్ని మనం అనుసరించాల్సిన అవసరం లేదు.

కోడ్:

 ఉప శ్రేణి_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5) స్ట్రింగ్ డిమ్ K గా K = 1 నుండి 5 విద్యార్థి (K) = తదుపరి K ముగింపు ఉప 

ఈ శ్రేణి వేరియబుల్ కోసం మాకు వర్క్‌షీట్ నుండి విలువలు అవసరం, కాబట్టి CELLS ప్రాపర్టీని ఉపయోగించి వర్క్‌షీట్ నుండి విలువలను పొందండి.

కోడ్:

 ఉప శ్రేణి_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5) స్ట్రింగ్ డిమ్ K గా K = 1 నుండి 5 విద్యార్థి (K) = కణాలు (K, 1) కోసం పూర్ణాంకంగా. విలువ తదుపరి K ముగింపు ఉప 

ఇప్పుడు సందేశ పెట్టె ద్వారా శ్రేణి వేరియబుల్ యొక్క విలువను చూపుతుంది.

కోడ్:

 ఉప శ్రేణి_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5) K = 1 నుండి 5 విద్యార్థి (K) = కణాలు (K, 1) కోసం పూర్ణాంకంగా స్ట్రింగ్ డిమ్ K గా .వాల్యూ MsgBox విద్యార్థి (K) తదుపరి K ముగింపు ఉప 

ఇప్పుడు కోడ్ను అమలు చేయండి, సందేశ పెట్టెలో, మేము మొదటి పేరును చూస్తాము. రెండవ పేరు చూడటానికి సరే నొక్కండి. సరే నొక్కడం ద్వారా ఇలా, మనం ఐదు పేర్లను చూడవచ్చు.

ఉదాహరణ # 2 - రెండు డైమెన్షనల్ శ్రేణులు

శ్రేణి ఎలా పనిచేస్తుందో మనం పైన చూశాము, ఇప్పుడు మనం డైమెన్షనల్ శ్రేణులను చూస్తాము. రెండు డైమెన్షనల్ శ్రేణులు వరుసలు మరియు నిలువు వరుసలపై కేంద్రీకరిస్తాయి.

పై ఉదాహరణలో, మేము శ్రేణి పరిమాణాన్ని 1 నుండి 5 గా నిర్ణయించాము, ఇది వరుసలు లేదా నిలువు వరుసలపై కేంద్రీకరిస్తుంది.

రెండు డైమెన్షనల్ శ్రేణులను ఉపయోగించడం ద్వారా మనం వరుసలు మరియు నిలువు వరుసలపై దృష్టి పెట్టవచ్చు. దీని కోసం, మేము రెండు ఉచ్చులను జతచేయాలి.

మొదట, వేరియబుల్ను నిర్వచించండి, ఆలస్యంగా మేము శ్రేణి పరిమాణం గురించి నిర్ణయిస్తాము.

కోడ్:

 ఉప రెండు_అర్రే_ఉదాహరణ () మసక విద్యార్థి స్ట్రింగ్ ఎండ్ సబ్ 

మొదట, వరుస పరిమాణాన్ని నిర్ణయించండి, ఆపై కాలమ్ పొడవును నిర్ణయించండి.

కోడ్:

 స్ట్రింగ్ ఎండ్ సబ్‌గా సబ్ టూ_అర్రే_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5, 1 నుండి 3 వరకు) 

దీని కోసం, నేను విద్యార్థుల పేరు, మార్కులు మరియు గ్రేడ్ స్థితి కోసం డేటాను రూపొందించాను.

ఇప్పుడు కోడింగ్ విండోకు తిరిగి రండి.

లూప్ కోసం మరో రెండు వేరియబుల్స్ ప్రకటించండి.

కోడ్:

 ఉప రెండు_అర్రే_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5, 1 నుండి 3 వరకు) స్ట్రింగ్ డిమ్ కె పూర్ణాంకంగా, J గా పూర్ణాంక ముగింపు ఉప 

ఇప్పుడు క్రింద చూపిన విధంగా లూప్‌ను జత చేయండి.

కోడ్:

 ఉప రెండు_అర్రే_ఉదాహరణ () మసక విద్యార్థి (1 నుండి 5, 1 నుండి 3 వరకు) స్ట్రింగ్ డిమ్ k గా పూర్ణాంకంగా, J పూర్ణాంకంగా k = 1 నుండి 5 వరకు J = 1 నుండి 3 వర్క్‌షీట్‌లు ("విద్యార్థుల జాబితా"). విద్యార్థిని ఎంచుకోండి (k, J) = కణాలు (k, J) .వాల్యూ వర్క్‌షీట్లు ("షీట్ కాపీ"). కణాలను ఎంచుకోండి (k, J) .విలువ = విద్యార్థి (k, J) తదుపరి J తదుపరి k ముగింపు ఉప 

ఇది ఏమి చేస్తుందంటే అది “స్టూడెంట్ లిస్ట్” షీట్ నుండి డేటాను కాపీ చేసి “కాపీ షీట్” లో అతికించండి.

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

  • శ్రేణి విస్తారమైన భావన, ఇది కేవలం పరిచయ భాగం.
  • శ్రేణి ప్రకటనను అర్థం చేసుకోవడానికి మీకు అధునాతన కోడింగ్ నైపుణ్యాలు అవసరం.
  • మీరు మీ కోడ్‌లో శ్రేణులను ఎంత ఎక్కువగా ఉపయోగిస్తారో అంతగా మీరు అలవాటు పడతారు.