Probleme mit Anführungszeichen (« statt ") im Word 2016

Bei der Sprache ist Deutsch (Schweiz) zugewiesen. Aufgrund deiner Frage habe ich nun aber mal auf Deutsch (Deutschland) umgestellt und siehe da, dann kommt es richtig! Vielen Dank für den Tipp. Allerdings ist damit mein Problem noch nicht gelöst. In dem Fall liegt das Problem bei der Sprache irgendwo. Kann man dort gewisse Einstellungen/Änderungen vornehmen?? Ich möchte weiterhin auf Deutsch (Schweiz) schreiben, das klappte ja beim Word 2010 auch ohne Probleme.

Gruss

Ich schliesse mich den bisherigen Meinungsäusserungen an, die Umstellung der Anführungs- und Schusszeichen ist mühsam, zumindest sollte die Möglichkeit geschaffen werden, die Typographie in diesen Fällen einfach festzulegen.

Irgendwie scheinen ja genug Stimmen für eine Guillemet-Regelung zusammengekommen zu sein, dass Microsoft sich zu dieser Änderung entschlossen hatte. "Niemand soll sich beschweren, wenn seinem Antrag stattgegeben wird!"

Mit Suchen&Ersetzen gibt es ja immerhin einen praktikablen Workaround.

Und alle, denen das zu mühselig ist, können sich gern dieses Makro installieren, das nach Fertigstellung des Textes aufzurufen ist.

Gruß

G.O.

Sub Guil2Typo()

'

' Guillemets durch Typographische Anführungszeichen ersetzen

'

    Options.AutoFormatAsYouTypeReplaceQuotes = False

    With Selection.Find

        .ClearFormatting

        .Replacement.ClearFormatting

        .Text = "^0171"

        .Replacement.Text = "^0132"

        .Forward = True

        .Wrap = wdFindStop

        .Format = False

        .MatchCase = False

        .MatchWholeWord = False

        .MatchWildcards = False

        .MatchSoundsLike = False

        .MatchAllWordForms = False

        .Execute Replace:=wdReplaceAll

    End With

    With Selection.Find

        .Text = "^0187"

        .Replacement.Text = "^0147"

        .Forward = True

        .Wrap = wdFindStop

        .Format = False

        .MatchCase = False

        .MatchWholeWord = False

        .MatchWildcards = False

        .MatchSoundsLike = False

        .MatchAllWordForms = False

        .Execute Replace:=wdReplaceAll

    End With

    Options.AutoFormatAsYouTypeReplaceQuotes = True

End Sub

Hallo,

Bis Microsoft eine Lösung anbietet, habe ich mal auf Deutsch (Lichtenstein) gewechselt. Dort gibt es die "normalen" Anführungszeichen und kein Scharf-Sß wie in Deutschland oder Österreich.

Microsoft hat ja eine "Lösung" angeboten, nämlich für all jene Anwender, die so lange auf die Guillemets gewartet haben. Es ist nicht davon auszugehen, dass MS dies wieder rückgängig macht. Auch gehe ich nicht davon aus, dass dem Anwender die Möglichkeit gegeben wird, "AutoFormat" nach eigenem Gusto zu konfigurieren. Also bleibt alternativ die Möglichkeit, AutoKorrektur-Einträge zu nutzen.

---

Viele Grüße

Lisa

Hallo

Leider ist diese Lösung von Microsoft nicht korrekt und widerspricht den Grundsätzen der offiziellen Geschäftskorrespondenz. In der Schweiz ist bei Geschäftskorrespondenz stets Doppelprimes unten und oben anzuwenden.

Beste Grüsse

Marco