Different Formatting in Single Cell

[gogrw]

I have a pretty complicated spreadsheet where one column has information in black font, another column has different information in red font, and a third column has information in blue font. My employer wants all sets of information in a single column combined with all three colors determining which is which.

Column I shows areas that are out of compliance (in red)
Column J shows areas with warnings (in black)
Column K shows completed surveys (in blue and italics)

Column G combines all of them as Column I, a semicolon in the middle, Column J, and then Column K on a new line.

I am very new at VBA, but understand that I can achieve this using VBA. I'm not sure how, though. Any help is greatly appreciated.

[GlennUK]

Is this any use? The VBA macro replicates the logic of the formula, and formats the cell. See attached.

[gogrw]

GlennUK, thank you for your help!

This does the trick; however, in all reality I have 450 stores on my list so when I click on the button to activate the macro, it takes several minutes to complete the task. Is there any way to speed this up? If not, is there a way to indicate the progress of macro running so the user at least knows it's working?

[LJMetzger]

Hi,

See the following code which uses the StatusBar at the bottom of the Spreadsheet (changes in red) in the modified copy of the attached File.

Please Login or Register  to view this content.

To prevent typos from ruining days and weeks of work 'Option Explicit' is NEEDED at the top of each code module. This prevents errors caused by missspellings and FORCES every variable to be DECLARED (e.g. Dim i as Integer). http://www.cpearson.com/excel/DeclaringVariables.aspx

Lewis