OLEObject Label FontColor/ForeColor

I've been banging my head in my keyboard over this.
All I want to do is, with VBA code, set the font color (or Forecolor) of an OLEObject called "Label1" in the Activesheet... But I can't get the right syntax. Can any kind soul out where help me out??? I have no problem changing it through the GUI of Excel, but I need to do it frm VBA!

A step in the right direction, thx Harry. Using this in the code for the Worksheet is working properly, I've had all my tries in a Module.

But I did get one piece of code to actually change the ForeColor but it still doesn't forefill my needs

Please Login or Register  to view this content.

Enough of me trying, I would love to use your code...Sorry for not giving you the whole Picture, but I wasn't sure what I was asking for (still aint)
But what I want to do is when I trigger a "Worksheet_Change" event or even better within the other code in a Module after been using a ColorDialog and storing the "Long"-result in a cell, I want to set the ForeColor on a bunch of Labels (up to 54 of them in a single sheet). How do I accomplish that? Or is there a way to call a sub that's within the Worksheet from a sub in a Module? 'Cause the last part will also solve my issue (in a not so pretty way thou). I can always hardcode all 54 labelnames

Best Regards
Jonny

Here it goes. Sorry for leading you in the dark earlier...

First a simple sheet with a command button, a cell that works as a "ResultCell" and then the 3 OLEObjects as Labels
SetForeColorOfLabels.PNG

The code that goes with the command button

Please Login or Register  to view this content.

...and the code that lies withing the Module

Please Login or Register  to view this content.

Thx again for your help!

It's a .xlsm-file

Jonny

I'm not able to upload such an "image". That's the reason I just show you all the part of the excel file. How do I upload a xlsm-file?

The only way I can find to attach a file (upload to the forum) is to "Insert Image". The only allow file types are jpg, jpeg, png, gif. Just renaming my example will give the error "This is not a valid image file"... What am I missing?

PNG files still gets the same error, but the zip file seems to be working

Thanks for hanging in there!

Perfect! Thanks alot for all your help Harry!

Now I'm a happy man