ماکروی نمایش اطلاعات سند در Wor مثال های کمی در موضوع کاربرد ماکرو نویسی در Word وجود داردو به همین دلیل نکات ساده ای که پیدا می شود را به شما معرفی می کنیم. ماکروی زیر اطلاعاتی از سند شامل تعداد صفحه ها، تعداد پاراگراف ها و شماره صفحه جاری را توسط سه دستور MsgBox اعلان می کند.
Sub ShowInformation()
Dim NumberOfPages, NumberOfParagraohs, CurrentPageNumber As Integer
NumberOfPages = Selection.Information(wdNumberOfPagesInDocument)
MsgBox NumberOfPages
NumberOfParagraohs = ActiveDocument.Paragraphs.Count
MsgBox NumberOfParagraohs
CurrentPageNumber = Selection.Information(wdActiveEndPageNumber)
MsgBox CurrentPageNumber
End Sub
0 نظر
تازه ترین ها