کنراد مایل است از قابلیت "حرف های کوچک" ورد در اکسل تقلید کند. تنها راهی که او می تواند برای انجام این کار فکر کند این است که یک ماکرو ایجاد کند که از هر شخصیت در یک سلول عبور کند. اگر کاراکتر کوچک و 11 pt باشد، ماکرو باید کاراکتر را به 9 pt بزرگ تغییر دهد. اگر کاراکتر بزرگ باشد (یا نه یک حرف)، پس نباید روی آن تاثیر بگذارد. مشکل این است که کنراد نمی داند چگونه بر قالب بندی کاراکترهای منفرد در سلول به روشی که توضیح داده شد تأثیر بگذارد.
هنگامی که از یک ماکرو برای تأثیرگذاری فقط بر کاراکترهای خاص در سلول استفاده می کنید، خوب است به یاد داشته باشید که هر سلول دارای مجموعه کاراکترهای خاص خود است که قابل دسترسی و تغییر است. هر عنصر در مجموعه، همانطور که انتظار دارید، نشان دهنده یک کاراکتر در سلول است.
این به ما اجازه می دهد تا یک ماکرو جمع آوری کنیم که آنچه را که در حال حاضر در سلول وجود دارد بررسی می کند، و اگر کاراکتر در حال حاضر کوچک است، فقط آن کاراکتر را به حروف بزرگ تبدیل کرده و اندازه قلم آن کاراکترها را کاهش دهید.
Sub SmallCaps()
Dim rCell As Range
Dim sWords As String
Dim sCharacter As String
Dim x As Long
go through each cell in selection
For Each rCell In Selection
Dont want to work on formulas
If Not rCell.HasFormula Then
sWords = rCell.Value Get the cell contents
For x = 1 To Len(sWords) Act on each letter
sCharacter = Mid(sWords, x, 1)
If sCharacter >= "a" And sCharacter
این ماکرو کار خود را روی هر سلولی که هنگام اجرا انتخاب شده است انجام می دهد. بررسی می کند تا مطمئن شود سلول حاوی فرمول نیست (فرمول ها نادیده گرفته می شوند)، و سپس هر گونه تغییری در حروف کوچک در سلول ایجاد می کند.
استفاده از یک ماکرو مانند این اشکالاتی دارد و باید از آنها آگاه باشید. بزرگترین ایراد این است که در واقع آنچه در سلول ها وجود دارد را اصلاح می کند. وقتی این کار تمام شد، سلول ها حاوی تمام متن های بزرگ خواهند بود، حتی اگر قالب بندی آن را مانند حروف کوچک جلوه دهد. این به این معنی است که وقتی بعداً ماکرو را برای بار دوم اجرا می کنید، ممکن است با مشکل مواجه شوید و ابزارهای تصحیح اکسل (مانند غلط گیر املا) روی کلماتی که همگی با حروف بزرگ هستند کار نمی کنند. (با این حال، اکسل را می توان طوری پیکربندی کرد که همچنان املای چنین کلماتی را بررسی کند.)
به دلیل اشکالات، ممکن است بخواهید رویکرد کاملاً متفاوتی را در پیش بگیرید - فونتی را که برای سلول هایی که در آنها حروف کوچک می خواهید تغییر دهید. اگر در وب برای "فونت های با حروف کوچک" (بدون علامت نقل قول) جستجو کنید، می توانید نامزدهای زیادی را پیدا کنید و تعداد زیادی از آنها به صورت رایگان در دسترس هستند. در اینجا یک سایت است که ممکن است چیزی داشته باشد که شما دوست دارید:
https://www.fontsquirrel.com/fonts/list/tag/small%20caps
کافیست فونت مورد نظر خود را (از این منبع یا هر منبع معتبر دیگری) دانلود و بر روی سیستم خود نصب کنید. هنگامی که اکسل را مجددا راه اندازی می کنید، فونت باید برای قالب بندی سلول ها در دسترس باشد. سلول هایی که برای استفاده از چنین فونتی قالب بندی شده اند، متن را به صورت حروف کوچک نشان می دهند، حتی اگر محتوای واقعی سلول ترکیبی از حروف بزرگ و کوچک باشد.
اگر مسیر استفاده از فونت با حروف کوچک را انتخاب می کنید باید از یک چیز آگاه باشید: اگر ورک بوک را با شخصی که آن فونت را روی سیستم خود نصب نکرده است به اشتراک بگذارید، ممکن است مشکلاتی وجود داشته باشد. ورک بوک به هیچ وجه "آسیب نمی بیند"، اما اطلاعات ورک بوک احتمالا به درستی نمایش داده نمی شود زیرا اکسل یک فونت پیش فرض را به جای فونت انتخابی شما جایگزین می کند.
