See attached file.
I am changing numbers/letters in a range. When I do that I would like to automatically have these changes in bold text.
Also, when changing value to +1 in another cell, I want every numbers/letters in previous range to go from bold to regular text.
Put this code in the Worksheet_Change event :
Or see the attached file.
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("E10:H1048576")) Is Nothing Then Target.Font.Bold = True Else: If Target.Address = "$A$5" Then Range("E10:H1048576").Font.Bold = False End If End Sub
.. and don't forget to have fun!
Bogdan.
mark SOLVED andAdd Reputation if my answer pleases you
Seems like it works perfectly, thank you so much!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks