فهرست مطالب
این یک آموزش گام به گام کوتاه برای مبتدیان است که نشان می دهد چگونه کد VBA (کد ویژوال بیسیک برای برنامه های کاربردی) را به کتاب کار اکسل خود اضافه کنید و این ماکرو را برای حل وظایف صفحه گسترده خود اجرا کنید.
بیشتر مردم من را دوست دارند و شما گوروای واقعی مایکروسافت آفیس نیستید. بنابراین، ما ممکن است تمام ویژگی های فراخوانی این یا آن گزینه را ندانیم و نتوانیم تفاوت سرعت اجرای VBA در نسخه های مختلف اکسل را تشخیص دهیم. ما از Excel بهعنوان ابزاری برای پردازش دادههای کاربردی خود استفاده میکنیم.
فرض کنید باید دادههای خود را به نحوی تغییر دهید. شما خیلی در گوگل جستجو کردید و یک ماکرو VBA پیدا کردید که کار شما را حل می کند. با این حال، دانش شما در مورد VBA جای تامل دارد. این راهنمای گام به گام را مطالعه کنید تا بتوانید از کدی که پیدا کردید استفاده کنید:
کد VBA را در کتاب کار Excel وارد کنید
برای این مثال، ما می خواهید از یک ماکرو VBA برای حذف خطوط شکسته از کاربرگ فعلی استفاده کنید.
- کتاب کار خود را در اکسل باز کنید.
- Alt + F11 را فشار دهید تا Visual Basic Editor<باز شود. 2> (VBE).
- روی نام کتاب کار خود در قسمت " Project-VBAProject " کلیک راست کنید (در گوشه سمت چپ بالای صفحه پنجره ویرایشگر) و Insert -> ماژول را از منوی زمینه.
- کد VBA را کپی کنید (از یک صفحه وب و غیره) و آن را در قسمت سمت راست ویرایشگر VBA قرار دهید (" پنجره Module1 ").
- نکته: سرعت اجرای ماکرو را افزایش دهید
اگر کد شماماکرو VBA شامل خطوط زیر در ابتدا نیست:
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
سپس موارد زیر را اضافه کنید خطوطی برای اینکه ماکرو شما سریعتر کار کند (تصاویر بالا را ببینید):
- تا ابتدای کد، بعد از همه خطوط کدی که با Dim شروع می شوند (در صورت وجود بدون خطوط " Dim "، سپس آنها را درست بعد از خط Sub اضافه کنید):
Application.ScreenUpdating = False
همچنین ببینید: توابع COUNT و COUNTA برای شمارش سلول ها در اکسلApplication.Calculation = xlCalculationManual
- در نهایت کد، قبل از End Sub :
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
این خطوط، به عنوان نام آنها نشان می دهد، قبل از اجرای ماکرو، refresh صفحه را خاموش کنید و فرمول های کتاب کار را مجدد محاسبه کنید.
بعد از اجرای کد، همه چیز دوباره روشن می شود. در نتیجه، عملکرد از 10٪ به 500٪ افزایش می یابد (آها، اگر ماکرو به طور مداوم محتویات سلول ها را دستکاری کند، 5 برابر سریعتر کار می کند).
- تا ابتدای کد، بعد از همه خطوط کدی که با Dim شروع می شوند (در صورت وجود بدون خطوط " Dim "، سپس آنها را درست بعد از خط Sub اضافه کنید):
- کتاب کار خود را به عنوان " کتاب کار با ماکرو فعال اکسل " ذخیره کنید.
Crl + S را فشار دهید، سپس روی دکمه " خیر " در گفتگوی هشدار " ویژگیهای زیر در کتاب کار بدون ماکرو ذخیره نمیشوند " کلیک کنید.
گفتگوی " ذخیره به عنوان " باز خواهد شد. " Excel macro-enabled workbook " را از لیست کشویی " Save as type " انتخاب کنید و روی دکمه Save کلیک کنید.
- Alt + Q را فشار دهید تا بسته شودپنجره ویرایشگر را بازگردانید و به Workbook خود برگردید.
نحوه اجرای ماکروهای VBA در اکسل
هنگامی که می خواهید کد VBA را که در قسمت بالا اضافه کرده اید اجرا کنید: فشار دهید Alt+F8 برای باز کردن گفتگوی " Macro ".
سپس ماکرو مورد نظر را از لیست "Macro Name" انتخاب کنید و روی دکمه "Run" کلیک کنید.