مەزمۇن جەدۋىلى
بۇ ماقالە دىكى Excel VBA دىكى ئىسىم بىلەن جەدۋەلنى قانداق قوشۇش توغرىسىدىكى سوئاللىرىڭىزنىڭ جاۋابىنى تەمىنلەيدۇ. ئەگەر سىز بۇ خىل ئالاھىدە ئۇسۇللارنى ئىزدەۋاتقان بولسىڭىز ، مۇۋاپىق ئورۇنغا كەلدىڭىز. بۇ يەردە بىز 6 ئاسان & amp; Excel VBA دىكى ئىسىم بىلەن بىر جەدۋەلنى قوشۇشنىڭ ئىسپاتلانغان ئۇسۇللىرى> Name.xlsm بىلەن جەدۋەل قوشۇش Excel دىكى بىر ۋاراق. ئىسىم بىلەن ۋاراق قوشۇشنىڭ ئاساسىي VBA كودى تۆۋەندىكىگە ئوخشايدۇ.
Sheets.Add ([Before], [After], [Count], [Type])
ئىلگىرى: ئۇ ئىختىيارى. ئۇ مەلۇم جەدۋەلدىن ئىلگىرى يېڭى جەدۋەل قوشىدۇ.
ئۇنىڭدىن كېيىن: بۇمۇ ئىختىيارى. ئۇ مەلۇم جەدۋەلدىن كېيىن يېڭى ۋاراق قوشىدۇ.
ساناش: بۇمۇ ئىختىيارى پارامېتىر. ئۇ قوشماقچى بولغان جەدۋەل سانىنى كۆرسىتىدۇ.
تىپى: بۇمۇ ئىختىيارى. ئۇ جەدۋەلنىڭ تىپىنى بەلگىلەيدۇ. بۇ يەردە سۈكۈتتىكى قىممىتى xlWorksheet . 1> ⊕ سىنبەلگە ۋاراق نامىنىڭ يېنىدا. Excel دا ئوخشاش ۋەزىپىنى ئاپتوماتلاشتۇرۇشنى ئويلاپ باققانمۇ؟ ئەمدى ئويلىماڭ ، چۈنكى VBA سىزنى قاپلىدى.
بۇ يەردە بىزنىڭ سېتىش دوكلاتى ناملىق خىزمەت جەدۋىلى بار. ئۇنىڭدا كۈندىلىك سېتىش بارمەلۇم بىر ئاشخانىنىڭ دوكلاتىنى دوكلات قىلىڭ. B ، C ۋە D ستونلاردا ، سېتىش جاۋابلىرى ، تۈرلەر ۋە سانى ئايرىم-ئايرىم ھالدا . 0> بۇ يەردە ، بىز Microsoft Excel 365 نەشرىنى ئىشلەتتۇق ، قۇلايلىقلىقىڭىزغا ئاساسەن باشقا نەشرىنى ئىشلىتەلەيسىز. بىرىنچى ئۇسۇلىمىزدا ، ئىشلەتكۈچى كىرگۈزۈش دىن ئىسمى يېزىلغان جەدۋەلنى قوشىمىز. ئەگەر ئۆگىنىشكە قىزىقسىڭىز ، بۇ ئاددىي باسقۇچلارغا ئەگىشىڭ.
📌 باسقۇچ:
- ئەڭ دەسلەپتە پروگرامما ئاچقۇچى بەتكۈچ.
- ئىككىنچىدىن ، كود گۇرۇپپىسىدىكى كۆرۈنۈش ئاساسى نى تاللاڭ. + F11 ئوخشاش ۋەزىپىنى ئورۇنداش.
ئەسكەرتىش: بوشلۇق نىڭ سول تەرىپىدىكى ALT كۇنۇپكىسى. ئەگەر سىز باشقا ALT كۇنۇپكىسىنى ئىشلەتسىڭىز ، بۇ مەشغۇلات ئىجرا قىلىنمايدۇ>
- ھازىر ، ئۇ بۆلەك كودىنى ئاچىدۇ.
- ئۇنىڭدىن كېيىن ، تۆۋەندىكى كودنى بۆلەك گە يېزىڭ.
8109
كودلارنىڭ بۇزۇلۇشى
- بىرىنچىدىن ، بىز تارماق تەرتىپنى چاقىرىمىز Add_Sheet_with_Name .
- ئاندىن ، بىز ئۆزگىرىشچان تىپلارغا ئېنىقلىما بېرىمىز. بۇ خاتالىقلارغا پەرۋا قىلمايدۇ.
- ئۇنىڭدىن كېيىن ، بىز InputBox نى ئىشلىتىپ ئىشلەتكۈچىنىڭ جەدۋىلىگە ئېرىشتۇق. ئۇنىڭدىن باشقا ، بىز تېكىست تىزمىسىنى InputBox دىن sheet_name ئۆزگەرگۈچى مىقدارغا ساقلىدۇق.
- كېيىنكى قەدەمدە ، ئەگەر جەدۋەل_ ئىسمى قۇرۇق بولسا ، ئۇنداقتا كود داۋاملاشتۇرمايدۇ.
- ئاخىرىدا ، بىز يېڭىدىن قۇرۇلغان جەدۋەلگە ئىسىم قويۇش ئۈچۈن Add.Name ئۇسۇلىنى ئىشلىتىۋاتىمىز. بۇ يەردە ، ئىسىم sheet_name ئۆزگەرگۈچى مىقدار بىلەن ئوخشاش بولىدۇ.
- بۇ ۋاقىتتا ، ئىجرا قىلىڭ (⏵) سىنبەلگىسى. ئەكسىچە ، كۇنۇپكا تاختىڭىزدا F5 نى باسسىڭىز بولىدۇ> بۇ يەرگە يېڭى ۋاراقنىڭ نامىنى كىرگۈزۈڭ. بۇ خىل ئەھۋالدا بىز ساندۇققا پايدا دەپ يازدۇق.
- كېيىن ، بولىدۇ نى بېسىڭ.
- شۇڭا ، بىزنىڭ كودىمىز ئىجرا بولىدۇ ، ھەمدە ئۇنىڭغا پايدا دېگەن جەدۋەل قوشۇلىدۇ.
ئەسكەرتىش: ۋاراقنىڭ ئورنىنى تىلغا ئالمىدۇق. سۈكۈتتىكى ھالەتتە ، ئۇ ئاكتىپ جەدۋەلنىڭ ئالدىدا قويۇلدى.
تېخىمۇ كۆپ ئوقۇڭ:
2. Excel VBA نى كونكرېت جەدۋەلدىن بۇرۇن ئىسىم بىلەن جەدۋەل قوشۇش
ئىككىنچى ئۇسۇلىمىزدا ، مەلۇم جەدۋەلدىن بۇرۇن ئىسمى يېزىلغان جەدۋەلنى قوشىمىز. بۇ جەرياننى قەدەممۇ-قەدەم تەتقىق قىلايلىقەدەم.
📌 قەدەم باسقۇچلار: 1> ئۇسۇل 1 .
9347
- بىرىنچىدىن ، بىز تارماق تەرتىپنى Add_Sheet_Before_Specific_Sheet دەپ ئاتايمىز.
- ئاندىن ، بىز سېتىش دوكلاتى جەدۋىلىنى ئاكتىپلايمىز. ئەگەر بىز باشقا جەدۋەلدە بولساق بۇ كودنىڭ ئىجرا بولۇشىغا كاپالەتلىك قىلىدۇ.
- كېيىنكى قەدەمدە ، بىز يېڭىدىن قۇرۇلغان جەدۋەلگە ئىسىم قويۇش ئۈچۈن قوشۇش. بۇ جەدۋەل خىزمەت دەپتىرىدىن پايدا دەپ ئاتىلىدىغان جەدۋەلدىن بۇرۇن قۇرۇلىدۇ. ئۇنىڭ ئۈستىگە ، بىز جەدۋەلگە تەڭپۇڭلۇق جەدۋىلى دەپ ئىسىم قويدۇق.
- ئۇنىڭدىن كېيىن ، كودنى ئۇسۇلدا كۆرسىتىلگەندەك ئىجرا قىلىڭ. 1 . 24>
تېخىمۇ كۆپ ئوقۇڭ: ئۆزگىرىشچان ئىسىم بىلەن جەدۋەل قوشۇش ئۈچۈن Excel VBA (5 كۆڭۈلدىكىدەك مىسال)
3. Excel VBA ئارقىلىق جەدۋەل قوشۇش كونكرېت جەدۋەلدىن كېيىنكى ئىسىم بىلەن
بۇ ئۇسۇلدا ، بىز پايدا دېگەن جەدۋەلدىن كېيىن بىر ۋاراق قوشىمىز. بۇ جەرياننى تەپسىلىي كۆرۈپ باقايلى.
📌 قەدەم باسقۇچلار:
- > كۆزنەك 1-ئۇسۇل دا كۆرسىتىلگەندەك.
- ئۇنىڭدىن كېيىن ، تۆۋەندىكى كودنى يېزىڭ.
2461
بۇ كود ئۇسۇل 2 . پەقەت ، بۇ يەردە بىز دىن كېيىن پارامېتىرنى ئىشلەتتۇق دىن بۇرۇن. چۈنكى بىز يېڭى جەدۋەلنى مۇئەييەن جەدۋەلگە قوشماقچى.
- ئۇنىڭدىن كېيىن ، كودنى 1-ئۇسۇل دە كۆرسىتىلگەندەك ئىجرا قىلىڭ>
- شۇنداق قىلىپ ، ئۇ پايدا دېگەن جەدۋەلدىن كېيىن ئامبار يېڭى جەدۋەل قوشىدۇ.
تېخىمۇ كۆپ ئوقۇڭ: Excel VBA ئەگەر ئۇ بولمىسا جەدۋەل قوشۇش (تېز قەدەم بىلەن)
4. خىزمەت دەپتىرىنىڭ بېشىدا ئىسىم بىلەن جەدۋەل قىستۇرۇش
بۇ بۆلەكتە ، Excel دىكى خىزمەت دەپتىرىنىڭ بېشىدا VBA ئارقىلىق يېڭى ۋاراق سالىمىز. شۇڭا ، كېچىكتۈرمەي ، قانداق قىلىدىغانلىقىمىزنى كۆرۈپ باقايلى.
📌 قەدەم باسقۇچلار: 1> مودېل
كۆزنىكى 1-ئۇسۇل دە كۆرسىتىلگەندەك.
تېخىمۇ كۆپ ئوقۇڭ: Excel ماكرو: يېڭى جەدۋەل قۇرۇش ۋە ئىسىم ئۆزگەرتىش (3 كۆڭۈلدىكىدەك مىسال)
5. Excel VBA دىن پايدىلىنىپ خىزمەت دەپتىرىنىڭ ئاخىرىدا جەدۋەل قوشۇش
بۇ بۆلەكتە ، بىز خىزمەت دەپتىرىنىڭ ئاخىرقى جەدۋىلى دىن كېيىن بىر ۋاراق قوشىمىز. بۇ جەرياننى كۆرسىتىشىمگە رۇخسەت قىلىڭتۆۋەندە.
📌 قەدەم باسقۇچلار: > 1-ئۇسۇل .
3101
13>
- ئۇنىڭدىن كېيىن ، كودنى ئۇسۇلدا كۆرسىتىلگەندەك ئىجرا قىلىڭ. 1 .
- شۇڭلاشقا ، ئۇ خىزمەت دەپتىرىنىڭ ئاخىرىدا يېڭى جەدۋەل كىرىم باياناتى قوشىدۇ.
تېخىمۇ كۆپ ئوقۇڭ: يېڭى خىزمەت دەپتىرى قۇرۇڭ ۋە Excel دىكى VBA نى ئىشلىتىپ تېجەڭ
6. Excel VBA نىڭ كاتەكچە قىممىتى ئارقىلىق كۆپ ۋاراق تونۇشتۇرۇش ئەڭ ئاخىرقى ئۇسۇل ئۈچۈن ، بىز خىزمەت دەپتىرىگە Excel VBA نى ئىشلىتىپ بىر قاتار ھۈجەيرىلەرنىڭ ئىسمى بىلەن بىر نەچچە ۋاراق قوشىمىز. ئۇنىڭ ئۈستىگە ، ئىشلەتكۈچىدىن ئىسىم ئېلىش ئۈچۈن دائىرە كىرگۈزۈشىنى سورايمىز. ئۇنداقتا ، تۆۋەندىكى باسقۇچلارنى كۆرۈپ باقايلى.
📌 قەدەم باسقۇچلار:
- ئۇسۇل 1 دە كۆرسىتىلگەندەك كۆزنەك.
- ئۇنىڭدىن كېيىن ، تۆۋەندىكى كودنى كۆچۈرۈپ چاپلاڭ.
9115
كود پارچىلىنىش
- بىرىنچىدىن ، بىز Sub نى چاقىرىمىزتەرتىپ_ Add_Multiple_Sheets_Using_Cell_Value.
- ئاندىن ، بىز ئۆزگەرگۈچى تىپلارنى ئېنىقلايمىز> تۆتىنچىدىن ، جەدۋەلنى سېتىش دوكلاتى نى قوزغىتىمىز>
- كېيىنكى قەدەمدە ، بىز يېڭىدىن قۇرۇلغان جەدۋەلگە ئىسىم قويۇش ئۈچۈن Add.Name ئۇسۇلىنى قوللىنىۋاتىمىز. بىز بۇ جەدۋەللەرنى خىزمەت دەپتىرىنىڭ ئاكتىپ جەدۋىلى سېتىش دوكلاتى دىن كېيىن قۇرىمىز.
- ھازىر ، كودنى كۆرسىتىلگەندەك ئىجرا قىلىڭ. 1-خىل ئۇسۇل .
- شۇ ھامان ، ئالاھىدە كىرگۈزۈش ساندۇقى ئېچىلىدۇ> رامكا دائىرىسى.
- ئەڭ ئاخىرىدا OK نى چېكىڭ.
1> بەش جەدۋەل B5: B9 دائىرىسىدىكى كاتەكچە قىممىتى بىلەن ئاتالغان. ئۇلارنىڭ ھەممىسى جەدۋەل سېتىش دوكلاتى دىن كېيىن. Excel VBA نىڭ ئىسمى بىلەن. مەشىق ھۆججىتىنى چۈشۈرۈشنى ئۇنتۇپ قالماڭ. بۇ ماقالىنى ئوقۇغانلىقىڭىزغا رەھمەت ، بۇنىڭ پايدىلىق بولۇشىنى ئۈمىد قىلىمىز. سوئال ياكى تەكلىپ-پىكىرلىرىڭىز بولسا بىزگە باھا بۆلۈمىدە خەۋەر قىلىڭ. تېخىمۇ كۆپ ئىزدىنىش ئۈچۈن تور بېتىمىزنى ئالاھىدە زىيارەت قىلىڭ.