جستجو

ترفندهای کامپیوتری

حضرت علی (ع): «زَکوةُ العِلمِ نَشرُهُ؛ زکات علم نشر آن است».
وبلاگ "ترفندها" (سایت پی‌سی‌ترفند) برای عمل به این حدیث شریف و با هدف ارتقاء دانش و مهارت‌های مرتبط با رایانه در ۳۰ مهرماه ۱۳۹۱ ایجاد شده است. به امید آنکه مفید واقع شود.
🔵 کانال‌های پی‌سی‌ترفند در تلگرام و سروش:
telegram.me/pctarfand_ir
sapp.ir/pctarfand_ir

خلاصه آمار

تبليغات

۶

انتخاب یا حذف یک یا چند در میان ردیف‌ها در اکسل - ماکرو

اکسل ماکرونویسی

انتخاب یا حذف یک یا چند در میان ردیف‌ها در اکسل - ماکرو

هنگامی‌که در یک فایل اکسل بخواهیم ردیف‌ها را بصورت یک یا چند در میان انتخاب کنیم می‌توان اینکار را به صورت دستی انجام داد، اما اگر صدها ردیف داشته باشیم، این روش انتخاب خوبی نیست. در ادامه با پی‌سی‌ترفند همراه باشید تا با چند ترفند برای اینکار آشنا شوید.

روش اول: استفاده از ابزار فیلتر

بطور نمونه اگر بخواهید یک در میان ردیف ها را انتخاب کنید برای اینکار در ستون مجاور داده‌ها، اعداد 0 و 1 را وارد کنید. در مثال زیر این اعداد در ستون C وارد شده است.

ستون C را انتخاب کرده و از تب Data روی گزینه Filter کلیک کنید. سپس روی علامت فلش کنار سلول C1 کلیک کرده و یکی از گزینه‌های 0 یا 1 (مثلا 0) را انتخاب کنید.

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

حال اگر بخواهید ردیف‌هایی که درون سلول آن‌ها عدد 0 است را حذف کنید کافیست ردیف‌های فوق را انتخاب کرده و از تب Home قسمت Delete روی گزینه Delete sheet rows کلیک کنید. با اینکار این ردیف‌ها حذف می‌شوند و مطابق شکل زیر ردیف‌هایی که درون آن عدد 1 قرار دارد ظاهر می‌شود. اکنون می‌توانید ستون کمکی C را حذف کنید.

 


روش دوم: با استفاده از فرمول

مثال زیر را در نظر بگیرید. می‌خواهیم ردیف‌ها را به صورت 5 در میان انتخاب کنیم.

برای اینکار می‌توان از تابع OFFSET استفاده کرد. در مثال فوق فرمول زیر را در سلول F1 وارد کنید تا سلول مورد نظرتان اعمال کنید. با اینکار مطابق شکل زیر محتویات هر 5 ردیف در میان از ستون C در ستون F قرار می گیرد.

=OFFSET($C$1,(ROW()-1)*5,0)

در فرمول فوق، C1 سلول اول ستونی است که می‌خواهید اطلاعات آن را استخراج کنید. عدد 5 فاصله بین ردیف‌ها است.


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

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

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

Sub EveryOtherRow()
'pctarfand.ir & tarfandha.blog.ir'
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox("Enter row interval", xTitleId, Type:=1)
For i = 1 To InputRng.Rows.Count Step xInterval + 1
    Set rng = InputRng.Cells(i, 1)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireRow.Select
End Sub

روی دکمه  کلیک کنید یا کلید F5 را فشار دهید. با انجام اینکار پنجره زیر ظاهر می‌شود. سپس محدوده مدنظرتان را انتخاب کرده و روی دکمه ok کلیک کنید.

سپس در پنجره بعد عدد مورد نظرتان را وارد کنید. مثلا 3 برای انتخاب 3 ردیف در میان.

پس از کلیک روی دکمه ok، ردیف‌ها به صورت 3 در میان انتخاب می‌شوند که می‌توانید از آن‌ها کپی بگیرید.

 

منبع: سایت extendoffice.com (لینک لینک 2 و لینک 3)

عضویت در خبرنامه:

برای مطلع شدن از جدیدترین مطالب سایت، کانال‌های پی‌سی‌ترفند در تلگرام و سروش را با آی‌دی pctarfand_ir@ دنبال کنید:

          

سوالات خود در زمینه ورد و اکسل و ... را می‌توانید از طریق ایمیل و پیام‌رسان سروش با ما مطرح کنید.

آدرس ایمیل: tarfandha.blog@gmail.com

آی‌دی سروش: pctarfand_info@

گروه سروش:

نظرات (۶)

  1. بخش‌هایی از این نظر که با * مشخص شده، توسط مدیر سایت حذف شده است
    استفاده از ابزار فیلتر بسیار عالی بود.
    **** **** ***** ****
  2. سلام یه سری نقاط نقشه برداری دارم که درسه ردیف xyz قراردارن وبعضی ازردیف ها z بدون مقداره یا ازمقدار ماخارج است میخوام که ردیف های که تکمیل نیستندحذف بشوند. (اعدادz بین 740 تا 780 می باشد) تشکر.ممنون
    • پاسخ:

      سلام
      لطفا یک نمونه داده برای بنده ارسال کنید تا بررسی شود.
  3. مجله اینترنتی چفچفک سایت تفریحی چفچفک

    اولش خوب شد از روی فایلم یه کپی زدم جون درست انجام ندادم ممنون  بابت وبلاگ خوبتان.....

ارسال نظر

قبل از ارسال نظر به نکات زیر توجه کنید:

۱- با توجه با اینکه نظرات خصوصی شما امکان نمایش در سایت را ندارد، بنابراین هنگام ارسال نظر، گزینه "" را انتخاب نکنید. چون تنها راه پاسخگویی به آن از طریق ایمیل شما است که با توجه به مشغله کاری فرصت ارسال پاسخ از طریق ایمیل وجود ندارد.

۲- قبل از مطرح کردن سوالتان، مطلب فوق را با دقت مطالعه کنید. اگر پاسخ سوالتان را پیدا نکردید در سایت جستجو کنید، ممکن است در مطلب دیگر پاسخ سوالتان را پیدا کنید.

۳- تنها به سوالاتی پاسخ داده می‌شود که از نحوه حل آن‌ها اطلاع داشته باشم.

۴- نظراتی با مضمون زیر، صرفا تایید و نمایش داده می‌شود و به آن‌ها پاسخی داده نمی‌شود.

الف) در مورد پاسخ سوال شما اطلاعی نداشته باشم،

ب) پاسخ سوال شما در مطلب فوق وجود داشته باشد.

ارسال نظر آزاد است، اما اگر قبلا در بیان ثبت نام کرده اید می توانید ابتدا وارد شوید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی