Change listItem forecolor based on criteria

[ioncila]

Hi
I'm trying to adapt the code below to a listview in my userform.
What I want to do is to change the item forecolor to red if text in "L" column fits criteria.
Macro works but text color remains the default black.

Please Login or Register  to view this content.

Woulf you offer some help with this, please?
Thanks in advance
Ioncila

[Andy Pope]

you need to post example workbook as your code appears to work. I get a listview full of red text.

[ioncila]

Hi Thank you for the reply and sorry for the late.
here is the attachement extracted from the original file. Hope it helps you to help me

Thank you very much in advance
ioncila

[ioncila]

Any help, please?

[Andy Pope]

I thought I had replied

Your workbook is referencing version 5 of the controls. I have version 6 and your code works with that.
So it maybe version 5 does not support font colour of individual list items.

[ioncila]

Hi
Thanks for your feedback.

I don't think that is the issue because in my original file Microsoft Windows Common Controls 6.0 (SP6) is active.
In fact, I have same active libraries as in the file I have found this color option, here:
http://www.vbaexpress.com/kb/getarticle.php?kb_id=916
So it must be something in the code.

Thanks in advance
Ioncila

[Andy Pope]

As I said for me the code works. The list items are all red

[ioncila]

As I said for me the code works. The list items are all red

Sorry for the insistance, but do you have red items with my code( attached file)?

[Andy Pope]

If I replace the listview control with the one from v6.0 controls then yes.

Did you mean to attach a new file to your latest post?

[ioncila]

If I replace the listview control with the one from v6.0 controls then yes.

Did you mean to attach a new file to your latest post?

The attached file in post #3

[Andy Pope]

So if I change the control to use v6.0 then your code works as expected. It only adds 2 rows in to the control.

I extended you code to add non matching items in as black.

workbook includes screen shot of the userform

[romperstomper]

FYI you have references to both version 5 and version 6 of the Common Controls and the control you were using, as Andy said, is the v5 one. Change it to a v6 control and try again.

[ioncila]

Andy
Thank you very much for your time but I'm still in the dark for a solution.
Your file returns "object required error", my file works but red items don't show up, libraries are exactly the same,...
I'm going to look better for the files and try to see what is wrong.
And, if so, prepare a clone of my original file to attach.

Thanks
Ioncila

[ioncila]

Hi again
I was misunderstanding the tip: when you said to change control version I thought you meant Microsoft Windows Common Controls 6.0. Now I know that you were talking about Listview Control version in additional controls. Sorry to get too much time to understand.
So I tried in your attached file and it works.
But in my original file, I still don't make progress in that way.
I attach now a sample of my original file.
Would you please point me some directions to the right solution?
Thank you again in advance
Ioncila

[ioncila]

Hi again
I was misunderstanding the tip: when you said to change control version I thought you meant Microsoft Windows Common Controls 6.0. Now I know that you were talking about Listview Control version in additional controls. Sorry to get too much time to understand.
So I tried in your attached file and it works.
But in my original file, I still don't make progress in that way.
I attach now a sample of my original file.
Would you please point me some directions to the right solution?
Thank you again in advance
Ioncila