String in eine bedingte Formatierung-Formel in vba

Ich soll format Spalte D wenn Spalte D ein "AI" in der gleichen Zeile mit VBA in Excel 2007.

Wenn ich es manuell tun, in die bedingte Formatierung-editor der Formel - =(D1 = "AI") richtig funktioniert.

Wenn ich versuche, fügen Sie diese Formel, um die Formel 1-Klausel einer FormatConditions.Add-Methode, die ich setzen muss
="(D1 = ""AI"")" oder der interpreter beschwert. Aber das ist kopiert wortwörtlich mit dem doppelten Anführungszeichen als die Bedingung und die Formatierung bringt nichts.

Was soll ich in der Formel 1 ?

Antonio

  • Wenn Sie formatieren möchten G basierend auf F warum verwenden Sie D1??
  • Hoppla, bearbeitet! Danke!
InformationsquelleAutor Antoni Gual Via | 2013-05-08
  1. 3

    Dieser arbeitete für mich:

    Sub Macro2()

Sheet1.Range("G1").Select
With Sheet1.Range("G:G")
    .FormatConditions.Delete
    .FormatConditions.Add Type:=xlExpression, Formula1:="=F1=""AI"""
    .FormatConditions(1).Interior.ColorIndex = 3
End With
End Sub

    Auch mithilfe von VBA-setzen Sie die bedingte Formatierung hat immer ein bisschen wackelig (bei mir zumindest). Der einzige Weg, ich könnte es Arbeit war es, wählen Sie G1 und legen Sie dann die Formatierung durch. Ich weiß, normalerweise brauchen Sie nicht zu wählen, aber in diesem Fall ist es der einzige Weg, ich könnte es an die Arbeit.

    • Danke, sous2817 !
    InformationsquelleAutor sous2817
  2. 1

    Verwenden Sie diese Formel:

    =$F$1="AI"

    Dadurch wird das unten.

    String in eine bedingte Formatierung-Formel in vba

    In VBA könnte man dies tun: 

    ="=$F$1=" + Chr (34) + "AI" + Chr (34) + ")"

    Chr (34) ist " (double quote)

    Auch Sie nutzen könnten:

    If Range("F1") = "AI" Dann Range("G1").Innenraum.Color = 65535

    InformationsquelleAutor user2140261
  3. 0

    Wenn Sie dabei sind, dieses in VBA, warum bist du dann mit der bedingten Formatierung überhaupt? Schauen Sie sich einfach auf den Wert in G, und legen Sie das format F direkt im VBA-code.

    • Gut, ich habe die Idee, dass wenn ich die in Excel integrierten Funktionen, die meine Makros schneller als wenn ich mit ForEach-Schleifen..
    InformationsquelleAutor Declan_K
Schreibe einen Kommentar