فهرست مطالب
ما میتوانیم شماره ردیفها را در اکسل با روشهای مختلف پیدا کنیم، اما VBA ویژگیها و سفارشیسازیهای بیشتری را ارائه میدهد. که به وسیله آن می توانیم اعداد ردیف را به روش های هوشمندانه پیدا کنیم. امروز این مقاله قرار است 4 ماکرو مفید برای یافتن شماره ردیف در اکسل با استفاده از VBA را نشان دهد.
دانلود کتاب تمرین تمرین
می توانید کتاب کار رایگان اکسل را از اینجا دانلود کنید و به طور مستقل تمرین کنید.
یافتن شماره ردیف با استفاده از VBA.xlsm
4 ماکرو برای یافتن شماره ردیف با استفاده از VBA در اکسل
با مجموعه داده ما آشنا شوید که از آن برای کشف روش هایی استفاده می کنیم که فروش برخی از فروشندگان را در مناطق مختلف نشان می دهد.
ماکرو 1: VBA برای یافتن شماره ردیف با تغییر انتخاب
ابتدا، ما از یک ماکرو در اکسل VBA برای یافتن شماره ردیف با انتخاب هر سلول استفاده می کنیم. این بدان معنی است که اگر فقط هر سلول استفاده شده را انتخاب کنید، ماکرو شماره ردیف را فوراً نشان می دهد. برای این کار، باید کدها را در یک برگه نگه دارید ، نه در ماژول.
مراحل:
- راست- روی عنوان برگه کلیک کنید و مشاهده کد را از منوی زمینه انتخاب کنید.
- سپس بنویسید کدهای زیر-
2944
- بعداً، نیازی به اجرای کدها نیست، فقط به برگه خود بازگردید.
تجزیه کد:
- ابتدا، من یک رویه زیر خصوصی ایجاد کردم - Worksheet_SelectionChange .
- سپس یک متغیر Rnumber را به عنوان اعلام کرد عدد صحیح .
- ردیف شماره ردیف سلول فعال را تعیین می کند.
- بعد، عبارت If بررسی می شود سلول فعال خالی باشد یا نباشد، و سپس MsgBox خروجی را نشان می دهد.
- اکنون فقط روی هر سلول استفاده شده کلیک کنید و ردیف را به شما نشان می دهد. شماره.
بیشتر بخوانید: Excel VBA: رشته را در ستون پیدا کنید و شماره ردیف را برگردانید
Macro 2: پیدا کردن شماره ردیف یک سلول فعال با استفاده از VBA
این ماکرو شماره ردیف یک سلول فعال را در یک سلول مشخص از صفحه ما برمی گرداند. بنابراین، ما باید نام کاربرگ و سلول خروجی را در کدهای خود ذکر کنیم. در اینجا، ما از Cell D14 به عنوان سلول خروجی خود استفاده خواهیم کرد.
مراحل:
- ALT + F11<را فشار دهید. 2> برای باز کردن پنجره VBA .
- بعد، برای درج یک ماژول جدید به صورت زیر کلیک کنید: Insert > ماژول .
- بعد از آن کدهای زیر را در ماژول تایپ کنید-
2072
- سپس به برگه خود برگردید.
تجزیه کد:
- اینجا ، Find_Row_Number_of_an_Active_Cell() Sub
- wSheet به عنوان Worksheet
- اعلان می شود سپس عبارت Set سلول فعال را انتخاب می کند
- Range شماره ردیف را در سلول خروجی برمی گرداند.
- اکنون یک سلول را انتخاب کنید و به صورت زیر کلیک کنید: Developer >ماکرو .
- پس از ظاهر شدن در کادر محاوره ای Macro ، فقط نام ماکرو را انتخاب کرده و را فشار دهید. اجرا کنید .
به زودی، خواهید دید که شماره ردیف سلول انتخاب شده در سلول خروجی ما برگردانده می شود.
می توانید ببینید که سلول B8 انتخاب شده است، بنابراین خروجی 8 است.
بیشتر بخوانید: نحوه بدست آوردن شماره ردیف سلول فعلی در اکسل (4 روش سریع)
خواندنهای مشابه
- نحوه افزایش شماره ردیف در فرمول اکسل (6 روش مفید)
- دریافت شماره ردیف از محدوده با Excel VBA (9 مثال)
- نحوه برگرداندن شماره ردیف یک تطبیق سلول در اکسل (7 روش)
- نحوه دریافت شماره ردیف از مقدار سلول در اکسل (5 روش)
ماکرو 3: VBA برای یافتن شماره ردیف با تطبیق یک مقدار
اگر می خواهید شماره ردیف را با جستجوی یک مقدار پیدا کنید، این ماکرو برای شما مناسب است. همانطور که در تصویر زیر نشان داده شده است باید مقدار جستجو و شماره ستون را در کدها ذکر کنید.
مراحل:
- اولین را دنبال کنید. دو مرحله از روش قبلی برای درج یک ماژول جدید.
- سپس کدهای زیر را در آن وارد کنید-
3810
- بعد از آن، به صفحه خود بازگردید. برگه.
تجزیه کد:
- در اینجا، Find_Row_Matching_a_Value() است Sub
- و wBook و wSheet به عنوان Worksheet و fCell به عنوان Range اعلام می شود.
- wBook و wSheet تنظیم شده اند برای ActiveWorkbook و ActiveSheet .
- Const ورودی مقدار جستجو را می گیرد.
- بعداً، Range مقدار را از طریق ستون ذکر شده جستجو می کند.
- بعد، عبارت If و Else نتیجه را با استفاده از MsgBox نشان می دهد.
- بعد، مرحله 5 را از روش قبلی دنبال کنید تا کادر گفتگوی Macro باز شود.
- گزینه <را انتخاب کنید. 1>نام ماکرو و فقط Run را فشار دهید.
به زودی یک کادر اعلان شماره ردیف را به شما نشان می دهد.
بیشتر بخوانید: Excel VBA: تعداد ردیف برگرداندن مقدار (5 روش مناسب)
ماکرو 4: دکمه یافتن شماره ردیف
در روش آخر خود، هوشمندانه ترین روش را برای تعیین شماره ردیف با استفاده از VBA ماکروها به شما نشان می دهیم. ما یک دکمه می سازیم و یک ماکرو با آن اختصاص می دهیم. وقتی روی دکمه کلیک میکنیم، یک کادر ورودی باز میشود که میتوانیم مقدار جستجویی را که برای آن شماره ردیف میخواهیم به ورودی بدهیم. ماکرو قبلی میتواند در ستون ذکر شده جستجو کند، اما این ماکرو میتواند هر ستونی را در هر نقطه از برگه جستجو کند.
مراحل:
- دوباره دو مرحله اول از روش دوم را برای درج یک ماژول جدید دنبال کنید.
- بعد کدهای زیر را در آن وارد کنید-
4258
- سپس به شمابرگه.
تجزیه کد:
- ابتدا، من یک <رویه 1>Sub Find_Row_Number().
- سپس دو متغیر mValue را به عنوان String و row را به عنوان Range اعلام کرد. .
- سپس از InputBox برای درج مقدار استفاده کرد.
- بعداً، عبارت Set و If اگر خالی نباشد، شماره ردیف را پیدا می کند.
- در نهایت، MsgBox خروجی را نشان می دهد.
- بعد، را کلیک کنید توسعه دهنده > وارد کنید و سپس دستور Button را از قسمت Form Controls انتخاب کنید.
- سپس شما یک علامت بعلاوه با مکان نما دریافت خواهید کرد، با کلیک بر روی برگه خود مطابق با اندازه دلخواه خود به هر نقطه ای بکشید و سپس کلیک را رها کنید.
- پس از رها کردن ماوس، کادر محاوره ای Assign Macro به طور خودکار باز می شود.
- نام ماکرو را همانطور که در کدها ذکر شده انتخاب کنید.
- سپس فقط OK را فشار دهید.
- بعدی، روی دکمه راست کلیک کرده و Edit Text را انتخاب کنید برای ویرایش نام دکمه.
- نام دکمه را تایپ کنید، سپس روی هر نقطه خارج از دکمه کلیک کنید و نام تغییر خواهد کرد.
- اکنون روی دکمه کلیک کنید، کادر ورودی باز می شود.
- در نهایت، فقط مقدار جستجو را وارد کنید و را فشار دهید. OK .
اکنون نگاهی بیندازید، شماره ردیف منطبق را نشان می دهدارزش.
بیشتر بخوانید: یافتن رشته در ستون و برگرداندن شماره ردیف در اکسل (7 روش)
نتیجه گیری
این همه برای مقاله است. امیدوارم رویه هایی که در بالا توضیح داده شد برای یافتن شماره ردیف در اکسل با استفاده از VBA به اندازه کافی خوب باشند. هر گونه سوالی را در بخش نظرات بپرسید و لطفا نظرات خود را به من بدهید. برای کاوش بیشتر به ExcelWIKI مراجعه کنید.