active cell bold
 

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
With Cells.Font
.FontStyle = "Regular"
End With
With ActiveCell.Font
.FontStyle = "Bold"
End With
End Sub

Vaya con Dios,
Chuck, CABGx3


"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

Can I have that a little slower so my small brain can take it in? Are these
formulas added to the entire selection? Sorry.


"FSt1" wrote:

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

They are not formulas, formulas cannot do this. You would need event macros
Right click the sheet tab where you want this to happen and select view
code. then paste in the code. Press Alt + q and save the workbook


--
Regards,

Peo Sjoblom


"Dtech" wrote in message
...
Can I have that a little slower so my small brain can take it in? Are
these
formulas added to the entire selection? Sorry.


"FSt1" wrote:

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

Thats frickin awesome. Thanks a bunch.


"Peo Sjoblom" wrote:

They are not formulas, formulas cannot do this. You would need event macros
Right click the sheet tab where you want this to happen and select view
code. then paste in the code. Press Alt + q and save the workbook


--
Regards,

Peo Sjoblom


"Dtech" wrote in message
...
Can I have that a little slower so my small brain can take it in? Are
these
formulas added to the entire selection? Sorry.


"FSt1" wrote:

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

Just as long as you realize that this wipes out color formatting from every cell
other than the active cell with no going back.


Gord Dibben MS Excel MVP

On Thu, 17 May 2007 13:00:01 -0700, Dtech
wrote:

Thats frickin awesome. Thanks a bunch.


"Peo Sjoblom" wrote:

They are not formulas, formulas cannot do this. You would need event macros
Right click the sheet tab where you want this to happen and select view
code. then paste in the code. Press Alt + q and save the workbook


--
Regards,

Peo Sjoblom


"Dtech" wrote in message
...
Can I have that a little slower so my small brain can take it in? Are
these
formulas added to the entire selection? Sorry.


"FSt1" wrote:

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is that
possible?

active cell bold
 

Right on Gord............that's why I stuck with just the "bolding" part in
my response.

Vaya con Dios,
Chuck, CABGx3



"Gord Dibben" <gorddibbATshawDOTca wrote in message
...
Just as long as you realize that this wipes out color formatting from
every cell
other than the active cell with no going back.


Gord Dibben MS Excel MVP

On Thu, 17 May 2007 13:00:01 -0700, Dtech

wrote:

Thats frickin awesome. Thanks a bunch.


"Peo Sjoblom" wrote:

They are not formulas, formulas cannot do this. You would need event
macros
Right click the sheet tab where you want this to happen and select view
code. then paste in the code. Press Alt + q and save the workbook


--
Regards,

Peo Sjoblom


"Dtech" wrote in message
...
Can I have that a little slower so my small brain can take it in? Are
these
formulas added to the entire selection? Sorry.


"FSt1" wrote:

hi
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With Cells.Font
.FontStyle = "regular"
End With
ActiveCell.Interior.ColorIndex = 6 'yellow
With ActiveCell.Font
.FontStyle = "bold"
End With
End Sub

regards
FSt1

"Dtech" wrote:

Im trying to make the active cell either bolded or highlighted. Is
that
possible?