Om du vill kopiera en viss formaterad cell eller färgade celler från en kolumn till nästa kolumn är den här artikeln något för dig. I den här artikeln lär vi oss hur man kopierar färgade celler med VBA -kod.
Följande är ögonblicksbilden av de data vi har, dvs kolumn A innehåller data med få gula färgade celler.
För att extrahera data som endast är markerade i gul färg; vi måste skapa en UDF för att bara visa de färgade cellerna i kolumn B
- För att skapa användardefinierad funktion följer vi stegen nedan:
- Klicka på fliken Utvecklare
- Välj Visual Basic i kodgruppen
- Vi måste kopiera nedanstående kod i standardmodulen
Funktionen är gul (ByRef r As Range)
Om r.Interior.ColorIndex = 6 Då
IsYellow = r.Value
Annan
IsYellow = vbNullString
Avsluta om
Avsluta funktion
- I cell B1 kommer formeln att vara = IsGult (A1)
Koden ovan matchar specifikt färg# 6 som endast är avsedd för gul färg. Därför extraherar udf endast de värden som innehåller färg#6.
Om vi vill extrahera röda färgceller måste vi kontrollera det angivna färgnumret och helt enkelt ersätta med gult färgnummer.
På detta sätt kan vi hämta de gula teckensnittsfärgcellerna med hjälp av vba -kod.
Ladda ner - Extrahera specifikt färgindex med VBA - xlsm