طریقه حذف سلول‌های خالی و جایگزینی سلول‌های خالی با یک کاراکتر مشخص در اکسل

قبلا در این مطلب با توابع شمارش سلول‌های خالی در اکسل آشنا شدید. در این بخش با نحوه حذف سلول‌های خالی و یا جایگزینی سلول‌های خالی با یک کاراکتر مشخص در اکسل آشنا شوید.

حذف سلول‌های خالی در اکسل:

در صورتی‌که در حال کاربر روی یک فایل اکسل شامل سطرها و ستون‌های زیاد هستید، ممکن است نیازمند این شوید تا کلیه‌ی سلول‌های خالی موجود در فایل اکسل خود را شناسایی کرده و حذف کنید. این کار در اکسل به سادگی امکان‌پذیر است. بدین منظور:
۱- ابتدا محدوده‌ای که قصد دارید سلول‌های خالی آن حذف شود را به حالت انتخاب دربیاورید.
۲- اکنون کلید F5 را فشار دهید تا پنجره Go To نمایان شود.
۳- سپس بر روی دکمه Special کلیک کنید. در پنجره باز شده گزینه Blanks را انتخاب کرده و بر روی دکمه OK کلیک کنید. خواهید دید که با این کار تمامی سلو‌ل‌های خالی به حالت انتخاب درمی‌آیند.

۴- در پایان برای حذف این سلول‌های خالی کافی است در تب Home، در قسمت Cells بر روی گزینه Delete کلیک کنید.

منبع با تغییر: tarfandestan.com

جایگزینی سلول‌های خالی با یک کاراکتر مشخص

روش اول) مشابه آموزش بالا یعنی حذف سلول‌های خالی در اکسل مراحل را تا مرحله ۳ انجام دهید. پس از اینکه تمام سلو‌ل‌های خالی به حالت انتخاب درآمدند هیچ کاری نکنید فقط کاراکتر موردنظرتان را تایپ کنید مثلا ۰ یا Null.

پس از تایپ، کلیدهای Ctrl + Enter را همزمان فشار دهید. مشاهده خواهید کرد که تمام سلول‌های خالی با کاراکتری که تایپ کردید پر خواهد شد.

روش دوم) با استفاده از کد ماکرو

ابتدا محدوده‌ای که می‌خواهید سلول‌های خالی را با یک کاراکتر مشخص جایگزین کنید انتخاب کنید. سپس کلیدهای Alt + F11 را فشار دهید یا از تب Developer قسمت code گزینه Visual Basic را انتخاب کنید. پنجره Microsoft Visual Basic ظاهر می‌شود. در این پنجره از تب Insert گزینه Module را انتخاب نمائید.

در پنجره جدید باز شده کدهای زیر را کپی کنید.

SubSwapTwoRange()
'pctarfand.ir & tarfandha.blog.ir
DimRng1AsRange,Rng2AsRange
Dimarr1AsVariant,arr2AsVariant
xTitleId="SwapTwoRange"
SetRng1=Application.Selection
SetRng1=Application.InputBox("Range1:",xTitleId,Rng1.Address,Type:=8)
SetRng2=Application.InputBox("Range2:",xTitleId,Type:=8)
Application.ScreenUpdating=False
arr1=Rng1.Value
arr2=Rng2.Value
Rng1.Value=arr2
Rng2.Value=arr1
Application.ScreenUpdating=True
EndSub

پس از وارد کردن کدهای بالا دکمه یا کلید F5 را فشار دهید. پنجره جدیدی ظاهر می‌شود. در مکان مشخص شده کاراکتر مورد نظرتان را تایپ کنید مثلا empty،

در پایان روی دکمه Ok کلیک کنید تا عملیات جایگزینی انجام شود.

روش سوم) با استفاده از افزونه Kutools for Excel:

افزونه Kutools for Excel را از اینجا دانلود کنید و پس از نصب با استفاده از راهنمای گفته شده در سایت نرم‌افزار عملیات جایگزینی را انجام دهید.

منبع: extendoffice.com