Агуулгын хүснэгт
Энэ бол анхлан суралцагчдад зориулсан Excel-ийн ажлын дэвтэрт VBA кодыг (Visual Basic for Applications код) хэрхэн нэмж, хүснэгтийн даалгавраа шийдвэрлэхийн тулд энэ макрог хэрхэн ажиллуулахыг харуулсан алхам алхмаар богино заавар юм.
Ихэнх хүмүүс надад таалагддаг бөгөөд та Microsoft Office-ийн жинхэнэ багш биш юм. Тиймээс бид энэ эсвэл тэр сонголтыг дуудах бүх онцлогийг мэдэхгүй байж магадгүй бөгөөд бид Excel-ийн өөр хувилбарууд дахь VBA гүйцэтгэлийн хурдыг ялгаж чадахгүй. Бид Excel программыг ашигласан өгөгдлөө боловсруулах хэрэгсэл болгон ашигладаг.
Та өгөгдлөө ямар нэгэн байдлаар өөрчлөх шаардлагатай гэж бодъё. Та маш их Google-ээр хайж, таны даалгаврыг шийдэх VBA макро олсон. Гэсэн хэдий ч таны VBA-ийн талаархи мэдлэг нь хүссэн зүйлээ үлдээдэг. Өөрийн олсон кодыг ашиглахын тулд энэхүү алхам алхмаар зааварчилгааг чөлөөтэй судлаарай:
VBA кодыг Excel-ийн ажлын дэвтэрт оруулах
Энэ жишээний хувьд бид Одоогийн ажлын хуудаснаас мөр таслахыг арилгахын тулд VBA макро ашиглах гэж байна.
- Ажиллах номоо Excel дээр нээнэ үү.
- Alt + F11 дарж Visual Basic Editor<-г нээнэ үү. 2> (VBE).
- " Project-VBAProject " цонхны ажлын номны нэрэн дээр хулганы баруун товчийг дарна уу (зүүн дээд буланд). засварлагч цонх) болон Insert -> Контекст цэснээс модуль .
- VBA кодыг (вэб хуудас гэх мэт) хуулж, VBA засварлагчийн баруун талбарт буулгана уу (" Модуль1 " цонх).
- Зөвлөгөө: Макро гүйцэтгэлийг хурдасгах
Хэрэв таны кодVBA макро нь эхэнд дараах мөрүүдийг агуулаагүй байна:
Application.ScreenUpdating = False
Мөн_үзнэ үү: Excel дээр мөр, баганыг хэрхэн царцаах вэApplication.Calculation = xlCalculationManual
Дараа нь дараахыг нэмнэ үү. Таны макро илүү хурдан ажиллуулах мөрүүд (дээрх дэлгэцийн агшинг харна уу):
- Кодын хамгийн эхэнд Dim -ээр эхэлсэн бүх кодын мөрийн дараа (хэрэв байгаа бол). " Dim " мөр байхгүй, дараа нь Дэд мөрийн дараа шууд нэмнэ үү):
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
- Кодны үндсэн дээр Төгсгөлийн дэд -ийн өмнө:
Application.ScreenUpdating = True
Хэрэглээ.Calculation = xlCalculationAutomatic
Эдгээр мөрүүд нь дараах байдлаар байна. Макро ажиллуулахын өмнө дэлгэцийн шинэчлэлтийг унтрааж, ажлын дэвтрийн томьёог дахин тооцоолохыг санал болгож байна.
Кодыг ажиллуулсны дараа бүх зүйл дахин асаалттай байна. Үүний үр дүнд гүйцэтгэл нь 10% -иас 500% хүртэл нэмэгддэг (а, макро нь эсийн агуулгыг тасралтгүй удирдаж байвал 5 дахин хурдан ажилладаг).
- Кодын хамгийн эхэнд Dim -ээр эхэлсэн бүх кодын мөрийн дараа (хэрэв байгаа бол). " Dim " мөр байхгүй, дараа нь Дэд мөрийн дараа шууд нэмнэ үү):
- Ажиллах номоо " Excel макро идэвхжүүлсэн ажлын ном " болгон хадгална уу.
Crl + S товчийг дараад " Дараах функцуудыг макрогүй ажлын номонд хадгалах боломжгүй " анхааруулах цонхны " Үгүй " товчийг дарна уу.
" Save as " харилцах цонх нээгдэнэ. " Хадгалах төрөл " унадаг жагсаалтаас " Excel-ийн макро идэвхжүүлсэн ажлын ном "-г сонгоод Хадгалах товчийг дарна уу.
- Alt + Q товчийг дарж хааЗасварлах цонх болон ажлын дэвтэр рүүгээ буцна уу.
Excel дээр VBA макро хэрхэн ажиллуулах вэ
Дээрх хэсэгт тайлбарласны дагуу нэмсэн VBA кодыг ажиллуулах бол: дарна уу. Alt+F8 дарж " Макро " харилцах цонхыг нээнэ үү.
Дараа нь "Макро нэр" жагсаалтаас хүссэн макро сонгоод "Ажиллуулах" товчийг дарна уу.