Setting bkcolor on active cell when left mouse doubleclikked

  • Thread starter Thread starter Jan Eikeland
  • Start date Start date
J

Jan Eikeland

Environment Office97 excel.

Hi, trying to set backgroundcolor of the cell which beeing doublecliked

With Worksheets("Rodeuker").ActiveCell.Interior.Color = RGB(255, 0, 0)

This doesnt work and I cant figure out, cause cant find anything in
help-file for visual basic part of excel.

Thank You
regards jan
 
Did this with Macro Recorder:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End Sub
 
thanks , that worked, I must try the macro and watch the code comes out of
it.
reg jan
 
Target provides a reference to the cell being doubleclicked. It would be
better to use that rather than depend on selection:

Private Sub Worksheet_BeforeDoubleClick( _
ByVal Target As Range, Cancel As Boolean)
Target.ColorIndex = 3
' or
' target.Interior.Color = RGB(255, 0, 0)
End Sub
 
Back
Top