Excel VBA برای ایجاد جدول از محدوده (6 مثال)

  • این را به اشتراک بگذارید
Hugh West

در حین کار با Microsoft Excel ، ممکن است از بررسی مقادیر زیادی داده استفاده کنیم. و تبدیل این محدوده داده ها به یک جدول یکی از بهترین گزینه ها است. جداول اکسل به ما این امکان را می دهند که به سرعت داده ها را مرتب و فیلتر کنیم، رکوردهای جدید اضافه کنیم و فورا نمودارها و PivotTables را به روز کنیم. و Excel VBA به کاربر کمک می کند تا برنامه را فقط با چند کد ساده سفارشی کند. در این مقاله چند نمونه از Excel VBA برای ایجاد جدول از محدوده را مشاهده خواهیم کرد.

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

می توانید دانلود کنید کتاب کار و تمرین با آنها.

ایجاد جدول از Range.xlsm

6 نمونه از Excel VBA برای ایجاد جدول از محدوده

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

فرض کنید، ما یک مجموعه داده ساده داریم که شامل برخی موارد در ستون B ، مقدار آن اقلام در ستون C ، و کل فروش برای هر مورد در ستون D . اکنون می خواهیم محدوده داده ها را به یک جدول تبدیل کنیم. بیایید مثال های مختلف و دستورالعمل های گام به گام را برای ایجاد جدول از محدوده B4:D9 با Excel VBA نشان دهیم.

استفاده از ListObjects .Add برای تبدیل aدر جدول اکسل قرار گیرد. شیء صفحه گسترده دارای یک مشخصه ListObjects است. ListObjects تکنیکی به نام Add دارد. معیارهای .Add به شرح زیر است.

expression .Add(SourceType, Source, LinkSource, HasHeaders,Destination)

و از SourceType xlSrcRange<استفاده کنید. 2>.

1. Excel VBA برای ایجاد جدول از محدوده

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

STEPS:

  • ابتدا، از نوار به تب Developer بروید.
  • ثانیاً، از دسته Code ، روی Visual Basic کلیک کنید تا باز شود. ویرایشگر ویژوال بیسیک . یا Alt + F11 را فشار دهید تا ویژوال بیسیک ویرایشگر باز شود.
  • به جای انجام این کار، می توانید فقط روی کاربرگ خود کلیک راست کرده و به بروید. مشاهده کد . همچنین شما را به ویژوال بیسیک ویرایشگر می برد.

  • این در ویژوال بیسیک ویرایشگر <2 ظاهر می شود>جایی که ما کدهای خود را برای ایجاد جدول از محدوده می نویسیم.
  • ثالثاً، روی Module از نوار منوی کشویی Insert کلیک کنید.

  • این یک ماژول در کتاب کار شما ایجاد می کند.
  • و، VBA را کپی و جایگذاری کنید. کد نشان داده شده در زیر یا فشار دادن صفحه کلیدمیانبر F5 .

شما نیازی به تغییر کد ندارید. تنها کاری که می توانید انجام دهید این است که محدوده را مطابق با نیاز خود تغییر دهید.

  • و در نهایت، با دنبال کردن مراحل، جدولی از محدوده B4:D9 ایجاد می شود.

شرح کد VBA

7012

Sub بخشی از کد است که برای مدیریت کار در کد استفاده می شود اما هیچ مقداری را بر نمی گرداند. به عنوان روش فرعی نیز شناخته می شود. بنابراین رویه خود را Create_Table() می نامیم.

9611

این خط کد اصلی است که محدوده با آن به عنوان جدول تبدیل می شود. همانطور که قبلاً می دانیم که ListObjects.Add برای تبدیل یک محدوده به جدول اکسل. و ما از xlSrcRange به عنوان نوع منبع استفاده می کنیم. همچنین، ما محدوده خود را محدوده ("B4:D9") اعلام می کنیم. و در نهایت، جدول ما را به عنوان Table1 نامگذاری کنید.

4770

این روند به پایان می رسد.

بیشتر بخوانید: نحوه به روز رسانی Pivot محدوده جدول (5 روش مناسب)

2. ساخت جدول از محدوده با استفاده از Excel VBA

بیایید مثال دیگری برای ساخت جدول از محدوده با استفاده از Excel VBA ببینیم.

STEPS:

  • ابتدا، از نوار به تب Develope r بروید.
  • دوم، روی Visual Basic کلیک کنید تا Visual Basic Editor<2 باز شود>.
  • یک راه دیگر برای باز کردن ویژوال بیسیک ویرایشگر به سادگی فشار دادن Alt + F11 است.
  • یا روی برگه کلیک راست کنید. را انتخاب کنید، سپس View Code را انتخاب کنید.
  • بعد، به Insert بروید و Module را از منوی کشویی انتخاب کنید.
  • و، با این کار پنجره visual basic باز می شود.
  • پس از آن، کد VBA را کپی و جایگذاری کنید. در زیر.

کد VBA:

2456
  • به علاوه، کلید F5 را فشار دهید یا بر روی <کلیک کنید 1>دکمه Sub را برای اجرای کد اجرا کنید.

  • و نتیجه را همانطور که در روش 1 نشان داده شده است دریافت خواهید کرد. 2>.

شرح کد VBA

Sub Create_Table3() Dim r As Range Dim wsht As Worksheet Dim tb3 As ListObject Set r = Selection.CurrentRegion Set wsht = ActiveSheet Set tb3 = wsht.ListObjects.Add(SourceType:=xlSrcRange, Source:=r, XlListObjecthasheaders:=x1Yes) End Sub

عبارت DIM در VBA به " اعلان، " اشاره دارد و باید برای اعلام یک متغیر استفاده شود. بنابراین، ما محدوده خود را به tb2 و کاربرگ را به ws اعلام می کنیم.

5700

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

2687

با این خط کد، جدول را از محدوده ایجاد می کنیم و نام جدول خود را Table2 می گذاریم.

بیشتر بخوانید: نحوه استفاده از جدول اکسل با VBA (9 روش ممکن)

3. ایجاد جدول از محدوده با VBA در اکسل

بیایید نمونه دیگری از استفاده از Excel VBA برای ایجاد جدول از یک محدوده را بررسی کنیم.

STEPS:

  • برای شروع، کل محدوده ای را که می خواهید به جدول تبدیل کنید، انتخاب کنید.
  • ثانیا، روی برگه Developer در نوار کلیک کنید.
  • سوم، Visual Basic Editor را با کلیک بر روی Visual راه اندازی کنید.Basic .
  • از طرف دیگر، می توانید با فشار دادن Alt + F11 به Visual Basic Editor دسترسی پیدا کنید.
  • یا، راست -روی برگه کلیک کنید و View Code را از منو انتخاب کنید.
  • بعد، Module را از کادر کشویی در زیر Insert انتخاب کنید. .
  • و پنجره visual basic ظاهر می شود.
  • کد را در آنجا بنویسید.

کد VBA:

9289
  • در نهایت، کلید F5 را فشار دهید تا کد اجرا شود.

  • و این کار ایجاد می کند جدولی از محدوده داده همانطور که در روش 1 دریافت کردیم.

بیشتر بخوانید: نحوه ایجاد جدول در اکسل (با سفارشی سازی) )

خوانشهای مشابه

  • مجموع فیلد محاسبه شده تقسیم بر تعداد در جدول محوری
  • چگونه توزیع فرکانس نسبی را در اکسل نشان دهیم
  • گروه جدول محوری اکسل بر حسب هفته (3 مثال مناسب)
  • [اصلاح] نمی توان تاریخ ها را گروه بندی کرد در Pivot Table: 4 راه حل ممکن
  • نحوه ایجاد یک جدول استهلاک در اکسل (4 روش) <1 3>

4. از VBA برای ایجاد جدول پویا از محدوده استفاده کنید

بیایید نگاهی به راه دیگری برای تولید جدول از یک محدوده با استفاده از Excel VBA بیندازیم.

STEPS:

  • برای شروع، نوار را باز کنید و گزینه Developer را انتخاب کنید.
  • سپس، برای دسترسی به Visual Basic Editor ، روی <کلیک کنید. 1>Visual Basic .
  • فشردن Alt + F11 نیز Visual Basic ظاهر می شودویرایشگر .
  • از طرف دیگر، روی برگه راست کلیک کنید و مشاهده کد را از منوی ظاهر شده انتخاب کنید.
  • اکنون، از گزینه کشویی Insert ، Module را انتخاب کنید.
  • سپس کد VBA را کپی و جایگذاری کنید.

کد VBA:

6292
  • کد را با فشار دادن کلید F5 اجرا کنید.

  • همانطور که در تصویر روش 1 نشان داده شده است، جدول از محدوده ساخته می شود.

VBA توضیح کد

3551

این خط نام فرآیند فرعی را نشان می دهد.

6258

این دو خط برای اعلان متغیر استفاده می شود.

4022

With بیانیه به شما امکان می دهد دنباله ای از عبارات را بر روی یک شیء واحد بدون نیاز به صلاحیت مجدد نام شیء ایجاد کنید. بنابراین، ما With گزاره را با نام برگه قرار می دهیم.

3970

اینها به ترتیب برای یافتن آخرین سطر و آخرین ستون هستند.

8856

محدوده برای ایجاد جدول.

6096

یک جدول در محدوده مشخص شده بالا ایجاد کنید.

4563

تعیین نام جدول

8471

مشخص کردن سبک جدول.

بیشتر بخوانید: ایجاد جدول در اکسل با استفاده از میانبر (8 روش)

5. جدول پویا را از محدوده بسازید

اکنون، به روش دیگر Excel VBA برای ایجاد جدول از یک محدوده نگاهی بیندازید.

STEPS:

  • برای شروع، نوار را باز کنید و Developer را از منوی کشویی انتخاب کنید.
  • سپس Visual Basic را انتخاب کنید تا باز شود ویرایشگر ویژوال بیسیک .
  • ویرایشگر ویژوال بیسیک همچنین با فشار دادن Alt + F11 قابل دسترسی است.
  • به عنوان جایگزین می توانید راست کلیک کنید برگه و View Code را از منوی باز شده انتخاب کنید.
  • پس از آن، Module را از <انتخاب کنید. 1> منوی کشویی را وارد کنید.
  • سپس کد VBA زیر را کپی و جایگذاری کنید.

کد VBA:

8735
  • در نهایت، کد را با فشار دادن F5 روی صفحه کلید خود اجرا کنید و نتیجه را در کاربرگ خود مشاهده کنید.

  • و همانطور که در تصویر روش 1 نشان داده شده است، جدول از محدوده ساخته می شود.

بیشتر بخوانید: چگونه جداول اکسل را خوب جلوه دهید (8 نکته موثر)

6. از Excel VBA برای ساخت جدول پویا استفاده کنید

بیایید یک روش دیگر Excel VBA برای ساخت جدول از یک محدوده را بررسی کنیم.

STEPS:

  • در ابتدا، به برگه Developer > Visual Basic > Insert > Module بروید.
  • یا، با کلیک راست روی کاربرگ، پنجره ای باز می شود. از آنجا به View Code بروید.
  • و، این شما را به قسمت Visual Basic Editor می برد، جایی که می توانیم VBA Macro بنویسیم.
  • از سوی دیگر، فشار دادن Alt + F11 Visual Basic Editor را نیز باز می کند.
  • پس از آن، کد VBA را تایپ کنید. .

کد VBA:

6342
  • و کد را اجرا کنید تا نتیجه را ببینیدبا فشار دادن کلید F5 .

  • و جدول از محدوده همانطور که در تصویر <1 نشان داده شده است ایجاد می شود>روش 1 .

بیشتر بخوانید: نحوه ایجاد جدول در اکسل با داده (5 روش)

نتیجه گیری

روش های بالا به شما کمک می کند تا یک جدول از محدوده در اکسل ایجاد کنید. امید است که این بتواند به شما کمک کند! در صورت داشتن هرگونه سوال، پیشنهاد یا بازخورد لطفاً در قسمت نظرات با ما در میان بگذارید. یا می توانید نگاهی به مقالات دیگر ما در وبلاگ ExcelWIKI.com بیندازید!

هیو وست یک مربی و تحلیلگر اکسل بسیار با تجربه با بیش از 10 سال تجربه در این صنعت است. وی دارای مدرک لیسانس در رشته حسابداری و امور مالی و مدرک کارشناسی ارشد در رشته مدیریت بازرگانی است. هیو علاقه زیادی به تدریس دارد و یک رویکرد آموزشی منحصر به فرد ایجاد کرده است که به راحتی قابل پیگیری و درک است. دانش تخصصی او از اکسل به هزاران دانش آموز و متخصص در سراسر جهان کمک کرده تا مهارت های خود را بهبود بخشند و در حرفه خود برتری پیدا کنند. هیو از طریق وبلاگ خود دانش خود را با جهان به اشتراک می گذارد و آموزش های رایگان اکسل و آموزش آنلاین ارائه می دهد تا به افراد و مشاغل کمک کند تا به پتانسیل کامل خود دست یابند.