WORD 6.0 Makro: Englisch / Deutsch

Autor:
Jrgen Hinrichs
schul16@gmx.net
http://mitglied.lycos.de/erleuchtet/index-g.htm
Infos und Tips fr Word, Windows, Access, Excel, Internet

Dieses Makro unterliegt dem Urheberrecht und bleibt Eigentum des Autors.
Es ist Freeware und darf unter Nennung des Autors und der Herkunft
unentgeltlich weitergegeben werden.

Es darf weder verkauft noch verliehen noch anderweitig kommerziell
vertrieben werden, auch nicht in genderter oder erweiterter Form.

Jedwede Haftung wird ausgeschlossen.
Weitere Makros auf Anfrage.


###############

Englisch: Setzt markierten Absatz auf Sprache: Englisch (UK) (Alternativen mglich) + gelber Hintergrund [letzteres ggf. mit 'REM' deaktivieren]

Deutsch: Setzt markierten Absatz zurck auf Sprache: Deutsch und den Hintergrund (wieder) auf 'transparent' [Standardeinstellung]

###############


Den unten stehenden Makro- Code kopieren und in MS WORD 6.0
ber

 "Extras / Makro / [Makroname]: Erstellen"

unter einem ausgewhlten Namen vollstndig in das sich ffnende Editor- Fenster einfgen


Erstes Makro: Englisch


CODE AB HIER KOPIEREN (inklusive der Anfangs- und Endzeilen mit "Sub / End Function") 

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Sub MAIN
REM Makro erstellt 1999 von Juergen Hinrichs schul16@gmx.net

ExtrasSprache .Sprache = "English (UK)"

REM nchste Zeile  ggf. mit 'REM' deaktivieren 
FormatRahmenSchattierung .AnwendenAuf = 0, .schattiert = 0, .ObenRahmenlinie = 0, .LinksRahmenlinie = 0, .UntenRahmenlinie = 0, .RechtsRahmenlinie = 0, .HorizontalRahmenlinie = 0, .VertikalRahmenlinie = 0, .FarbeOben = 0, .FarbeLinks = 0, .FarbeUnten = 0, .FarbeRechts = 0, .FarbeHorizontal = 0, .FarbeVertikal = 0, .VomText = "1 pt", .Schattierung = 1, .Vordergrund = 7, .Hintergrund = 0, .Registerkarte = "1", .FeineSchattierung = - 1

End Sub


+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++



Zweites Makro: Deutsch 


CODE AB HIER KOPIEREN (inklusive der Anfangs- und Endzeilen mit "Sub / End Function") 

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Sub MAIN
REM Makro erstellt 1999 von Juergen Hinrichs schul16@gmx.net

ExtrasSprache .Sprache = "Deutsch"

REM Setzt den Hintergrund auf 'transparent' [Standard - Einstellung]:

SchattierungsMuster 0


End Sub


+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++





Neue Makros in MS WORD 6.0 integrieren:

 "Extras / Anpassen / Mens / Kategorien: Makros"

Makro auswhlen und in ein Men einfgen


oder ber "Tastatur" mit einer Tastenkombination belegen, 

beispielsweise mit 

<STRG> + <Shift> + <E> oder <Alt> + <E>  fr  Makro "Englisch"

<STRG> + <Shift> + <D> oder <Alt> + <D>  fr  Makro "Deutsch"


Alternativ das Makro direkt ber

 "Extras / Makro / [Makroname]: Ausfhren" 	

auswhlen und ausfhren lassen.




Einbau und Betrieb des Makros geschieht auf eigenes Risiko.

(c) 1999 Jrgen Hinrichs

