فهرست مطالب
در پایگاه های داده بزرگ، بیشتر وقت خود را صرف پرداختن به محدوده ها و سلول ها می کنید. گاهی اوقات باید همان عمل را در محدوده های بزرگ یا تعداد زیادی سلول تکرار کنید. این در عین حال زمان شما را می کشد و کارایی شما را کاهش می دهد. راه حل هوشمندانه برای این مشکل، ساختن کد برنامه نویسی VBA است که در هر سلول در محدوده اجرا می شود و همان عملی را که توسط شما هدایت می شود انجام می دهد. امروز در این مقاله، نحوه انجام VBA برای هر سلول در محدوده در اکسل را مورد بحث قرار خواهیم داد.
دانلود کتاب تمرین تمرین
این کتاب تمرینی را دانلود کنید تا هنگام خواندن این مقاله، کار را تمرین کنید.
کد VBA برای هر سلول در یک محدوده در Excel.xlsx
3 روش مناسب برای اعمال VBA برای هر سلول در محدوده در اکسل
با استفاده از یک کد VBA می توانید فرمول یکسانی را برای هر سلول در یک محدوده یا یک ستون یا یک ردیف انجام دهید. در این بخش، تمام بخش ها را مرور خواهیم کرد.
1. برای هر سلول در محدوده VBA اعمال کنید
موقعیتی را در نظر بگیرید که باید همان کد VBA را برای هر سلول در یک خانه اعمال کنید. محدوده داده شده ( B3:F12 ). برای این کار یک کد VBA می سازیم. دستورالعمل ها در زیر آمده است
مرحله 1:
- ابتدا، ما یک دکمه فرمان را برای ساده کردن کار خود وارد می کنیم. . به برگه Developer خود بروید، Insert را انتخاب کنید و روی دکمه فرمان کلیک کنید تا یکی را دریافت کنید.
- ما فرمان خود را گرفته ایمدکمه.
- روی دکمه فرمان راست کلیک کنید تا گزینه ها باز شوند. انتخاب کنید و روی Properties کلیک کنید تا برخی از گزینه ها را تغییر دهید.
- Caption دکمه فرمان را تغییر دهید. در اینجا نام را به « اینجا کلیک کنید » تغییر می دهیم.
مرحله 2:
- اکنون روی دکمه فرمان دوبار کلیک کنید تا VBA Module باز شود. در اینجا ما کد VBA خود را برای کار یادداشت می کنیم. ما اشیاء محدوده را CL و Rng می نامیم. شما می توانید آنها را هر طور که دوست دارید نام گذاری کنید.
6700
- محدوده خاصی را با این دستور اختصاص دهید،
Set Rng = Worksheets ("VBA1"). Range("B3:F12")
- در اینجا VBA1 نام کاربرگ ما است و B3:F12 محدوده تعریف شده ما است.
- اکنون از کد برای اجرای هر سلول در محدوده استفاده می کنیم. کد این است,
4018
- Value = 100 به این اشاره دارد که برای هر سلول در محدوده داده شده 100 برمی گردد.
- بنابراین کد نهایی ما می شود،
5300
- به کاربرگ اصلی خود بروید و روی دکمه فرمان کلیک کنید تا VBA اجرا شود. برای هر سلول در محدوده.
مرحله 3:
- مانند مقادیر عددی، ما همچنین می توانیم مقادیر متنی را برای هر سلول در محدوده قرار دهید. در این صورت، به پنجره VBA بروید و به جای 100، مقدار متنی را که می خواهید اجرا کنید وارد کنید. تغییر کرده استخط است
7006
- روی دکمه فرمان کلیک کنید و کد VBA این مقدار متن را برای هر سلول در محدوده برمی گرداند.
مرحله 4:
- در این مرحله کمی عمیق تر می پردازیم. فرض کنید میخواهیم هر سلول خالی در محدوده خود را برجسته کنیم.
- برای آن، یک شرط جدید به کد موجود خود اضافه کنید. فرمول جدید این است،
7800
- این کد جدید سلول خالی را با رنگ قرمز برجسته می کند. بنابراین کد کامل این است،
5277
- با کلیک بر روی دکمه فرمان، نتیجه را دریافت کنید.
خواندنهای مشابه:
- نحوه استفاده از Range Object VBA در Excel (5 ویژگی)
- استفاده از VBA Range Offset (11 روش)
- نحوه شمارش متن در اکسل (7 ترفند آسان)
2. درج VBA کد برای هر سلول در یک ستون از یک محدوده
ما می توانیم کد VBA را برای هر سلول در یک ستون نیز اجرا کنیم. فرض کنید ما یک ستون حاوی اعداد داریم و باید مقادیر کمتر از 10 را رنگ کنیم. ما یک کد VBA برای اجرای هر سلول در ستون خواهیم ساخت.
مرحله 1:
- یک دکمه فرمان را به دنبال دستورالعمل هایی که در مورد آن صحبت کردیم ایجاد کنید.
مرحله 2:
- روی دکمه فرمان دوبار کلیک کنید تا پنجره VBA باز شود.
- متغیری به نام " c " از نوع تعریف می کنیم. طولانی ما در اینجا از متغیر نوع Long استفاده می کنیم زیرا Longمتغیرها ظرفیت بیشتری نسبت به متغیرهای Integer دارند.
2508
- بعد، خط کدی را اضافه کنید که رنگ فونت تمام سلول های ستون ما را تغییر می دهد. مشکی.
6435
- حلقه این کد را وارد کنید.
4144
- در این مرحله شرطی را وارد می کنیم تا مقادیری که کمتر از مقدار سلول C4 (10) هستند را رنگ آمیزی کنیم. برای انجام این کار، این کد را وارد کنید.
9550
- پس کد نهایی این است،
4938
- VBA با کلیک بر روی دکمه فرمان، اجرا می شود و نتایج را نشان می دهد.
3. برای هر سلول در یک ردیف از یک محدوده یک کد VBA بنویسید
ما می توانیم یک کد VBA را برای هر سلول در یک ردیف نیز اجرا کنیم. در ردیف داده شده، باید همان عمل را روی هر سلول از ردیف انجام دهیم.
مرحله 1:
- یک دکمه فرمان اضافه کنید و نام آن را به " اینجا کلیک کنید! "
- روی دکمه دوبار کلیک کنید تا پنجره VBA را باز کنید. کد VBA ارائه شده در زیر را یادداشت کنید.
6933
- کد در هر سلول از ردیف اجرا می شود و یک پر رنگ زرد در هر سلول اعمال می شود.
- روی دکمه کلیک کنید و نتیجه ما اینجاست.
یادداشت های سریع
👉 اگر شما برگه برنامهنویس خود را قابل مشاهده نیستید، میتوانید با استفاده از این دستورالعمل آن را فعال کنید.
نوار ابزار دسترسی سریع سفارشی → دستورات بیشتر → سفارشی کردن نوار → توسعهدهنده → OK
نتیجهگیری
ما سه رویکرد مختلف را برای اجرای VBA برای هر سلول در یک محدوده انجام دادهایم. در صورت داشتن هر گونه سوال یا ابهام می توانید نظر خود را اعلام کنید. همچنین می توانید سایر مقالات ما را در رابطه با وظایف اکسل بررسی کنید!