جستجو

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

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

خلاصه آمار

تبليغات

پربحث ترين ها

۱

جستجو و جایگزینی گروهی کلمات در اکسل

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

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

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

واژه‌های اصلی و جایگزین را در جدول زیر مشاهده می‌کنید.

 

برای جستجو و جایگزینی گروهی کلمات در اکسل، ۳ روش وجود دارد:

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

  

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

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

Sub MultiFindNReplace()
'pctarfnad.ir & tarfandha.blog.ir
Dim Rng As Range
Dim InputRng As Range, ReplaceRng As Range
xTitleId = "Multiple-Replacement"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Neveshtehaye Avaliye", xTitleId, InputRng.Address, Type:=8)
Set ReplaceRng = Application.InputBox("Mahdudeye Jaygozini", xTitleId, Type:=8)
Application.ScreenUpdating = False
For Each Rng In ReplaceRng.Columns(1).Cells
    InputRng.Replace what:=Rng.Value, replacement:=Rng.Offset(0, 1).Value
Next
Application.ScreenUpdating = True
End Sub

سپس روی دکمه doc-multiply-calculation-3 کلیک کنید یا کلید F5 را فشار دهید تا پنجره‌ی زیر ظاهر شود.

ناحیه نوشته‌های اولیه (در مثال فوق A1:A13) را انتخاب کنید و روی دکمه Ok کلیک کنید.

پس از کلیک روی OK، باید محدوده‌ی جایگزینی (دو ستون واژه اصلی و واژه جایگزین) را انتخاب کنید.

 

پس از کلیک روی OK، نتیجه زیر حاصل می‌شود:


منابع: resources.hort.ir

extendoffice.com


روش دوم) با استفاده از افزونه‌ی ASAP Utilities در اکسل: پس از دانلود و نصب این Add-in، تب جدیدی با عنوان ASAP Utilities به اکسل اضافه می‌شود.

مراحل استفاده از قابلیت جستجو و جایگزینی گروهی در این افزونه در اینجا توضیح داده شده است.


روش سوم) نصب نرم‌افزار جانبی

۱- نرم‌افزار Excel Search & Replace Batch

این نرم‌افزار را می‌توانید از سایت سازنده آن دانلود کنید.

 

۲- نرم‌افزار Excel Find and Replace Professional

این نرم‌افزار را می‌توانید از سایت سازنده آن دانلود کنید.

 

۳- نرم‌افزار Find and Replace Tool For Excel

این نرم‌افزار را می‌توانید از سایت سازنده آن دانلود کنید.

 

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

نظرات (۱)

ارسال نظر

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

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

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

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

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

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

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

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