I have text in several cells that are different colored text. I want to concatenate all these different texts into one cell preserving their source colors in the concatenation USING A FUNCTION. Is there a function that someone has programmed that I can use? Thank you.
If you mean as a UDF, then I don't think it's possible because a UDF can only return a value; it can't do cell formatting of any kind, including text colouring.
As a VBA function/subroutine called from VBA on the other hand, then yes. For each source cell, loop through the Characters object one character at a time, copying the Text and various Font properties to the destination cell.
Can you post a dummy workbook? I have a macro that does something a little bit more complicated, but might be able to ajust it to fit your needs... No promises but might be worth a shot
Please consider:
Thanking those who helped you. Click the star icon in the lower left part of the contributor's post and add Reputation.
Cleaning up when you're done. Mark your thread [SOLVED] if you received your answer.
Solution posted at: http://www.vbaexpress.com/forum/showthread.php?t=41386
See the message to forum cross posters by Ken Puls: http://www.excelguru.ca/node/7
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks