کار با Worksheet در ماکرونویسی اکسل

امتیاز 5.00 ( 1 رای )

کار با Worksheet در ماکرونویسی اکسل

کار با Worksheet در ماکرونویسی اکسل

به نام خداوند بخشنده و مهربان، در این پست آموزشی قصد داریم به چندین متد و دستور پرکاربرد ماکرونویسی در خصوص کار با صفحات اکسل (Worksheets) خدمت شما عزیزان و علاقه مندان به یادگیری برنامه نویسی در اکسل، عرض کنیم.

نحوه ایجاد Worksheet جدید توسط ماکرونویسی در اکسل

به منظور اضافه کردن Worksheet جدید در اکسل می بایست از متد Add استفاده کنیم. این متد ساختار ساده ای دارد که در ادامه به توضیحات هریک از آرگومان های آن خواهیم پرداخت:

Worksheets.Add (Before, After, Count, Type)

در ساختار فوق (Syntax) آرگومان های Before و After اشاره به جایگاه قرار گرفتن Worksheet جدید دارند درحالیکه آرگومان Count اشاره به تعداد و آرگومان Type اشاره به نوع Worksheet جدید دارد که بصورت عادی و پیشفرض مقدار اولیه آن برابر با xlWorksheet و یا به عبارتی همان Worksheet عادی است.

به ماکروی زیر دقت کنید:

Sub excellearn()

Worksheets.Add after:=Sheets(1)

End Sub

در ماکروی فوق ما Worksheet جدید را بعد از (after) اولین Sheet موجود در Workbook ایجاد نمودیم. حال برای آدرس دهی بهتر میتوانیم جایگاه Worksheet جدید را براساس اسامی صفحات مشخص کنیم. به ماکروی زیر دقت کنید:

Sub excellearn()

Worksheets.Add Before:=Sheets(“Sheet2”)

End Sub

در ماکروی فوق ما جایگاه Worksheet جدید را قبل از Worksheet با عنوان Sheet2 قرار دادیم.

حال اگر قصد داشته باشیم Worksheet جدید را بعد از آخرین Worksheet موجود در Workbook قرار دهیم، می بایست از ماکروی زیر استفاده نماییم:

Sub excellearn()

Worksheets.Add after:=Sheets(Worksheets.Count)

End Sub

در ماکروی فوق، Worksheets.Count یعنی تعداد Worksheets موجود در Workbook فعال، فرض کنید شما در Workbook فعال تعداد ۱۰ صفحه دارید لذا خروجی Worksheets.Count عدد ۱۰ و به عبارتی جایگاه Worksheet جدید بعد از جایگاه دهمین Worksheet خواهد بود.

تغییر نام Worksheet توسط ماکرونویسی در اکسل

اگر قصد داشته باشیم عنوان یک Worksheet را تغییر دهیم، ابتدا می بایست به جایگاه و یا عنوان آن Worksheet اشاره داشته باشیم و سپس با استفاده از Name property اقدام به تغییر نام آن کنیم. به ماکروی زیر دقت کنید:

Sub excellearn()

Worksheets(“Sheet1”).Name = “Excellearn”

End Sub

در ماکروی فوق عنوان Sheet1 به عبارت Excellearn تغییر یافت. دقت کنید اسامی در ماکرونویسی می بایست فی ما بین ” ” قرار گیرند. در ادامه دستورات ساده ای دیگری مرتبط با Worksheet در ماکرونویسی وجود دارد که میتوانید آن را در پست “آموزش دستورات Sheets در ماکرونویسی” مطالعه کنید.

درصورت وجود هرگونه انتقاد و پیشنهاد پیرامون پست آموزشی “کار با Worksheet در ماکرونویسی اکسل” آن را در قسمت نظرات برای ما ارسال نمایید تا در اسرع وقت نسبت به پاسخگویی آن اقدام گردد.

سایر مطالب مرتبط و کاربردی با ماکرونویسی در اکسل:

مطالعه بیشتر