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

Excel VBA: જો તે અસ્તિત્વમાં ન હોય તો શીટ ઉમેરો. (એક ઝડપી દૃશ્ય)

5236

ઉપરનો કોડ લાગુ કરવા માટે નવા મોડ્યુલમાં દાખલ કરો.

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

તમે અમારી પ્રેક્ટિસ વર્કબુક અહીંથી મફતમાં ડાઉનલોડ કરી શકો છો!

માં શીટ ઉમેરવા માટે VBA કોડ લાગુ કરવાના પગલાં એક્સેલ જો તે અસ્તિત્વમાં નથી

કહો, તમારી પાસે જાન્યુઆરી, ફેબ્રુઆરી, માર્ચ અને એપ્રિલ નામની 4 વર્કશીટ્સ ધરાવતી વર્કબુક છે. દરેક શીટમાં નીચેના મહિનાનો વેચાણ અહેવાલ હોય છે. હવે, તમારે વર્કબુકમાં કેટલીક શીટ્સ શોધવાની અને જો તે અસ્તિત્વમાં ન હોય તો શીટ ઉમેરવાની જરૂર છે. આને પૂર્ણ કરવા માટે તમે નીચેની પગલાવાર માર્ગદર્શિકાને અનુસરી શકો છો.

📌 પગલું 1: નવું મોડ્યુલ દાખલ કરો

પ્રથમ, તમારે દાખલ કરવાની જરૂર છે VBA કોડ લખવા માટેનું મોડ્યુલ.

• આ કરવા માટે, ખૂબ જ શરૂઆતમાં, વિકાસકર્તા ટેબ >> વિઝ્યુઅલ બેઝિક ટૂલ પર જાઓ.

• પરિણામે, માઈક્રોસોફ્ટ વિઝ્યુઅલએપ્લિકેશન માટે મૂળભૂત વિન્ડો દેખાશે.
• ત્યારબાદ, ઇનસર્ટ ટેબ >> મોડ્યુલ ટૂલ પર જાઓ.

આમ, મોડ્યુલ1 નામનું નવું મોડ્યુલ બનાવવામાં આવ્યું છે.

વધુ વાંચો: શીટ કેવી રીતે ઉમેરવી એક્સેલ VBA માં નામ (6 સરળ રીતો)

સમાન વાંચન

• નવી વર્કબુક બનાવો અને એક્સેલમાં VBA નો ઉપયોગ કરીને સાચવો
• Excel VBA: નવી વર્કબુક બનાવો અને તેને નામ આપો (6 ઉદાહરણો)
• એક્સેલમાં મેક્રોનો ઉપયોગ કરીને ટેમ્પલેટમાંથી નવી શીટ કેવી રીતે બનાવવી

📌 પગલું 2: જરૂરી VBA કોડ લખો અને સાચવો

હવે, તમારે મોડ્યુલની અંદર કોડ લખવાની અને તેને સાચવવાની જરૂર છે.

• માં આ કરવા માટે, Module1 વિકલ્પ પર ક્લિક કરો અને કોડ વિન્ડોમાં નીચેનો કોડ લખો.

68827032

• એક તરીકે પરિણામમાં, કોડ વિન્ડો નીચે મુજબ દેખાશે.

🔎 કોડ સમજૂતી:

♣ સેગમેન્ટ 1:

8680

આ ભાગમાં, અમે મેક્રો નામ અને વેરીએબલ નામ જાહેર કર્યું છે. es.

♣ સેગમેન્ટ 2:

1716

આ ભાગમાં, અમે ઇનપુટ બોક્સ બનાવ્યું છે. આ ઇનપુટ બોક્સ દ્વારા, આપણે જે ફાઈલ શોધવાની જરૂર છે તેના નામનું ઇનપુટ લઈ શકીએ છીએ.

♣ સેગમેન્ટ 3:

2195

આ ભાગમાં, અમે વર્કબુકમાં જરૂરી શીટ અસ્તિત્વમાં છે કે કેમ તે તપાસીએ છીએ. જો નહીં, તો તે જરૂરી શીટ બનાવશે અને અમને આ ફેરફાર વિશે સંદેશ બતાવશે.

♣ સેગમેન્ટ 4:

6401

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

• પછી, Ctrl + S.

• ત્યારબાદ, Microsoft Excel વિન્ડો દેખાશે. ના બટન પર ક્લિક કરો.

• પરિણામે, આ રીતે સાચવો વિન્ડો દેખાશે.
• અનુસરીને, .xlsm ફોર્મેટ તરીકે Save as type: વિકલ્પ પસંદ કરો. ત્યારબાદ, સાચવો બટન પર ક્લિક કરો.

આ રીતે, તમે તમારો જરૂરી કોડ લખ્યો અને સાચવ્યો છે.

નોંધ:

તમારે એક્સેલ વર્કબુકને .xlsm ફોર્મેટમાં સાચવવી આવશ્યક છે. નહિંતર, મેક્રો સક્ષમ થશે નહીં અને કોડ કામ કરશે નહીં.

વધુ વાંચો: વેરિયેબલ નામ સાથે શીટ ઉમેરવા માટે એક્સેલ VBA (5 આદર્શ ઉદાહરણો)

📌 પગલું 3: કોડ ચલાવો

હવે, તમારે કોડ ચલાવવાની અને પરિણામો તપાસવાની જરૂર છે.

• આ કરવા માટે, પ્રથમ અને સૌથી અગત્યનું, ક્લિક કરો Microsoft Visual Basic for Applications વિન્ડોમાં Run ચિહ્ન પર.

• પરિણામે, Macros વિન્ડો દેખાશે.
• ત્યારબાદ, AddSheetIfNotExist મેક્રો પસંદ કરો અને ચલાવો બટન પર ક્લિક કરો.

• આ સમયે, અમારા બનાવેલ મેસેજ બોક્સનામનું જો અસ્તિત્વમાં ન હોય તો શીટ ઉમેરો દેખાશે. અહીં, ઓટો વિકલ્પ શીટ5 હશે.

• હવે, ચકાસણી માટે, “એપ્રિલ”<2 લખો> ટેક્સ્ટ બોક્સમાં અને ઓકે બટન પર ક્લિક કરો.

• ત્યારબાદ, તમે તે બીજો સંદેશ જોશો બોક્સ તમને કહેશે કે શીટ પહેલેથી જ અસ્તિત્વમાં છે.
• ઓકે બટન પર ક્લિક કરો.

• પછીથી, કોડને ફરીથી ચલાવો અને બનાવેલા મેસેજ બોક્સના ટેક્સ્ટ બોક્સમાં “મે” લખો. ત્યારબાદ, ઓકે બટન પર ક્લિક કરો.

• પરિણામે, તમે બીજું મેસેજ બોક્સ જોશો જે તમને જણાવતા દેખાય છે કે “મે” શીટ અસ્તિત્વમાં નથી અને તેથી તેણે આ શીટ બનાવી છે.
• આ પછી, ઓકે બટન પર ક્લિક કરો.

આખરે, તમે જોઈ શકો છો કે તમે એક શીટ ઉમેરી છે જે પહેલા અસ્તિત્વમાં ન હતી. અને, વર્કબુક હવે આના જેવી દેખાશે.

વધુ વાંચો: Excel VBA: છેલ્લે શીટ ઉમેરો (3 આદર્શ ઉદાહરણો)

નિષ્કર્ષ

તેથી, આ લેખમાં, જો Excel VBA સાથે અસ્તિત્વમાં ન હોય તો શીટ ઉમેરવા માટેના તમામ પગલાં મેં તમને બતાવ્યા છે. તેને વધુ સારી રીતે સમજવા અને તમારું ઇચ્છિત પરિણામ પ્રાપ્ત કરવા માટે સંપૂર્ણ લેખને કાળજીપૂર્વક જુઓ. હું આશા રાખું છું કે તમને આ લેખ ઉપયોગી અને માહિતીપ્રદ લાગશે. જો તમારી પાસે વધુ કોઈ પ્રશ્નો અથવા ભલામણો હોય, તો કૃપા કરીને મારો સંપર્ક કરો.

અને, વધુ માટે ExcelWIKI ની મુલાકાત લોઆના જેવા લેખો. આભાર!