Thema Datum  Von Nutzer Rating
Antwort
Rot Umformatierung Hintergrundfarbe über Makro
 04.02.2018 12:20:28 Wiesel
NotSolved

Ansicht des Beitrags:
Von:
Wiesel		 Datum:
04.02.2018 12:20:28		 Views:
910		 Rating:
     
Antwort:
  Ja
Thema:
Umformatierung Hintergrundfarbe über Makro		 
Hallo Excelfreunde,

ich benötige Hilfe bei einem angepassten VBA Code.
Ich habe über Suchen und Ersetzen einige Zellenänderungen durchgeführt und aufgezeichnet.
Die Änderungen funktionieren soweit auch.
Wenn ich aber das Dokument neu öffne ignoriert das Makro jedes mal die Umformatierung der Zellenhintergrundfarbe.
Woran kann das liegen?

Danke und Grüße Wiesel

Code:
Dim ws As Worksheet ' Schleifenaufbau
    For Each ws In Worksheets
        If ws.Index > 2 Then ' alle Tabellenblätter größer 2 bis zum Ende werden in einer Schleife einzeln abgearbeitet
  
        ws.Activate ' Blatt innerhalb der Schleife aktivieren
    
        Range("E7:AI28").Select
                    
            With Application.ReplaceFormat.Font ' Formatierungsangabe für Schrift
            .Name = "Arial"
            .Size = 7                           ' Schriftgröße
            .Subscript = False
            .ThemeColor = 2                     ' Schriftfarbe
            .TintAndShade = 0

            With Application.ReplaceFormat.Interior.ColorIndex = 5296274            ' Formatierungsausgabe für Zelle
   
                Selection.Replace What:=":", Replacement:="x", LookAt:=xlPart, _
                    SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _
                    ReplaceFormat:=False 
                Selection.Replace What:="q", Replacement:="y", LookAt:=xlPart, _
                    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
                    ReplaceFormat:=True 
usw.
End With
End With

 

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
Rot Umformatierung Hintergrundfarbe über Makro
 04.02.2018 12:20:28 Wiesel
NotSolved