ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت دهم)
مفتخریم که با یک پست آموزشی دیگر با عنوان “ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت دهم)” خدمت هموطنان عزیز هستیم ، در این قسمت از آموزش ماکرونویسی در ورد شما با دستورات مرتبط با ترسیم جداول آشنا خواهید شد . با ما همراه باشید .
به منظور ایجاد جداول در Document می بایست از دستور زیر استفاده نمایید :
ActiveDocument.Tables.Add Range:=Range, NumRows:=Number, NumColumns:=Number
- جایگاه [Range] : محل قرار گرفتن جدول در Document .
- جایگاه [NumRows] : تعداد ردیف های جدول جدید .
- جایگاه [NumColumns] : تعداد ستون های جدول جدید .
به دستورات زیر دقت نمایید :
1 2 3 |
Set myRange = ActiveDocument.Range(Start:=0, End:=0) ActiveDocument.Tables.Add Range:=myRange, NumRows:=3, NumColumns:=4 |
خروجی بصورت دستورات زیر خواهد شد :
به منظور ایجاد حاشیه (Border) برای جدول ایجاد شده میتوانیم از دستور Borders استفاده کنیم :
1 2 3 4 5 6 7 8 9 |
Set myTable = ActiveDocument.Tables(1) With myTable.Borders .InsideLineStyle = wdLineStyleSingle .OutsideLineStyle = wdLineStyleDouble End With |
توضیحات دستور فوق :
- دستور InsideLineStyle : به منظور ایجاد حاشیه (Border) داخلی مورد استفاده قرار میگیرد.
- دستور OutsideLineStyle : به منظور ایجاد حاشیه (Border) بیرونی مورد استفاده قرار میگیرد.
خروجی دستورات فوق بصورت زیر خواهد شد :
به منظور درج داده در جداول می بایست از دستور Cell استفاده نمایید ، ساختار این دستور به شکل زیر می باشد :
1 |
ActiveDocument.Tables(Number).Cell(RowNumber,ColumnNumber) |
توضیحات دستور فوق :
- دستور Tables(Number) اشاره به شماره جدول دارد .
- دستور Cell از دو آرگومان شماره ردیف و شماره ستون تشکیل شده است که در پایان اشاره به یک سلول در جدول دارد.
جهت درک بهتر این دستور به مثال زیر دقت کنید :
1 2 3 4 5 6 |
With ActiveDocument.Tables(1) .Cell(1, 1).Range = "A1" .Cell(1, 2).Range = "B1" .Cell(1, 3).Range = "C1" .Cell(1, 4).Range = "D1" End With |
توضیحات دستور فوق :
- مقدار سلول قرار گرفته در ردیف اول و ستون اول برابر است با A1
- مقدار سلول قرار گرفته در ردیف اول و ستون دوم برابر است با B1
- مقدار سلول قرار گرفته در ردیف اول و ستون سوم برابر است با C1
- مقدار سلول قرار گرفته در ردیف اول و ستون چهارم برابر است با D1
خروجی دستورات فوق بصورت زیر خواهد شد :
پیشنهاد گروه آموزشی اکسل لرن به شما عزیزان مطالعه پست های آموزشی زیر می باشد :
در صورت وجود هرگونه انتقاد و پیشنهاد پیرامون پست آموزشی “ماکرونویسی در نرم افزار مایکروسافت ورد (قسمت دهم)” میتوانید آن را در قسمت نظرات همین پست و در صورت وجود هرگونه سوال میتوانید آن را در تالار گفتمان سایت مطرح تا در اسرع وقت توسط تیم پشتیبانی سایت نسبت به پاسخگویی آن اقدام گردد .