Formatting from a Function

  • Thread starter Thread starter VALid
  • Start date Start date
V

VALid

Hi,

I wrote that very simple function.... which does NOT work.
Any idea why??? Thanks.

Public Function SetCellColor(ByVal AnIndex As Long)
'Application.Volatile (True)
With Selection.Interior
.ColorIndex = AnIndex
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
SetCellColor = AnIndex
End Function
 
Hi,

I wrote that very simple function.... which does NOT work.
Any idea why??? Thanks.

Public Function SetCellColor(ByVal AnIndex As Long)
'Application.Volatile (True)
With Selection.Interior
.ColorIndex = AnIndex
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
SetCellColor = AnIndex
End Function
Click to expand...

A function can only return a value.

You need to formulate a Sub in order to affect a cell's appearance.


--ron
 
Back
Top