
یکی از خوبی های اکسل اینه که کاربر میتونه کارهای روتین خودش رو ضبط کنه و اجرای اون رو به اکسل بسپاره! این یعنی اینکه اگه شما باید یکسری فعالیت های تکراری رو انجام بدید بهترین راه استفاده از ماکرو در اکسل هست. مثال هایی از این کارهای تکراری رو در زیر میبینید:
- فرض کنید ۱۰ شیت مشابه دارید و میخواید تنظیمات پرینت انجام بدید و پرینت بگیرید (این کار ممکن است بارها تکرار بشه). راه حلی که بشه این کار رو سریع و با دقت انجام داد، استفاده از ماکرو هست.
- مثلا فرض کنید هر بار محدوده ای را باید کپی کرده و به محدوده دیگری منتقل کنید. این کار رو هم بدون اینکه لازم باشه هر بار مراحل رو انجام بدید، می تونید با یک بار ضبط ماکرو و اجرای آن در زمان های بعد، به کارتون سرعت بیشتری ببخشید.
- به این نکته دقت داشت باشید که در ضبط ماکرو نیاز نیست شما با کدهای VBA و برنامه نویسی آشنا باشید. ماکرو واسطی است بین شما و اکسل که بدون نیاز به دانش برنامه نویسی، کارهای شما رو مکانیزه میکنه.
ماکرو در اکسل چیست؟
سوالی که برای خیلی ها در مورد ماکرو هست اینه که دقیقا ماکرو، چی هست؟ به زبان ساده، تبدیل عملیاتی که ما در اکسل انجام میدیم، به کدهای VBA رو ضبط ماکرو انجام میده. مثلا عملیات مورد نظر ما این بوده که رنگ پس زمینه سلول A1 قرمز رنگ شود. خب بعد از اینکه ضبط ماکرو (که مراحل اجرای آن در ادامه شرح داده شده) آغاز شد، شروع میکنیم به اجرای عملیات مورد نظر. یعنی سل A1 رو انتخاب میکنیم و رنگ پس زمینه آن را به قرمز رنگ تغییر می دهیم و دکمه پایان ضبط ماکرو را میزنیم. در حین انجام این عملیات، کد متناظر با این عملیات ذخیره میشه و هر بار که اجرا بشه، همون عملیات تکرار خواهد شد. مثلا دوباره سل A1 رو بی رنگ میکنیم. این بار بجی اینکه مستقیم سل رو رنگی کنیم، کد ضبط شده رو اجرا میکنیم. با اجرای کد، سل A1 به رنگ قرمز در میاد. کد متناظر با تغییر رنگ پس زمینه سلول A1 به رنگ قرمز عبارت است از:
Sheet1.Range("a1").Interior.Color = RGB(250,0,0)پس مشاهده کردیم که در ضبط ماکرو در اکسل، نیازی نیست با برنامه نویسی آشنا باشیم. چون این کار رو خود اکسل انجام میده. در واقع عملیات درحال انجام رو به کد VBA تبدیل میکنه.
حالا این سوال براتون پیش میاد که این کدها کجا هستند و از کجا میتونیم ببینمشون؟ در اکسل محیطی هست که کارش ویرایش و مشاهده کدهای وی بی هست. برای اینکه به این محیط وارد بشید چند راه دارید:
- استفاده از کلید میانبر Alt+F11
- کلیک راست بر روی نام شیت و انتخاب گزینه View Code
- دکمه Visual Basic از منو Developer (حواستون باشه این منو در حالت عادی دیده نمیشه و باید فعالش کنید)

شکل ۱- ماکرو در اکسل – محیط برنامه نویسی (VBE)
در آموزش های بعدی در مورد این محیط بیشتر صحبت میکنیم و اجزای اون رو به شما یاد میدم.
ذخیر ماکرو بسیار کاربردی هست اما در این مورد باید چند نکته رو بدونید:
- ذخیره ماکرو تنها برای ماکروهای ساده مناسب هستند و باید به عنوان بخشی از ماکروهای پیچیده استفاده شوند.
- همه کارهایی که در اکسل انجام میدهید قابلیت ضبط شدن توسط ماکرو رو نداره.
- در اکثر مواقع کدهای ایجاد شده از این طریق نیاز به اصلاح داره
ضبط ماکرو
در واقع ابزار ذخیره ماکرو از زمان شروع ضبط، عملیات موس و کیبورد رو به زبان وی بی (VBA) ترجمه میکنه. برای آشنایی بیشتر با این ابزار مراحل زیر رو با هم انجام بدیم:
- یک فایل اکسل جدید باز کنید.
- وارد محیط ویرایشگر کد وی بی (VBE) بشید.
- دو پنجره اکسل و ویرایشگر رو کنار هم قرار بدید.
- حالا از منو View، از بخش Macros گزینه Record Macro رو بزنید و از پنجره باز شده گزینه OK رو انتخاب کنید.
- حالا شروع کنید به کار کردن با اکسل، سلول ها رو کلیک کنید، متنی بنویسید، رنگ ها رو تغییر بدید، با ابزارها کار کنید. در پایان روی گزینه Stop در گوشه سمت چپ و پایین در کنار کلمه Ready دیده میشه
- با شروع ضبط ماکرو یک ماژول با نام Module1 به صفحه VBE اضافه میشه که دستوراتی که از این به بعد ایجاد میشه اونجا ذخیره میشه و شما همزمان دارید میبینید چه کدهایی داره ثبت میشه. شکل ۲

شکل ۲- ماکرو در اکسل – نتیجه ضبط کدها
به ماژول اضافه شده (با نام Module1) که حاوی کد ایجاد شده هست دقت کنید.
تو این آموزش مقداری با ماکرو و ضبط ماکرو آشنا شدیم و دانستیم که ماکروها در چه مواردی بهترین گزینه هستند. اما توجه کنید:
خود من هنوز برای حل بعضی مسائل ضبط ماکرو رو سریعترین راه برای یافتن راه حل میدونم و ازش استفاده میکنم، پس از این ابزار ارزشمند غافل نشید.
توجه داشته باشید بعد از ضبط ماکرو و یا نوشتن هر کد وی بی باید فایل رو با فرمت Excel Macro-Enabled Workbook که پسوند xlsm یا Excel Binary Workbook با پسوند xlsb دارد ذخیره کنید تا کدهای ایجاد شده از بین نروند.
اگر نکته ای در مورد این آموزش هست مطرح کنید تا در موردش صحبت کنیم.
پیشنهاد میکنیم آموزش های زیر رو هم ببینید:





سلام من ماکرو نویسی کردم به همین طریقی که گفتید ذخیره کردم اما تو یه کامپیوتر دیگه که میبرم فایل رو ماکرو ها اجرا نمیشه چرا
درود بر شما
خیلی بستگی داره به اینکه چه فرایندی رو ضبط کنید. اگه فرایندی باشه که به دایرکتوری ها و مشخصات کامپیوتر ارتباط داشته باشه، بله، کار نمیکنه و بادی ویرایش بشه.
کد رو بررسی کنید. مثلا اگه ذخیره میکنید، باید مسیر رو در کامپیوتر جدید هم تعریف کنید
با سلام و تشکر از شما
یه سطر دارم که میخام سلهای اون ۴تا ۴تا باهم مرج بشن . مثلا از A1:D1 با هم مرج بشن، از E1:H1 و الی آخر. اما تعدادشون زیاده و زمان بره. چکار میشه کرد؟
مرسی
درود بر شما
برای اینکار باید کد نویسی (VBA) انجام بدید
حلقه ای باشه که ۴ تا ۴ تا انتخاب کنه و عملیات Merge رو انجام بده
سلام
تو یه شیت تعداد زیادی رکورد دارم که می خوام برای هر کدام از رکورد ها یک شیت بسازم باید چیکار کنم ؟
سلام
از کدی با ساختار کد زیر استفاده کنید.
توجه کنید که ستونی که بر اساس اون نام شیت های جدید تعریف میشه نباید تکراری داشته باشه.
همچنین دقت کنید تعداد شیت ها از حد معقول بیشتر نشه که فایل شما قابل استفاده بمونه.
Sub Generate_Sheet() Dim MyCell As Range For Each MyCell In Range("a1:a20") With Sheets.Add .Name = MyCell.Value End With Next MyCell End Subسلام من میخوام ماکرویی بنویسم که ستون a:a را فیلتر کند و تاریخی که در سلولی در شیت دیگری است رادر فیلتر نوشته و جستجو کند. خطا میده. میشه کدش رو برام بنویسید اینکه چجوری سلولی از یک شیت دیگر را در ActiveSheetمان وارد کنیم.
‘
‘ Macro1 Macro
‘
‘
Sheets(Range(“c3”).Value).Select
ActiveSheet.Outline.ShowLevels RowLevels:=3
ActiveSheet.Range(“$C$1:$C$759”).AutoFilter Field:=3, Criteria1:= _
Worksheets(“æÑæÏ Èå ÓíÓÊã”).Range(“c3”).Value, Operator:=xlAnd
End Sub
سلام
برای فیلتر کردن محدوده کافیه از کد زیر استفاده کنید:
Sub My_AutoFilter() Sheet1.Range("$A$1:$A$15").AutoFilter Field:=1, Criteria1:=Sheet2.Range("a1") End Subممکنه خطاهایی به علت های مختلف (مثلا نبود آیتم جستجو شده در محدوده اطلاعات) رخ بده که باید با دستورات مدیریت خطا مثل On error resume next مدیریت بشه.
سلام دوستان
من میخواهم روش ایجاد دکمه چاپ جهت چاپ در یک شیت دیگر را یاد بگیرم و نحوه ضبط ماکرو چاپ را
لطفا راهنماییم کنید بسیار ضروری می باشد
سلام
کافیه شروع به ضبط ماکرو کنید (در آموزش توضیح داده شده) بعد یکبار کل عملیات مربوط به چاپ رو انجام بدید. وقتی تمام شد، ضبط ماکرو رو متوقف کنید.
سلام و عرض خسته نباشید
چطور میشه بین یکسری اعداد ۴ رقمی مثل ۱۲۳۴ به صورت یکجا اعشار اضافه کرد که بشه (۱۲.۳۴)
محبت کنید فرمولش رو بیان کنید . سپاس
سلام
اگر همش چهار رقمی هست کافیه تقسیم بر ۱۰۰ کنید.
برای اینکه راحت تر این کار و بکنید و فرمول نویسی نکنید میتونید از Paste special استفاده کنید.
یعنی عدد ۱۰۰ رو در یک سلول نوشته، کپی کنید. بعد محدوده اعداد رو انتخاب کنید و از Paste special گزینه Devide رو انتخاب کنید…….
فرمول هم که تقسیم ساده:
سلام و عرض ادب
یه مشکلی دارم و اون اینه که توی یه فایل اکسل ماکرو ایجاد کردم و برای اون کلید هم تعریف کردم منظورم اینه یه کلید گذاشتم تا پس از فشاردادن اون کلید ماکرو اجرا بشه
حالا مشکل اینجاست وقتی شیت رو قفل میکنم پس از فشار دادن کلید دیگه ماکرو اجرا نمیشه
ممنون میشم اگه من رو راهنمایی کنید
سلام
زمانیکه شما شیت رو پروتکت میکنید در واقع اجازه انجام تغییرات روی سلول ها رو برداشتید. حالا اگر ماکرو شما قصد تغییر هر سلولی رو داشته باشه اونوقت با خطا روبه رو میشه.
برای اینکه این خطا رخ نده قبل از اجرای کد ماکرو باید با استفاده از کد، شیت رو از حالت پروتکت خارج کنید و مجددا انتهای کد، شیت رو پروتکت کنید. با دستورات زیر میتونید این کار رو انجام بدید:
عالی بود
ممنون از لطف شما
سلام. من یک فایل اکسل از یک سایت خارجی دانلود کردم. چجوری میتونم ماکرو هاشو فارسی کنم که خروجیم زبونش فارسی باشه؟
سلام
وارد محیط VBE بشید (Alt + F11) و اگر کدها رمزگذاری نشده باشند میتونید متن های انگلیسی رو به فارسی تبدیل کنید.
آیا امکانش هست فایل اکسل رو برای شما بفرستم و نگاه کنید. در صورت امکان فارسی سازی و کاستومایز کردن، با هم به توافق برسیم؟
فایل رو به آی دی تلگرام زیر ارسال کنید تا بررسی بشه:
@ExcelpediaAdmin
سلام و وقت بخیر
یک سوال داشتم ممنون میشم پاسخ بدین.
چندین فایل اکسل دارم ک میخام در هر فایل محتوای یک سلول رو ب عنوان خروجی اون فایل در یک فایل اکسل جداگانه (نهایی) منتقل کنم. در یک فایل این کارو انجام دادم و ماکرو سیو کردم، اما دفعه بعدی ک برای یک فایل دیگر انجام میدم ،خروجی فایلی ک ماکرو برای روی اون اجرا و سیو کردم رو ب عنوان خروجی در فایل نهایم نمایش میده . کمک
سلام
باید بفرمائید دقیقا در حین ضبط ماکرو چه عملیاتی انجام دادید.
اما به هر حال زمانیکه ماکرو ذخیره میکنید و محتویات یک سلول از یک فایل رو مساوی مقدار یک سلول از فایل دیگه قرار میدید، کدی که برای اینکار ضبط میشه دقیقا نام فایل مقصد رو در نظر میگیره.
پس با هر بار اجرای اون ماکرو، اگر فایل مقصد باز باشه فقط اطلاعات همون فایل رو برای شما منتقل میکنه، نه فایل دیگه ای.
باید کدهای ماکرو رو ویرایش کنید تا اطلاعات فایل های دیگه رو هم فراخوانی کنه.
سلام
متشکرم از اینکه پاسخ دادین. ممکنه فایلی در اختیارم قرار بدین که نحوه ی تغییر کدهای وی بی رو بخونم. ممنون میشم .
سلام
مبحث تغییر کدهای وی بی نیازمند اینه که شما زبان وی بی رو آشنا باشید و توی یک فایل نمیشه این موضوع رو آموزش داد.
برای این کار دوره آموزش وی بی تعریف شده که میتونید استفاده کنید.
همچنین کتاب های آموزشی مناسبی به زبان انگلیسی هست که میتونید از تالار گفتمان اکسل پدیا دانلود و استفاده کنید.
اما اگر میخواید مشکلتون فقط در این مورد حل بشه، سوال رو دقیق بپرسید تا راهنمایی لازم رو عرض کنم خدمتتون
سلام دوست عزیز ممنون از توضیحاتتون
سوال داشتم
رکرد ماکرو نوی ویلوکاپ و پیوت هم جواب میده؟
سلام
سوالتون خیلی مشخص نیست.
اما زمان ضبط ماکرو اگر از تابع Vlookup استفاده کنید یا تغییراتی در Pivot Table بدید کد آنها ایجاد و ذخیره میشه.