فهرست مطالب
وقتی یک جدول داده کوچک با چند ستون دارید، می توانید به راحتی همه آنها را بشمارید. اما برای یک جدول داده بزرگ، شمارش تمام ستون ها بدون هیچ خطایی بسیار دشوار است. علاوه بر این، برخی از ستون ها ممکن است حاوی داده باشند، در حالی که برخی از ستون ها ممکن است کاملاً خالی باشند. بنابراین شمارش تمام ستون ها با داده در صورت وجود یک جدول داده بزرگ بسیار سخت است. در این مقاله 2 روش برای شمارش ستون ها با داده ها با استفاده از VBA در اکسل به راحتی یاد می گیرید.
دانلود کتاب تمرین تمرین
فایل اکسل را می توانید از لینک زیر دانلود و به همراه تمرین کنید. آن را.
شمارش ستون ها با Data.xlsm
2 راه برای شمارش ستون ها با داده با استفاده از VBA در اکسل
1 شمارش تمام ستون های یک کاربرگ با داده ها با استفاده از یک کد VBA ساده
ما می توانیم 3 ستون را در جدول داده های زیر مشاهده کنیم. اکنون از یک کد VBA برای تعیین تعداد ستون های استفاده شده در یک کاربرگ اکسل استفاده می کنیم.
❶ ابتدا ALT + F11 را فشار دهید. برای باز کردن ویرایشگر VBA.
❷ پس از آن یک ماژول جدید از Insert > ماژول.
❸ پس از آن اسکریپت VBA زیر را کپی کنید.
5161
❹ سپس به ویرایشگر VBA برگردید و CTRL را فشار دهید. + V برای چسباندن آن.
❺ اکنون کد VBA را با فشار دادن دکمه CTRL + S ذخیره کنید.
❻ برای اجرای کد VBA، به برگه Developer بروید و روی Macros کلیک کنید. یا، به سادگی F5 را فشار دهید کلید.
کادر گفتگوی Macro ظاهر می شود.
❼ تنها کاری که باید انجام دهید این است که روی دکمه Run کلیک کنید.
اکنون خواهید دید که یک کادر محاوره ای ظاهر شده است. که می گوید، تعداد ستون های دارای داده 3 است.
بیشتر بخوانید: نحوه شمارش تعداد ستون ها در اکسل (3 آسان روشها)
2. شمارش تمام ستونها در یک محدوده مشخص با دادهها با استفاده از کد VBA اکسل
کد VBA زیر به شما امکان میدهد تمام ستونهای دارای داده را در یک عدد بشمارید. محدوده داده شده.
برای استفاده از کد،
❶ ابتدا ویرایشگر VBA را با فشار دادن ALT + F11 باز کنید.
❷ سپس بروید به درج > ماژول برای ایجاد یک ماژول جدید.
❸ پس از آن اسکریپت VBA زیر را کپی کنید.
8361
❹ به ویرایشگر VBA برگردید و فشار دهید CTRL + V برای چسباندن آن.
❺ اکنون کد را با فشار دادن CTRL + S ذخیره کنید.
❻ به تب Developer بروید و Macros را فشار دهید تا پنجره Macro باز شود.
یا، فقط کافی است را فشار دهید. کلید F5 برای استفاده از کادر گفتگوی Macro .
❼ از کادر گفتگو، نام تابع CountColumnsInARange را انتخاب کرده و Run <7 را بزنید> را فشار دهید.
در نهایت، یک کادر محاوره ای کوچک ظاهر می شود که می گوید تعداد کل ستون ها 3 است.
بیشتر بخوانید: نحوه شمارش ستون ها برای VLOOKUP در اکسل (2 روش)
کدهای VBA بیشتر برای شمارش ستون ها در اکسل
1. استفاده کنیدVBA Range.End Method برای برگرداندن آخرین شماره ستون استفاده شده
برای دریافت آخرین شماره ستون استفاده شده در صفحه گسترده اکسل،
❶ ابتدا ویرایشگر VBA را با فشار دادن باز کنید. ALT + F11.
❷ سپس به Insert > ماژول برای ایجاد یک ماژول جدید.
❸ کد VBA زیر را کپی کنید:
8592
❹ جایگذاری و ذخیره کنید کد در ویرایشگر VBA.
❺ کلید F5 را فشار دهید تا کد بالا اجرا شود.
آخرین ستون را دریافت خواهید کرد. شماره در یک کادر محاوره ای بازشو مانند تصویر زیر:
بیشتر بخوانید: نحوه شمارش ستون ها تا رسیدن به مقدار در اکسل
2. از روش Range.Find برای برگرداندن آخرین شماره ستون استفاده شده در اکسل استفاده کنید
اگر به دنبال کدهای VBA برای برگرداندن آخرین شماره ستون استفاده شده هستید، مراحل زیر را دنبال کنید. :
❶ اول از همه، ALT + F11 را فشار دهید تا ویرایشگر VBA باز شود.
❷ پس از آن یک ماژول جدید از Insert > ماژول.
❸ کد VBA زیر را کپی کنید:
2809
❹ سپس به ویرایشگر VBA برگردید و CTRL + V را فشار دهید برای چسباندن آن.
❺ اکنون کد VBA را با فشار دادن دکمه CTRL + S ذخیره کنید.
اکنون، را فشار دهید کلید F5 برای اجرای کد فوق>
چیزهایی که باید به خاطر بسپارید
- برای باز کردن ویرایشگر VBA ALT + F11 را فشار دهید.
- می توانید ALT + را فشار دهید.F8 برای استفاده از کادر گفتگوی Macros .
- برای اجرای کد VBA، F5 را فشار دهید.
نتیجه گیری
به طور خلاصه، ما 2 روش برای شمارش ستون ها با داده ها با استفاده از VBA در اکسل مورد بحث قرار داده ایم. به شما پیشنهاد می شود کتاب تمرین ضمیمه این مقاله را دانلود کرده و تمامی روش ها را با آن تمرین کنید. و از پرسیدن هرگونه سوال در بخش نظرات زیر دریغ نکنید. ما سعی خواهیم کرد در اسرع وقت به تمام سوالات مربوطه پاسخ دهیم. و لطفا از وب سایت ما ExcelWIKI دیدن کنید تا بیشتر کاوش کنید.