ما روشهای 3 را در Excel VBA تا انتخاب محدوده از سلول فعال<2 به شما نشان می دهیم> برای نشان دادن این موضوع، مجموعه داده ای با 3 ستون انتخاب کرده ایم: « نام »، « نام خانوادگی »، و « ایمیل ”. ما یک سلول را انتخاب می کنیم و با استفاده از Excel VBA محدوده را از آن سلول انتخاب می کنیم.

دانلود کتاب تمرین تمرین

3 روش برای انتخاب محدوده از سلول فعال با استفاده از VBA در اکسل

1. استفاده از VBA برای انتخاب محدوده از سلول فعال تا آخرین سلول غیر خالی

برای روش اول، ما از ویژگی Range.End استفاده می کنیم.

در اینجا، کد خود را به عنوان Module وارد می کنیم. برای باز کردن پنجره Module ، این موارد را انجام دهید-

مراحل:

• ابتدا، از Developer برگه >>> Visual Basic را انتخاب کنید.

پنجره Visual Basic ظاهر می شود.

• در نهایت، از درج >>> Module را انتخاب کنید.

با این کار پنجره Module ظاهر می شود.

1.1. با استفاده از ویژگی End(xlUp)

در این بخش، محدوده به بالا تا آخرین سلول غیر خالی<را انتخاب می کنیم. 2> از سلول فعال ما .

مراحل:

• ابتدا، پنجره Module را باز کنید.
• در مرحله دوم، کد زیر را تایپ کنید .

9687

ما در حال تماس با ما هستیم Sub رویه ToUp . سپس ما محدوده خود را انتخاب می کنیم. اولین مقدار سلول فعال ما است. آخرین مقدار ActiveCell.End(xlUp) است. در نهایت، ما محدوده را با روش Range انتخاب می کنیم. انتخاب .

• سوم، ذخیره و پنجره را ببندید.
• پس از آن، سلول C6 را انتخاب کنید. این سلول سلول فعال ما است.

اکنون، ما به پنجره Macro را باز کنید. برای انجام این کار-

• از برگه برنامه‌نویس >>> Macros را انتخاب کنید.

پس از آن، کادر گفتگوی Macro Macro ظاهر می شود.

• سپس، " ToUp " را از " نام ماکرو: " انتخاب کنید.
• در نهایت، روی Run<2 کلیک کنید>.

می بینیم که، محدوده سلولی C4:C6 را انتخاب کرده ایم .

بیشتر بخوانید: Excel VBA: کپی کردن محدوده پویا در یک کتاب کار دیگر

1.2. افزودن ویژگی End(xlDown)

در این بخش، محدوده رو به پایین را از سلول فعال خود انتخاب می کنیم.

مراحل:

• ابتدا، پنجره Module را باز کنید.
• ثانیا، نوع کد زیر.

6243

ما با Sub رویه ToDown تماس می گیریم. سپس ما محدوده خود را انتخاب می کنیم. اولین مقدار سلول فعال ما است. آخرین مقدار ActiveCell.End(xlDown) است. در نهایت، ما هستیمانتخاب محدوده با محدوده . روش را انتخاب کنید.

• سوم، ذخیره و پنجره را ببندید.
• پس از آن، سلول C6 را انتخاب کنید. این سلول فعال ما است .

• سپس، کادر محاوره‌ای ماکرو را باز کنید.
• « ToDown » را انتخاب کنید.
• در نهایت، روی Run کلیک کنید.

بنابراین، ما یک محدوده را از سلول فعال خود با استفاده از Excel VBA انتخاب کرده ایم.

بیشتر بخوانید: Excel VBA برای چرخش از طریق محدوده تا سلول خالی (4 مثال)

مقالات مشابه

• Excel VBA: حلقه ها از طریق ستون ها در محدوده (5 مثال)
• نحوه استفاده از VBA برای هر ردیف در یک محدوده در اکسل
• Excel Macro: مرتب سازی ستون های متعدد با دامنه پویا (4 روش)
• VBA برای حلقه زدن از میان ردیف ها و ستون ها در یک محدوده در اکسل (5 مثال)
• نحوه تبدیل محدوده به آرایه در Excel VBA (3 روش)

1.3. اعمال ویژگی End(xlToLeft)

در این بخش، محدوده را در چپ از سلول فعال خود انتخاب می کنیم. .

مراحل:

• ابتدا، پنجره Module را باز کنید.
• دوم، تایپ کنید کد زیر.

9313

ما در حال فراخوانی Sub Procedure ToLeft هستیم. سپس ما محدوده خود را انتخاب می کنیم. اولین مقدار سلول فعال ما است. آخرین مقدار است ActiveCell.End(xlToLeft) . در نهایت، ما محدوده را با محدوده انتخاب می کنیم. روش را انتخاب کنید.

• سوم، ذخیره و پنجره را ببندید.
• پس از آن، سلول D7 را انتخاب کنید. این سلول فعال ما است .

• سپس، کادر محاوره‌ای ماکرو را باز کنید.
• « ToLeft » را انتخاب کنید.
• در نهایت، روی Run کلیک کنید.

بنابراین، ما یک محدوده را از سلول فعال خود با استفاده از Excel VBA انتخاب کرده ایم.

1.4. پیاده سازی ویژگی End(xlToRight)

در این بخش، محدوده را در راست از سلول فعال خود انتخاب می کنیم. .

مراحل:

• ابتدا، پنجره Module را باز کنید.
• دوم، تایپ کنید کد زیر.

2357

ما در حال فراخوانی رویه فرعی ToRight هستیم. سپس ما محدوده خود را انتخاب می کنیم. اولین مقدار سلول فعال ما است. آخرین مقدار ActiveCell.End(xlToRight) است. در نهایت، ما محدوده را با محدوده انتخاب می کنیم. روش را انتخاب کنید.

• سوم، ذخیره و پنجره را ببندید.
• پس از آن، سلول C8 را انتخاب کنید. این سلول فعال ما است .

• سپس، کادر محاوره‌ای ماکرو را باز کنید.
• " ToRight " را انتخاب کنید.
• در نهایت، روی Run کلیک کنید.

بنابراین، ما یک محدوده را انتخاب کرده ایماز سلول فعال ما با استفاده از Excel VBA .

2. استفاده از ویژگی VBA Range.Offset برای انتخاب محدوده از سلول فعال استفاده از VBA در اکسل

برای روش دوم، ما از ویژگی VBA Range.Offset برای انتخاب محدوده با استفاده از سلول فعال خود استفاده می کنیم. .

مراحل:

• ابتدا، کد زیر را تایپ کنید در پنجره Module .

2175

ما رویه فرعی UsingOffset را ایجاد کرده ایم. سپس ما محدوده خود را انتخاب می کنیم. اولین مقدار سلول فعال ما است. آخرین مقدار ActiveCell.Offset (1,2) است. با ویژگی Offset ، 1 ردیف به پایین و 2 ستون راست حرکت می‌کنیم. در نهایت، ما محدوده را با محدوده انتخاب می کنیم. روش را انتخاب کنید.

• دوم، ذخیره و پنجره را ببندید.
• بعد از آن، سلول B8 را انتخاب کنید. این سلول فعال ما است .

• سپس، باکس محاوره ای ماکرو را باز کنید.
• " UsingOffset " را انتخاب کنید.
• در نهایت، روی Run کلیک کنید.

در پایان، ما یک محدوده را از سلول فعال انتخاب کرده ایم. علاوه بر این، مرحله نهایی باید به این صورت باشد.

بیشتر بخوانید: Excel VBA: محدوده سلول های دارای مقادیر را دریافت کنید (7 مثال ها)

3. با استفاده از ویژگی CurrentRegion، محدوده را از سلول فعال با استفاده از VBA در اکسل انتخاب کنید.

برای روش آخر، از ویژگی Range.CurrentRegion استفاده خواهیم کرد.

مراحل:

• ابتدا، کد زیر را تایپ کنید در پنجره Module .

7899

ما در حال فراخوانی Sub روش خود هستیم cRegion . سپس ما محدوده خود را انتخاب می کنیم. با ویژگی CurrentRegion ، ما محدوده تا یک سلول خالی را انتخاب می کنیم. در نهایت، ما محدوده را با محدوده انتخاب می کنیم. روش را انتخاب کنید.

• ثانیاً، آن را ذخیره کنید و به صفحه Excel برگردید.
• پس از آن، سلول C10 را انتخاب کنید. این سلول فعال ما است .

• سپس، کادر محاوره‌ای ماکرو را باز کنید.
• cRegion را انتخاب کنید.
• در نهایت، روی Run کلیک کنید.

بنابراین، محدوده را تا یک سلول خالی انتخاب کرده ایم .

بخش تمرین

ما مجموعه داده های تمرینی را برای هر روش در فایل Excel ارائه کرده ایم.

نتیجه

ما" 3 روشهای Excel VBA محدوده را از سلول فعال انتخاب کنید. اگر در درک مراحل با مشکلی مواجه شدید، در زیر نظر دهید. از خواندن متشکریم، به عالی بودن ادامه دهید!