++ Wow ++ Wow ++
Danke Haichen,
für das Entdecken meines Fehlers mit den Anführungszeichen!
Die Lösung funktioniert.
Habe am Ende in Anlehnung an den Vorschlag von LuckyJoe #IfWinActive mit angehängt.
Wobei in der Hilfe von AutoHotkey unter #IfWinActive finde ich dazu leider keinen Hinweis,
ob man mit dem gleichen Befehl am Ende des Codes abschließt.
Mit und ohne #IfWinActive am Ende funktioniert beides.
Danke LuckJoe,
für Deinen besonderen Vorschlag. Nebenbei, ich arbeite mit Outlook 2016.
Danke auch für die Entdeckung von "Window-Spy"
(Aufruf mit rechter Maus Taste über dem grünem H in der Tray leiste unten rechts)
"Window-Spy":
Gleich unter "Window Title, Class and Process" stehen die gewünschten Einträge
die ich mit "try & error" des Tags zuvor selbst ausprobierte.
Die Sleep Anweisungen habe ich raus nehmen können.
Wobei, mit und ohne Sleep läuft beides.
Was mich verwundert ist, dass Du anders als Haichen oben mit #IfWinActive wieder abschließt.
Leider hab ich dazu keinen Eintrag gefunden,
ob der Abschluß mit #IfWinActive am Ende besser oder schlechter ist?
Hier die angepasste Lösung von Haichen und LuckJoe
Code: Select all
;----------------------------------------------------------------------------------------------------------------------
; HAICHEN
SetTitleMatchMode, 2 ; 2: Der Titel "...Message (HTML)" eines Fensters kann den angegebenen Fenstertitel an beliebiger Stelle enthalten, um eine Übereinstimmung zu sein.
#IfWinActive Message (HTML) ; Der Code eine Zeile tiefer wird nur in einem Fenster ausgeführt, wo im Titel der Eintrag "...Message (HTML)" steht.
F3::Send {Alt}{H}{F}{F}Calibri{Enter}{Alt}{H}{F}{S}11{Enter} ; Der zuvor markierter Text wird in Calibri und Zeichengröße 11 umgewandelt
return
#IfWinActive ; Abgeschaut von Lukcy Joe, läuft aber auch ohne diese
;----------------------------------------------------------------------------------------------------------------------
; LUCKJOE
#IfWinActive, ahk_class rctrl_renwnd32
F2::
SendInput, !HFF ; Cursor springt in zum "kleinen Fenster mit Pull Down Menue" Theme Fonts.
SendInput, Calibri{Enter} ; Der zuvor markierter Text wird in Calibri umgewandelt
SendInput, !HFS11{Enter} ; Der noch markierte Text erhält die Zeichengröße 11
Return
#IfWinActive
;----------------------------------------------------------------------------------------------------------------------
Eine zusätzlich Frage hätte ich nun doch noch.
In Outlook 2016 lässt sich der Text zum Beispiel in Dunkelblau - die Farbe die Outlook zum Antworten benutzt) darstellen.
Allerdings wüsste ich nicht, wie der Code dazu angepasst werden möchte.
Vielleicht habt Ihr beide oder andere dazu eine Idee?