ماکرو
Jacie نوشت که یک ماکرو ایجاد کرده است که متن را روی Times New Roman تنظیم می کند. او می خواست ماکرو را تغییر دهد تا ضامن بین Times New Roman و Arial Narrow Bold باشد و فکر می کرد چگونه این کار را انجام دهد.
ساده ترین راه برای انجام این کار در یک ماکرو این است که فونت استفاده شده در متن انتخابی خود را بررسی کنید و سپس بر اساس آنچه که پیدا می کنید مراحل را انجام دهید. به عنوان مثال، ماکرو زیر فقط در صورتی عمل می کند که متن انتخاب شده Times New Roman یا Arial Narrow باشد:
Sub ChangeSelectedFont() Select Case Selection.Font.Name Case "Times New Roman" Selection.Font.Name = "Arial Narrow" Selection.Font.Bold = True Case "Arial Narrow" Selection.Font.Name = "Times New Roman" Selection.Font.Bold = False End Select End Sub
با این حال، یک راه متفاوت و غیر کلان وجود دارد که ممکن است کمی منطقی باشد. چرا از استایل ها استفاده نمی کنید؟ می‌توانید سبک‌هایی را تعریف کنید تا هر ویژگی قالب‌بندی مورد نظر را در بر بگیرد. به عنوان مثال، شما می توانید یک سبک را که از Times New Roman استفاده می کند و دیگری که از Arial Narrow Bold استفاده می کند، تعریف کنید. شما می توانید سبک ها را به دلخواه اعمال کنید و حتی می توانید با استفاده از سبک ها جستجو و جایگزین کنید.
