Qanday qilib VBA orqali Excel ish kitobingiz uchun katalogni tezda yaratish mumkin

Hozir ulashing:

Ko'p ish varaqlari bo'lgan ish kitobi uchun katalog yaratish kerak. Bu erda Excel ish varag'ida katalog yaratishning tezkor usuli mavjud.

Oldingi maqolamizda Qanday qilib giperhavolalar orqali Excelda katalog yaratish mumkin, biz ish varag'iga giperhavolalar kiritish orqali katalog yaratish haqida gapirgan edik. Ko'p ish varaqlari bilan ish kitobi uchun katalog yaratish juda foydali bo'lishi mumkin. Ammo giperhavolalarni qo'lda birma-bir qo'shish ko'p vaqt talab qilishi mumkin. Shuning uchun, bizda bunday katalogni tezda yaratishning yangi usuli mavjud.

Katalog yarating

Quyidagi rasmda ish kitobida ko'plab ish varaqlari mavjud.Katalog uchun misol

Va endi siz ushbu ish kitobida katalog yaratishingiz mumkin.

  1. Tasmadagi yorliqlardan birini o'ng tugmasini bosing.
  2. Keyin menyuda "Lentani moslashtirish" tugmasini bosing.Tasmani sozlang
  3. "Excel Options" oynasida "Asosiy yorliqlar" maydonida "Tuzuvchi" opsiyasini belgilang.
  4. Va keyin "OK" tugmasini bosing.Dasturchini tekshiring
  5. Endi lentadagi "Tuzuvchi" yorlig'ini bosing.
  6. Keyin asboblar panelidagi "Visual Basic" tugmasini bosing.Visual Basic

Shunday qilib, siz Visual Basic muharririni ochdingiz. Aslida, muharrirni tezda ochish uchun klaviaturadagi "Alt + F11" yorliq tugmachasini ham bosishingiz mumkin.

  1. Endi VBA proyektorida o'ng tugmasini bosing.
  2. Keyin kursorni "Qo'shish" opsiyasiga olib boring.
  3. Pastki menyuda "Modul" opsiyasini tanlang.Modulni kiriting

Shunday qilib, siz loyihaga yangi modul kiritdingiz.

  1. Endi quyidagi VBA kodlarini yangi modulga nusxalang:

Sub CreateMenu()

    Butun son sifatida xiralashtiring

    a = 1

    'yangi ish varag'ini qo'shing

    Ishchi varaqlar.Addiga qo'shish:=Shaxs(1)

    Sheets(1).Name = “Menyu”

    Ishchi varaqlar (“Menyu”).Range (“A1”).Qiymat = “Menyu”

    a = 2 uchun ActiveWorkbook.Worksheets.Count

        Ishchi varaqlar("Menyu").Range("A" & a) = Sheets(a).Ism

        ActiveSheet.Hyperlinks. Anchor qo‘shish:=Ish varaqlari(“Menyu”).Range(“A” va a), _

        Manzil:=””, _

        Subaddress:=”'” & Sheets(a).Ism & “'!R1C1”, _

        TextToDisplay:=Shaxs(a).Ism

    Keyingi

End Sub

Ushbu kodda biz boshida "Menyu" nomli yangi ish varag'ini joylashtiramiz. Agar "Menyu" deb nomlangan ish varag'i allaqachon mavjud bo'lsa, siz VBA kodini o'zgartirishingiz yoki mavjud ish varag'i nomini o'zgartirishingiz mumkin. Bundan tashqari, biz ro'yxatni yangi ish varag'ining birinchi ustuniga kiritamiz. Agar siz katalogni turli diapazonda kiritishingiz kerak bo'lsa, uni o'zingizning ehtiyojingizga qarab o'zgartirishingiz mumkin.

  1. Endi asboblar panelidagi "Run Sub-ni ishga tushirish" tugmasini bosingSub-ni ishga tushiring

Bundan tashqari, siz klaviaturadagi "F5" tugmasini bosishingiz ham mumkin.

  1. Endi ishchi varaq interfeysiga qayting.Katalog

Ish kitobida "Menyu" nomli yangi ish varag'i mavjud. Va barcha varaq nomlari tegishli giperhavolalar bilan ish varag'ida keltirilgan. Ushbu usuldan siz qisqa vaqt ichida osongina katalog yaratishingiz mumkin.

Ikki usul o'rtasidagi taqqoslash

Oldingi maqolamizda Qanday qilib giperhavolalar orqali Excelda katalog yaratish mumkin, biz katalogni qo'lda qo'shamiz. Va biz ikkita usulning farqini quyidagi jadvalda taqqoslaymiz.

qiyoslash Katalogni qo'lda yarating VBA protsedurasidan foydalaning
ustunlik 1. Har bir Excel foydalanuvchisi bu usuldan bemalol foydalanishi mumkin.

2. Agar siz VBA haqida hech qanday ma'lumotga ega bo'lmasangiz, ushbu usuldan foydalanishingiz mumkin.

1. VBA protseduralari orqali siz bu vazifani bir marta bosish bilan yakunlashingiz mumkin.

2. Boshqa talablarni bajarish uchun VBA kodlarini ham o'zgartirishingiz mumkin.

Kamchilik 1. Agar ish daftarida ish varaqlari ko'p bo'lsa, siz albatta giperhavolalarni kiritishga ko'p vaqt sarflaysiz.

2. Giperhavolalarni birma-bir tanlash kerak va bu osonlikcha xatolarga olib keladi.

1. Agar siz VBA kodlari bilan tanish bo'lmasangiz, kodlarni ishga tushirishda muammolarga duch kelasiz.

2. VBA kodlaridan foydalanish vazifani murakkablashtiradi.

 

Excelda kutilmagan vaziyatlarni hal qilish

Agar vazifangizni bajarish uchun tez-tez Exceldan foydalansangiz, muqarrar ravishda ba'zi xatolarga duch kelasiz. Ko'pincha Exceldan chiqib, keyin uni qayta ishga tushirishingiz mumkin. Shunday qilib, bu kichik xatolar yo'qoladi. Biroq, Exceldagi ba'zi xatolar Excelning jiddiy buzilishiga olib keladi. Va natijasi tasavvur qilib bo'lmaydigan bo'lishi mumkin. Hozirda siz... xls ma'lumotlar muammosini tuzatish bizning malakali vositamiz orqali. Ushbu samarali vosita yordamida siz qilishingiz kerak bo'lgan yagona narsa - tiklanish jarayoni tugashini kutishdir.

Muallif kirish:

Anna Ma ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc doc ma'lumotlariga zarar yetkazish va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com

Hozir ulashing:

Comments are closed.