چارلز یک ماکرو برای درج متن lorem ipsum در یک سند ایجاد کرد. ضبط کننده ماکرو را روشن کرد، =lorem() را تایپ کرد و سپس Enter را فشار داد. این البته متن loreem ipsum را درج کرد. او یک میانبر برای ماکرو در نوار ابزار دسترسی سریع قرار داد، اما ماکرو ضبط شده فقط تا حدی کار می کند. برای او =lorem() تایپ می کند، اما همچنان باید به صورت دستی Enter را فشار دهد. چارلز سعی کرده است که ماکرو را ویرایش کند تا دستور Enter را داشته باشد تا وقتی روی میانبر ماکرو کلیک می کند متن وارد شود، اما فایده ای نداشت.
اگر می خواهید ماکرو شما با فشردن Enter شبیه سازی شود، باید از دستور SendKeys استفاده کنید. به احتمال زیاد وقتی ماکرو خود را ضبط می کنید، بسیار شبیه به این به نظر می رسد:
Sub Macro1()
"
" Macro1 Macro
"
"
Selection.TypeText Text:="=lorem()"
Selection.TypeParagraph
End Sub
کاری که باید انجام دهید این است که آخرین خط ماکرو (یکی که درست قبل از End Sub) قرار دارد را با یکی از موارد زیر جایگزین کنید:
SendKeys "~", True
SendKeys "{ENTER}", False
هر یک از این خطوط (شما فقط به یکی از آنها نیاز دارید) فشار دادن Enter را شبیه سازی می کند. با این حال، یک نکته مهم وجود دارد - SendKeys در هر پنجره ای که در حال حاضر فعال است کار می کند. این بدان معنی است که شما نمی توانید ماکرو را از داخل ویرایشگر ویژوال بیسیک اجرا کنید و افکت دلخواه را دریافت کنید. دلیل آن این است که وقتی این کار را انجام می دهید، این پنجره در ویرایشگر است که فعال است، بنابراین SendKeys "Enter" را در آن پنجره فشار می دهد. فقط زمانی باید ماکرو را اجرا کنید که پنجره سند Word شما فعال باشد.
همانطور که گفته شد، راه دیگری وجود دارد که می توانید بدون استفاده از دستور SendKeys به ماکرو نزدیک شوید. تنها کاری که باید انجام دهید این است که یک سند Word جدید ایجاد کنید که حاوی متن lorem ipsum شما و به دنبال آن هر آنچه می خواهید باشد. نام این را چیزی منحصر به فرد بگذارید، مانند LoremText.docx. سپس یک ماکرو مانند این ایجاد کنید:
Sub Lorem()
Selection.InsertFile FileName:="C:UsersUserDesktopLoremText.docx"
End Sub
فقط باید مطمئن شوید که مسیر و نام فایل نشان داده شده در ماکرو نشان دهنده مسیر واقعی و نام فایل مناسب برای سیستم شما است. وقتی ماکرو را اجرا می کنید، Word خارج می شود و سند LoremText.docx را می گیرد و آن را در نقطه درج قرار می دهد.
در نهایت، راه دیگری وجود دارد که می توانید بدون نیاز به توسل به ماکروها به این موضوع بپردازید. در صورت تمایل می توانید متن lorem ipsum را در سند خود وارد کنید، آن را انتخاب کنید و آن را به عنوان یک بلوک ساختمانی یا به عنوان یک ورودی تصحیح خودکار ذخیره کنید. سپس می توانید متن را به راحتی با استفاده از این ابزارهای Word وارد کنید - به هر شکلی که می خواهید اصلاح شده است. (نحوه ایجاد و استفاده از هر دو بلوک های ساختمانی و ورودی های تصحیح خودکار در سایر WordTips پوشش داده شده است.)
