Resizing fonts in a text box

		Microsoft Office Forums > Microsoft Word > Word VBA
Resizing fonts in a text box

03-23-2018, 05:36 AM

catflap

Windows 7 64bit Resizing fonts in a text box

Office 2013

Advanced Beginner

Join Date: Aug 2015

Location: UK

Posts: 77

UPDATE:

Think I've got a way around this. Instead of re-sizing I just use this:

Code:

ActiveDocument.Shapes(oShp.Name).TextFrame.TextRange.Font.Shrink

... and it seems to work without having to loop around doing one point size at a time and it can handle multiple font sizes.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Changing Default Fonts for Text Boxes and Tables	LadyBug679	PowerPoint	2	04-01-2016 06:42 AM
TrueColor BMP “fonts” in word w/ replace text>bmp script (trouble)	Sinsearach	Word VBA	3	03-02-2016 04:16 AM
How to print a line of text with all available fonts in the same document	electrocad	Word VBA	1	10-17-2015 04:53 AM
Fast switching between text fonts	Kyouran	Word	2	11-27-2012 12:54 AM
Fonts error when I used 2 types of fonts in 1 file	cmengenie	Word	3	03-18-2012 02:49 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 10:46 PM.