Excel and Macros

[boku]

Im trying to use:

Sub highlite()
 
    If Range("V" & Int(Rnd * "10000")).Select Then
    Rows(Int(Rnd * "10000") & ":" & Int(Rnd * "10000")).Select
    Range("F" & Int(Rnd * "10000")).Activate
    With Selection.Interior
        .ColorIndex = 39
        .Pattern = xlSolid
    End With
    End If
    
End Sub

in excel, to highlight a whole row, if i click on a cell in that row, then if I click on another row, it de-highlits back to how it was originally and highlights the new row! what am I ding wrong and is there a solution?

[Hack]

Excel VBA question moved to Office Development

[Borg2of6]

Try this:

Sub Highlite
  ActiveCell.EntireRow.Select
  With Selection.Interior
     .ColorIndex = 39
     .Pattern = xlSolid
  End With
End sub

If you are trying to highlight rows that are in a certian range (eg rows 15-30)only then try:

Sub Highlite
  If ActiveCell.Row > 15 And ActiveCell.Row < 30 Then
    ActiveCell.EntireRow.Select
    With Selection.Interior
       .ColorIndex = 39
       .Pattern = xlSolid
    End With
  End If
End sub

Hope this helps. If not please advise further and I will try again.

[boku]

That worked fine thanks, i can work it myself from there