Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
How can I use the "Small Caps" Font option in an Excel speadsheet
In Word, one just formats the font and its a toggle box option, however, I
can't find this option in Excel. Problem is, we have it being used in some spots (document is being updated, and this isn't the first time in Excel 2003), but when we change it, it changes away from the "Small caps" as well. |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
How can I use the "Small Caps" Font option in an Excel speadsheet
Excel doesn't have this kind of formatting.
Maybe you could search the web to find a font that does small caps. Remember that if you share the workbook with others, they'll have to that font installed, too. But you could use a macro that actually changes the font size (character by character): http://groups.google.com/groups?thre....supernews.com execassist1976 wrote: In Word, one just formats the font and its a toggle box option, however, I can't find this option in Excel. Problem is, we have it being used in some spots (document is being updated, and this isn't the first time in Excel 2003), but when we change it, it changes away from the "Small caps" as well. -- Dave Peterson |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
How can I use the "Small Caps" Font option in an Excel speadsheet
See Dave's post for more details.
This macro will give you small caps. Attribution to Pat Finegan Sub Small_Caps() Dim o As Object Dim sCap As Integer, _ lCap As Integer, _ i As Integer Dim testStr As String Application.ScreenUpdating = False For Each o In Selection With o If Application.IsText(.Value) Then lCap = .Characters(1, 1).Font.Size sCap = Int(lCap * 0.85) 'Small caps for everything. .Font.Size = sCap .Value = UCase(.Value) testStr = .Value ' Large caps for 1st letter of words. ' testStr = Application.Proper(testStr) ' For i = 1 To Len(testStr) ' If Mid(testStr, i, 1) = UCase(Mid(testStr, i, 1)) Then ' .Characters(i, 1).Font.Size = lCap ' End If ' Next i End If End With Next o Application.ScreenUpdating = True End Sub Gord Dibben MS Excel MVP On Wed, 4 Oct 2006 07:12:01 -0700, execassist1976 wrote: In Word, one just formats the font and its a toggle box option, however, I can't find this option in Excel. Problem is, we have it being used in some spots (document is being updated, and this isn't the first time in Excel 2003), but when we change it, it changes away from the "Small caps" as well. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
A bug that effects font size display in Excel 2000?? | Excel Discussion (Misc queries) | |||
password to open Excel file option does not exist | Excel Worksheet Functions | |||
Can you sort a column in Excel that's different by colored font? | Excel Worksheet Functions | |||
Excel 2002: how to incr font size in option button text | Excel Discussion (Misc queries) | |||
Export from Oracle into Excel, "Open" is not an option in XP | Excel Discussion (Misc queries) |