Thema Datum  Von Nutzer Rating
Antwort
22.08.2018 11:59:23 WordNoob24
NotSolved
22.08.2018 14:53:22 Gast93552
NotSolved
22.08.2018 15:52:57 WordNoob24
NotSolved
Blau VBA Script fuer DropDown ContentControl um Dokument Hintergrund Farbe zu aendern
 22.08.2018 16:51:49 Gast60852
NotSolved
22.08.2018 17:25:08 Gast2754
NotSolved

Ansicht des Beitrags:
Von:
Gast60852		 Datum:
22.08.2018 16:51:49		 Views:
478		 Rating:
     
Antwort:
  Ja
Thema:
VBA Script fuer DropDown ContentControl um Dokument Hintergrund Farbe zu aendern

Habs jetzt nochmal anders probiert, zwar ist der Fehler weg aber es tut sich auch nix mehr.... bah egal ob ich fuer Case Is den Display Name oder Value eingebe...

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
With ActiveDocument.ContentControls
    If Title = "BackgroundColor" Then
    Select Case Range.Text
        Case Is = "Market Research"
            ActiveDocument.ActiveWindow.View.DisplayBackgrounds = True
            ActiveDocument.Background.Fill.ForeColor.RGB = RGB(200, 200, 200)
            ActiveDocument.Background.Fill.Transparency = 0#
            ActiveDocument.Background.Fill.PresetTextured msoTextureParchment
        Case Is = "Marketing"
            ActiveDocument.ActiveWindow.View.DisplayBackgrounds = True
            ActiveDocument.Background.Fill.ForeColor.RGB = RGB(100, 100, 100)
            ActiveDocument.Background.Fill.Transparency = 0#
            ActiveDocument.Background.Fill.PresetTextured msoTextureParchment
        Case Else
    End Select
    End If
End With
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
22.08.2018 11:59:23 WordNoob24
NotSolved
22.08.2018 14:53:22 Gast93552
NotSolved
22.08.2018 15:52:57 WordNoob24
NotSolved
Blau VBA Script fuer DropDown ContentControl um Dokument Hintergrund Farbe zu aendern
 22.08.2018 16:51:49 Gast60852
NotSolved
22.08.2018 17:25:08 Gast2754
NotSolved