That will give you the formatting you want.

POpen = InStr(c.Value, sOpen) 'find next, if anyД®dit - if you're interested in a more general-purpose approach which doesn't involve IE you can copy the HTML to the clipboard and paste it to a cell. PClose = InStr(pOpen + 1, c.Value, sClose) 'find next close tagД¬.Characters(pClose, Len(sClose)).Delete 'remove the close tag firstД¬.Characters(pOpen, Len(sOpen)).Delete 'remove the open tagД¬allByName c.Characters(pOpen, numChars).Font, prop, VbLet, True POpen = InStr(c.Value, sOpen) 'have an open tag? Sub FormatTags(c As Range, tag As String, prop As String)Дim pOpen As Long, pClose As Long, numChars As Long Sub Tester()ДЄctiveSheet.Range('D2').Copy c 'for testing:copy the input string Here's one way to do it - not bulletproof and will not account for (eg) nested sets of the same tag or invalid HTML. Value property, any per-character font formatting will be lost, so you can't do that as part of the formatting process. Side note, as for the tags, it would be fine if they functioned the same as bold, if that makes it easier?ДЄs soon as you assign the cell's. The rest get wiped out.Д¬an multiple html tags be converted in excel strings or cells WITHOUT having to open other applications such as IE, etc? However, when trying to also incorporate italics, underline, and strong tags, it only does which ever come last. The above successfully makes needed text bold AND removes the visual tags from the cell. Characters(Pos(f, Pstart), Pos(f, Pend) - Pos(f, Pstart) + 1).Font.Bold = True So far, someone has helped me with getting this far: Dim Tag, Tend, Pstart, Pend As StringДim Cnt As Integer ' instances of bold expressionsДim Pos() As Variant ' string positions: 0 = start, 1 = EndД¬nt = (Len(Cv) - Len(Replace(Cv, Tag, ''))) / 3Д¬v = Left(Cv, Pos(f, Pstart) - 1) & Mid(Cv, Pos(f, Pstart) + Len(Tag), Len(Cv))Д¬v = Left(Cv, Pos(f, Pend)) & Mid(Cv, Pos(f, Pend) + Len(Tend) + 1, Len(Cv)) The current formula Im using is IF (b1>TODAY ()-7,1. I need to be able to process multiple types of tags (, ,, ) in the same cell or string. I am new here this is my first post I have found alot of useful things here but I have been looking all over for a scipt that will look if 2 different cells have dates in them if both do are the dates underline and/or bold if so then run the formula. 'This is a test cell filled with randomly placed html tags.' The other way to apply formatting to individual characters is to double-click the cell, or press F2 to enable edit mode.I have been looking to convert a string or cell such as: You can also apply bold, italic, and underline styles. When formatting just part of a cell, you can change the font, color, and size of text.

Select any formatting options you want.

Press the dialog box launcher in the Font section.

In the formula bar highlight the part of the text that you want to format.

Select the cell which you want to format.

You can rotate your text up, down, clockwise, or counterclockwise, or align text vertically:Д¬hange the format for a part of your text in a cell.

Select a cell, row, column, or a range.

Since you can apply rich text formatting to the cells that contain the formula, why not use more than 1 cell and eliminate the display of line between them so the 2 cells look like 1. Excel doesnвЂ™t provide such functionality to apply rich text formatting to part of the formula.

How do you bold text in Excel using keyboard?Дў Answers.

Can you conditional format part of a cell?.

From the dialog box, you can change the underline style and add effects. Click the Dialog Box Launcher in the Font group to see additional font formatting options.

How do I flip text upside down in Excel? Click the Bold, Italic, or Underline buttons on the Home tab.

How do I format a partial text in Excel?.

Bold the underline in excel