View Single Post
  #1   Report Post  
herbwarri0r herbwarri0r is offline
Junior Member
 
Posts: 8
Question macro to bold number of chars from end of a string

Hi all, (first time I've used a forum such as this)

I have a work book that produces a two page document by using concatenate and information entered on the first worksheet. What I need to do is make a number of chars in a string bold. I can't use;

With ActiveCell.Characters(Start:=118, Length:=8).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12

As there is a varying length to the string due to the company name being cancatenated in. Tried changing start to end but this did not work. The characters I need bold are dates and will also be the only numbers in the string.

I've also tried recording a macro to create the formula =RIGHT(B46,60) to get the start of the text I need bold, paste it into a new cell and format the needed chars to bold. Then all I need to do in insert the test before in in that cell so to keep the formatting. This works but the recoded macro uses the string of text when I need it to use the cell reference for the company name.


=CONCATENATE("In the event of ",'Control Sheet'!E5,"'s"," failure to remedy the Payment Breach We will refuse to accept any new orders for the Service and/or suspend access to the Gateway on ",TEXT(Calender!AB5,"dd/mm/yyyy")," and/or exercise its right to terminate the Contract and the Service provided under it at 12:00 on ",TEXT(Calender!AD5,"dd/mm/yyyy"),".")

So to surmise I need to paste the above to a new worksheet as values and make the dates bold, but because the value in 'Control Sheet'!E5 is going to be of a varying length I'm having trouble.