Any Excel experts in here?
I'm trying to make a part of a cell bold
i.e. Say you had a formula of:
="... extend the Agreement until "& TEXT(Info!C12, "mmmmmmm d, yyyy") &", based upon the following terms and conditions:"
and I just wanted to make the date in bold, how would I do that? Any thoughts?
i.e. Say you had a formula of:
="... extend the Agreement until "& TEXT(Info!C12, "mmmmmmm d, yyyy") &", based upon the following terms and conditions:"
and I just wanted to make the date in bold, how would I do that? Any thoughts?
I don't know if it's possible within a formula, at least I haven't figured out how to do it within a formula, however here's some code that will format a selected cell containing a date into the text you want. I don't know if this will be useful.
Open vba and insert this code in a module
''''''''''''''''''''''''''''''''''''''''''
Public Sub Fordate()
Dim datearea As Range
Set datearea = Selection
If Len(datearea) < 50 Then
s$ = Format(datearea(1, 1), "mmmm, d, yyyy")
datearea = "... extend the Agreement until " & s$ & " based upon the following terms and conditions:"
ActiveCell.Characters(Start:=32, Length:=Len(s$)).Font.FontStyle = "Bold"
End If
End Sub
''''''''''''''''''''''''''
Now you need to make a button
Right click on your tool bar --> select customize --> commands -->in categories select macros --> in commands left click and hold the mouse button down to drag the custom button onto the tool bar. close that window. now you should have a little smiley face on your toolbar double click it! Now a macro window should pop open. Select Fordate. Now if you select a cell with a date in it and click the smiley face it'll convert it into the text you want (not a formula) with the date being bold.
ONLY SELECT ONE CELL AT A TIME.
hope this helps.
Open vba and insert this code in a module
''''''''''''''''''''''''''''''''''''''''''
Public Sub Fordate()
Dim datearea As Range
Set datearea = Selection
If Len(datearea) < 50 Then
s$ = Format(datearea(1, 1), "mmmm, d, yyyy")
datearea = "... extend the Agreement until " & s$ & " based upon the following terms and conditions:"
ActiveCell.Characters(Start:=32, Length:=Len(s$)).Font.FontStyle = "Bold"
End If
End Sub
''''''''''''''''''''''''''
Now you need to make a button
Right click on your tool bar --> select customize --> commands -->in categories select macros --> in commands left click and hold the mouse button down to drag the custom button onto the tool bar. close that window. now you should have a little smiley face on your toolbar double click it! Now a macro window should pop open. Select Fordate. Now if you select a cell with a date in it and click the smiley face it'll convert it into the text you want (not a formula) with the date being bold.
ONLY SELECT ONE CELL AT A TIME.
hope this helps.
Thread
Thread Starter
Forum
Replies
Last Post







