Seitenhintergrund (Farbe) in Word ändern

Hallo miteinander,

ich möchte gerne die Seitenfarbe eines Word-Doks mittels vb.net verändern. Die Funktion an sich findet sich in Word 2010 unter "Seitenlayout" > "Seitenhintergrund" > "Seitenfarbe". Geändert werden soll die Farbe auf "keine Farbe".

Zu erwähnen ist evtl noch, dass in dem betreffenden Dok die Seite in der Ansicht "Weblayout" farbig ist (um die geht es hier), in der Ansicht "Seitenlayout" keine Färbung hat.

Ich freu mich auf Hinweise..!

Neugierige Grüße,
Andreas

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 249920

Url: https://administrator.de/forum/seitenhintergrund-farbe-in-word-aendern-249920.html

Ausgedruckt am: 07.04.2025 um 19:04 Uhr

4 Kommentare

Neuester Kommentar

Moin Andreas,
as simple as that:

deinDocObject.ActiveWindow.View.Type = WdViewType.wdWebView
deinDocObject.Background.Fill.Visible = 0

deinDocObject natürlich durch deine Variabe des Dokumentenobjekt's ersetzen.

Grüße Uwe

p.s. noch zur Info wenn du wieder vor solch einer Aufgabe stehst: Zeichne doch einfach in Word ein Makro auf und führe dann die gewünschte Aktion durch. Dann kannst du dir im VBA Editor den Code ansehen und mit geringen Anpassungen (z.B. von Konstanten) in dein VB.Net Programm übertragen.

Moinmoin,

den Tipp mit dem Makro nehme ich gerne auf!!!

Kann es sein, dass das Word-Dok sichtbar sein muss? Oder gibt es sonst noch ein Geheimnis? Mit meinem nachfolgenden Code funktioniert es leider nicht...

Dim wordApp As Microsoft.Office.Interop.Word.Application
Dim wordDoc As Microsoft.Office.Interop.Word.Document
...
wordDoc = wordApp.Documents.Open(PathQ1, Visible:=False, ReadOnly:=False)
With wordDoc
 .Activate()
 ...
 .ActiveWindow.View.Type = WdViewType.wdWebView  'löst den Fehler aus, s.u.  
 .Background.Fill.Visible = False

Fehlertext: "Der öffentliche Member worddoc für den Typ ApplicationClass wurde nicht gefunden."

Schalte das Word-Objekt unsichtbar, nicht das Dokument selber !

wordApp.Visible = False

und dann das Dokument ohne die Option Visible:=False öffnen

-edit- ich sehe gerade, die Zeile .ActiveWindow.View.Type = WdViewType.wdWebView kannst du auch weg lassen, sollte ohne auch funktionieren.