Register Guidelines E-Books Search Today's Posts Mark Forums Read

Go Back   MobileRead Forums > E-Book Formats > Workshop

Notices

Reply
 
Thread Tools Search this Thread
Old 04-27-2012, 05:54 AM   #1
DSpider
Evangelist
DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.DSpider ought to be getting tired of karma fortunes by now.
 
DSpider's Avatar
 
Posts: 427
Karma: 326969
Join Date: Nov 2009
Location: Romania
Device: PW2 2014
Is there a Word macro that can change font spacing in increments?

I'm looking for a Word macro that can change it in 0.05 increments, and nothing else. Just the font spacing. I use Word 2010 but older macros seem to work too (it's still Visual Basic). Right now all I have is:

Code:
Sub Macro1()
'
' Macro1 Macro
'
'
    With Selection.Font
        .Spacing = 0.05
    End With
End Sub
Which is fine, I guess. Except I need a bunch more, each one mapped to the Alt + 1-9 keys and 0 being the "Normal" value. Isn't there a better way? Couldn't I do this with just 3 macros? One for increasing, one for decreasing and one for 0.


Edit: ".Value = .Value + 1"

I got it. Now the macros look like this:

Code:
Sub SpacingDecrease()
    With Selection.Font
        .Spacing = .Spacing - 0.05
    End With
End Sub

Sub SpacingIncrease()
    With Selection.Font
        .Spacing = .Spacing + 0.05
    End With
End Sub

Sub SpacingNormal()
    With Selection.Font
        .Spacing = 0
    End With
End Sub
I set them on "Alt+,", "Alt+." and "Alt+/" for which I use AltGr (the right Alt).

Last edited by DSpider; 04-28-2012 at 11:11 AM.
DSpider is offline   Reply With Quote
Reply

Thread Tools Search this Thread
Search this Thread:

Advanced Search

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
PRS-350 Change Font Size Increments? barium Sony Reader Dev Corner 4 05-23-2011 10:55 AM
Word 2007 macro scoplar Workshop 1 05-21-2011 06:00 AM
Doc to REB Macro for Word kbirdz Fictionwise eBookwise 0 10-27-2010 11:30 PM
Word Formatting Macro (Stingo's Macro) Stingo Sony Reader 75 08-24-2010 06:18 AM
How to change the line spacing of a font IceHand Bookeen 29 03-07-2009 04:09 AM


All times are GMT -4. The time now is 03:52 PM.


MobileRead.com is a privately owned, operated and funded community.