is there a way to identify a specific "Font" at MS Word 2016, in order to allocate keys to that specific keyboard?
Say you use SBL Greek Font in MS Word. When you press "a" the (usual) Latin "a" is given. Well I would like that when I'm using that SBL Greek Font when I type "a" the letter given is the Greek "a", the alpha
identifying a MSWord font to allot specific symbols to usual keys
Re: identifying a MSWord font to allot specific symbols to usual keys
Set word as an object. Give this a short try. (dont know why short was there..) Font context hotkeys, I'd reccomend it cross referencing to another script to run. Give this a try.
good luck!
Code: Select all
Word := ComObjActive("Word.Application")
;Word.Visible := true
;Msgbox, % IsObject(Word) ;to test if Word is an object, uncomment.
Var := Word.Selection.Font.Name ;Set what you want to test as a variable
Msgbox, % Var ;Find out what the font is, stored in the variable
If (Var = "Arial Black") ;These are just example font I chose.
{
Msgbox, do X
}
Else If (var = "Calibri") ;this was the default.
{
Msgbox, do Y
}
return
Re: identifying a MSWord font to allot specific symbols to usual keys
thank you.
I think it works. However how can I set up that the script is constantly changing IF MS Word is open and also If I right now I'm using "Arial Black" so that if that is the case I want to make a change in the symbols (scancode, that one symbol will be at a specific key)
I think it works. However how can I set up that the script is constantly changing IF MS Word is open and also If I right now I'm using "Arial Black" so that if that is the case I want to make a change in the symbols (scancode, that one symbol will be at a specific key)
-
- Posts: 13
- Joined: 02 Aug 2017, 17:59
Re: identifying a MSWord font to allot specific symbols to usual keys
I guess put it in a loop, that would be my idea.