એરે એ એક ચલ છે જે સમાન પ્રકારના ડેટાને રાખે છે. જો ડેટાની માત્ર એક પંક્તિ અથવા એક કૉલમ હોય, તો તે એક-પરિમાણીય એરે તરીકે ઓળખાય છે. જો કે, જ્યારે એક કરતાં વધુ પંક્તિ અને કૉલમ હોય, ત્યારે તેને 2D એરે કહેવામાં આવે છે. VBA માં એરેનું કદ બદલવા માટે અમે ReDim નો ઉપયોગ કરીએ છીએ. વધુમાં, જૂના ડેટાને અકબંધ રાખવા માટે અમે રીડિમ સાથે જાળવો કીવર્ડનો ઉપયોગ કરીએ છીએ. આ લેખ તમને Excel VBA<માં 2 “ રીડિમ પ્રિઝર્વ ” એ 2D એરે ની ઝડપી રીતો બતાવશે. 3> .

પ્રેક્ટિસ વર્કબુક ડાઉનલોડ કરો

મેક્રો ટુ રીડીમ પ્રિઝર્વ 2D.xlsm

માટે 2 હેન્ડી એપ્રોચેસ એક્સેલ VBA માં 2D અરેને રીડિમ સાચવો

આ ત્રણ પંક્તિઓ અને બે કૉલમ સાથે 2D એરે માંથી બનાવેલ આધાર ડેટાસેટ છે. પ્રથમ, આપણે આ એરે બનાવીશું. પછી, આપણે આ એરેમાં બીજી કોલમ ઉમેરીશું. અમે આમ કરવા માટે “ ReDim Preserve ” નો ઉપયોગ કરીશું. વધુમાં, જો અમે આનો ઉપયોગ ન કરીએ તો શું થાય છે તે અમે દર્શાવીશું.

ડિફૉલ્ટ રૂપે, અમે માત્ર એરેના છેલ્લા પરિમાણ (એટલે ​​કે કૉલમ અથવા ઉપલા બાઉન્ડ)નું કદ બદલી શકીએ છીએ. અમે એરેને સ્થાનાંતરિત કરીશું, પછી છેલ્લું પરિમાણ બદલીશું, અને પછી એક્સેલ VBA માં 2D એરે ના બંને પરિમાણોનું કદ બદલવા માટે ફરીથી સ્થાનાંતરિત કરીશું.

1 રીડીમ પ્રિઝર્વ લાસ્ટ ડાયમેન્શન 2D એરે

અમે પહેલા 2D એરે ને ડાયનેમિક તરીકે વ્યાખ્યાયિત કરીશું. પછી, ReDim સ્ટેટમેન્ટનો ઉપયોગ કરીને, અમે એક બનાવીશુંત્રણ પંક્તિઓ અને બે કૉલમ સાથે એરે. છેલ્લે, અમે પ્રીઝર્વ કીવર્ડ સાથે ફરીથી રીડિમ સ્ટેટમેન્ટનો ઉપયોગ કરીશું. બે પરિમાણીય એરેની ઉપરની સીમા વધારો.

પગલાઓ:

• શરૂ કરવા માટે, ALT+F11 દબાવો VBA મોડ્યુલ વિન્ડો લાવવા માટે. વૈકલ્પિક રીતે, તમે વિકાસકર્તા ટેબ → વિઝ્યુઅલ બેઝિક પસંદ કરો.
• પછી, <માંથી આ કરી શકો છો. 1> શામેલ ટેબ → પસંદ કરો મોડ્યુલ . અમે અહીં VBA કોડ ટાઈપ કરીશું.

• આગળ, મોડ્યુલ માં નીચેનો કોડ ટાઈપ કરો વિન્ડો.

9417

VBA કોડ બ્રેકડાઉન

• પ્રથમ, અમે કૉલ કરી રહ્યા છીએ સબ પ્રોસિજર “ Redim_Preserve_2D_Array_Row ”.
• પછી, અમે ચલ Our_Array ને ડાયનેમિક એરે તરીકે જાહેર કરીએ છીએ.
• આગળ, આપણે એરેનું કદ વ્યાખ્યાયિત કરીએ છીએ. નીચલી બાઉન્ડ 3 છે, ઉપલી બાઉન્ડ 2 છે, અને બંને 1 થી શરૂ થાય છે.
• પછી, અમે એરેને મૂલ્યો અસાઇન કરીએ છીએ .
• તે પછી, અમે C6:D8 સેલ શ્રેણીમાં મૂલ્યો ઇનપુટ કરીએ છીએ.

• તે પછી, અમે કોડ એક્ઝિક્યુટ કરશે.
• તેથી, સાચવો મોડ્યુલ અને રન<દબાવો 3> .

• પરિણામે, તે નિર્ધારિત સેલ રેન્જમાં મૂલ્યો પરત કરશે. આપણે જોઈ શકીએ છીએ કે “ Rachel ” પંક્તિ 1 અને કૉલમ 1 સ્થિતિમાં છે,જે VBA કોડમાં ( 1,1 ) તરીકે વ્યાખ્યાયિત કરવામાં આવ્યું હતું.

• હવે, આપણે એરેનું કદ બદલીશું.
• તેથી, આને પહેલાના કોડમાં ઉમેરો અને પ્રથમ રેન્જ.વેલ્યુ સ્ટેટમેન્ટ ને દૂર કરો. વધુમાં, કોડ કેવો દેખાય છે તે તમે નીચેના સ્નેપશોટમાંથી જોઈ શકો છો.

9195

• અહીં, અમે ઉપરની સીમા ( ) થી વધારી છે. 1 પ્રતિ 2 ) થી ( 1 પ્રતિ 3 ) 1<4 દ્વારા>.
• પછી, અમે એરેમાં વેલ્યુ ઉમેરી છે.
• હવે જો આપણે આ કોડને એક્ઝીક્યુટ કરીશું, તો આપણે જોઈશું કે પહેલાની કિંમતો સાચવેલ નથી. તે પાછલા મૂલ્યો માટે ખાલી પરત આવશે.

• હવે, અમે કીવર્ડ સાચવો ને <માં ઉમેરીને તેને ઠીક કરી શકીએ છીએ. 1>રીડીમ સ્ટેટમેન્ટ .
• છેવટે, અમારો સંપૂર્ણ કોડ આ હશે.

2084

• હવે, જો આપણે ચલાવો આ કોડ, પછી આઉટપુટ આના જેવું હશે. આમ, અમે Excel VBA માં 2D એરે ના છેલ્લા પરિમાણને “ ReDim Preserve ” કરીશું.. હવે, આગળની પદ્ધતિ તમને બતાવશે કે કેવી રીતે “ ReDim કરવું ” સાચવો અને એરેના બંને પરિમાણોનું કદ બદલો.

વધુ વાંચો: વિશિષ્ટ મેળવવા માટે VBA એક્સેલ (3 માપદંડ)માં કૉલમમાંથી એરેમાંના મૂલ્યો

સમાન વાંચન

• એક્સેલમાં કોષ્ટક એરેને કેવી રીતે નામ આપવું (સાથે સરળ પગલાં)
• એરેમાં CSV ફાઇલ વાંચવા માટે એક્સેલ VBA (4 આદર્શ ઉદાહરણો)
• એક્સેલમાં રેન્જને એરેમાં કેવી રીતે કન્વર્ટ કરવીVBA (3 રીતો)
• Excel VBA: એરેમાંથી ડુપ્લિકેટ્સ દૂર કરો (2 ઉદાહરણો)

2. ReDim બંને પરિમાણોને 2D એરેમાં સાચવો એક્સેલ VBA

આ અંતિમ પદ્ધતિમાં, અમે તમને 2D એરે માપ બદલવાનાં પગલાં અને “ રીડિમ પ્રિઝર્વ ” બતાવીશું. અહીં, આપણે એરેના નીચલા બાઉન્ડનું કદ બદલવા માટે VBA ટ્રાન્સપોઝ ફંક્શનનો ઉપયોગ કરીશું. જો આપણે પ્રથમ પદ્ધતિમાં એરેની નીચલી બાઉન્ડનું માપ બદલવાનો પ્રયાસ કર્યો, તો આપણે “ સબસ્ક્રિપ્ટ રેન્જની બહાર ” ભૂલ જોશું. હવે, આગળ વધ્યા વિના, ચાલો જોઈએ કે આપણે આને કેવી રીતે ઠીક કરી શકીએ અને અમારું લક્ષ્ય હાંસલ કરી શકીએ.

પગલાઓ:

• પ્રથમ, પ્રથમ પદ્ધતિમાં બતાવ્યા પ્રમાણે , મોડ્યુલ વિન્ડો લાવો.
• બીજું, કોડની નીચેની લીટીઓ ઉમેરો પ્રથમ કોડ.

9986

• વધુમાં, અંતિમ પદ્ધતિ માટેનો કોડ આના જેવો દેખાય છે.

6405

VBA કોડ બ્રેકડાઉન

• સૌપ્રથમ, અમે પેટા પ્રક્રિયા “ ReDim_Preserve_2D_Array_Both_Dimensions ” કૉલ કરી રહ્યાં છીએ .
• પછી, VBA ટ્રાન્સપોઝ ફંક્શન સુધીના બાકીના કોડ પહેલા કોડના સમાન છે.
• અહીં, અમે એરેને સ્થાનાંતરિત કરી રહ્યા છીએ.
• પછી, આપણે એરેની ઉપરની સીમાને વધારીએ છીએ.
• તે પછી, આપણે ફરીથી એરેને સ્થાનાંતરિત કરીએ છીએ. તેથી, આખરે તે નીચલી સીમાને બદલશે.
• આગળ, અમે પુન:આકારિત એરે માટે મૂલ્યો ઇનપુટ કરીએ છીએ જ્યારેજૂના ડેટાને સાચવીને.
• છેલ્લે, અમે સેલ શ્રેણી C6:E9 માં મૂલ્યો લખીએ છીએ.

• પછી કે, પ્રથમ પદ્ધતિમાં બતાવ્યા પ્રમાણે , ચલાવો આ કોડ.
• આ રીતે, અમે વિઝ્યુઅલાઈઝ કરી શકીએ છીએ કે કોડ કેવી રીતે સાચવે છે. 2D એરે “ રીડિમ પ્રિઝર્વ ” અને VBA ટ્રાન્સપોઝ ફંક્શનનો ઉપયોગ કરીને.

વધુ વાંચો: VBA ટુ એક્સેલમાં એરે ટ્રાન્સપોઝ કરો (3 પદ્ધતિઓ)

યાદ રાખવા જેવી બાબતો

• ReDim Preserve એરેની નીચેની સીમાને બદલી શકતું નથી. આમ કરવા માટે, અમારે Transpose ફંક્શનનો ઉપયોગ કરવાની જરૂર છે.
• અમે માત્ર ડાયનેમિક એરે પર ReDim નો ઉપયોગ કરી શકીએ છીએ.
<16

નિષ્કર્ષ

અમે તમને એક્સેલ VBA માં 2D એરે “ રીડિમ પ્રિઝર્વ ” કરવાની બે ઝડપી રીતો બતાવી છે. જો તમને આ પદ્ધતિઓ સંબંધિત કોઈપણ સમસ્યાઓનો સામનો કરવો પડે છે અથવા મારા માટે કોઈ પ્રતિસાદ હોય, તો નીચે ટિપ્પણી કરવા માટે મફત લાગે. વધુમાં, તમે વધુ એક્સેલ-સંબંધિત લેખો માટે અમારી સાઇટ ExcelWIKI ની મુલાકાત લઈ શકો છો. વાંચવા બદલ આભાર, ઉત્કૃષ્ટ રહો!