هدف آموزش هدف آموزش
کدنویسی حذف سطرهای خالی با استفاده از VBA اکسل
بسیاری از موارد پیش می آید که شما پروژه ای را با نرم افزار اکسل پیاده سازی کرده اید و در آن تعدادی از سطرهای میان سطرهای دیگر را حذف کرده اید. حال می خواهید این سطرها را حذف کنید و هیچ فضای اضافه ای میان داده های شما وجود نداشته باشد.
ساده ترین راه این است که یکی یکی سطرهای خالی را انتخاب و با زدن Delete از ابزارهای اکسل ، آنها را حذف نمایید. اما ما میخواهیم به یکباره و با نوشتن یک ماژول و برنامه نویسی در VBA اکسل این کار را انجام دهیم . دقت کنید که در ابتدای حذف سطرهای خالی با استفاده از VBA اکسل بایستی آخرین سطر پر را بدست آوریم. سپس با استفاده از یک شمارنده از اولین سطر شروع می کنیم و مقایسه را انجام می دهیم. اگر اولین سطر خالی نبود یکی به شمارنده خود اضافه می کنیم و اگر خالی بود ابتدا سطر مورد نظر را انتخاب و سپس آن را حذف می کنیم .
حال همه سطرهای زیرین را یکی به سمت بالا حرکت می کنندو جایگزین سطر حذف شده می شوند.
آموزش کامل را می توانید در ویدئوی زیر به صورت کامل مشاهده نمایید.
پیشنهاد می کنیم از آموزش زیر نیز دیدن نمایید. با مشاهده آموزش زیر قادر خواهید بود به صورت اصولی و استاندارد شیوه کدنویسی و برنامه نویسی در اکسل را بیاموزید:
