Extracting Background Colour and pasting it as HEX-Code into a specific cell

[ProjectDev]

Hey Excelers,
I'm very new to excel macro scripting and recently I wrote something that extracts the data of only coloured cells (in one specific RGB Colour) in a range and only pastes their visual outputs (without formula) in a new worksheet.
Now I'd like to upgrade that script a little bit and make it that it extracts ALL Backgroundcoloured cells within that range - reads their colour and pastes the colour as Hexcode into a designated cell or if possible even within the code of the cell where it found the colour but thats not necessary and probably way more difficult.

Does anyone have an idea of how to do that by any chance?

I hope you all are having a great day and would love to hear from you soon!

Best wishes,
Eric

 

[ProjectDev]

I think I found a way to print out the desired HEX code, now I just need something that targets all backgroundcoloured cells instead of only the ones colored in a specific backgroundcolour.
Looking forward to your ideas!

 

[ProjectDev]

For now I worked around with an else statement - excluding black as a backgroundformat (since uncoloured cells are seen as black), so all coloures are now included except for black, not sure if even black could be included. Thanks alot anyways!

 

[Fluff]

You could do something like

   Dim cl As Range
   For Each cl In [a1:c5]
      If cl.DisplayFormat.Interior.Color <> 16777215 Then
         MsgBox cl.Address
      End If
   Next cl

this will ignore any cell with no fill or a white fill