Falls Sie eine bestimmte formatierte Zelle oder farbige Zellen von einer Spalte in die nächste Spalte kopieren möchten, ist dieser Artikel genau das Richtige für Sie. In diesem Artikel erfahren Sie, wie Sie farbige Zellen mit VBA-Code kopieren.
Es folgt die Momentaufnahme der Daten, die wir haben, dh Spalte A enthält Daten mit wenigen gelb gefärbten Zellen.
Um nur die gelb markierten Daten zu extrahieren; wir müssen eine UDF erstellen, um die farbigen Zellen nur in Spalte B anzuzeigen
- Um eine benutzerdefinierte Funktion zu erstellen, befolgen wir die folgenden Schritte:
- Klicken Sie auf die Registerkarte Entwickler
- Wählen Sie in der Gruppe Code die Option Visual Basic . aus
- Wir müssen den folgenden Code in das Standardmodul kopieren
Funktion IsYellow(ByRef r As Range)
Wenn r.Interior.ColorIndex = 6 Then
IsGelb = r.Wert
Anders
IsYellow = vbNullString
Ende Wenn
Endfunktion
- In Zelle B1 lautet die Formel =IstGelb(A1)
Der obige Code entspricht speziell der Farbe # 6, die nur für die Farbe Gelb gedacht ist. Daher extrahiert die UDF nur die Werte, die color#6 enthalten.
Wenn wir rote Farbzellen extrahieren möchten, müssen wir die angegebene Farbnummer überprüfen und einfach durch die gelbe Farbnummer ersetzen.
Auf diese Weise können wir die gelben Schriftfarbzellen mit VBA-Code abrufen.
Herunterladen - Spezifischen Farbindex mit VBA extrahieren - xlsm