مخفی کردن سطر های Blank در یک جدول

[a.dal65]

اساتید من یه جدول دارم که میخوام وقتی توی جدولم هر چند تا سطر خالی موند (blank بود) اونها رو مخفی کنم.
(با یه ماکرو این کارو انجام بدم)
توی انجمن سرج کردم چیزی پیدا نکردم
ولی توی گوگل بود و نتونستنم کارمو راه بندازم
کسی میتونه کمک کنه ؟
how to auto hide row - Recherche Google

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[amir_ts]

با سلام
دو تا CommandButton اضافه کنید به ترتیب داخل قسمت کد نویسی این کدها رو بنویسید.داخل یک CommandButton نام macro1 را بنویسید.

sub macro1()
range("b2").select
do while activecell.row < 100
if activecell.value = "" and activecell.offset(0,1).value = "" then
Selection.EntireRow.Hidden = True
endif
activecell.offset(1,0).select
loop
end sub 

Cells.Select
    Selection.EntireRow.Hidden = Fals 

e

[a.dal65]

ممنون امیر جان
تست کردم بدرستی کار کرد
فقط نتونستم توی فایل اصلیم (روی دکمه بررسی) پیاده کنم.

[amir_ts]

دوست عزیز دکمه بررسی رو پاک کنید و از قسمت DEVELOPER قسمت INSERT و در آخر ACTIVE X CONTOROLS یک command button اضافه کنید و داخل اون کد رو بنویسید.

[mobinsaffarpour]

سلام دوست عزیز . اگر یک محدوده خاص را در نظر دارید می توانید از فایل پیوست استفاده نمائید.

[amir_ts]

فایل پیوست شد.

[a.dal65]

سلام دوست عزیز . اگر یک محدوده خاص را در نظر دارید می توانید از فایل پیوست استفاده نمائید.

حالا اگه بخوام همین رنجی که hide شده رو با یه دکمه دیگه unhide کنم از چه دستوری استفاده کنم ؟

فایل پیوست شد.

امیر جان شما راست کلیک رو روی دو دکمه بررسی و مشاهده بستین ؟
من چطوری همین کارو بکنم ؟

[amir_ts]

با سلام
برای تغیر باید از تب developer قسمت Design mode رو بزنید تا بتونید هر تغیری بدید.

[generalsamad]

با سلام
و با اجازه دوستان

نوع دکمه ایجاد شده از نوع Active X بوده

برای اینکه بتونید روی دکمه راست کلیک کنید باید اون Design کنید
طبق شکل این قسمت رو فعال کنید

[mobinsaffarpour]

تقدیم به شما دوست عزیز