Edit Existing VBA code

[mduntley]

I got a VBA code that I got on the interweb (being funny, I know its internet). I want to have it select only Columns A:BE.

I'm also wondering if it's possible to select a range of cells, such as 7:9, and have the entire row highlighted?

 

[Logit]

Posting your code would help with getting you assistance.

 

[mduntley]

Opps, I forgot to do that. My bad, but I did use ChatGPT and I got it to work. The code is this

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.ScreenUpdating = False

    ' Check if the selection intersects with columns A to BE
    If Not Intersect(Target, Range("A:BE")) Is Nothing Then
        ' Clear the color of all cells in columns A to BE except for row 1
        Range("A2:BE" & Rows.Count).Interior.ColorIndex = 0
        
        ' Highlight the selected rows within the range A to BE, if not selecting row 1
        If Intersect(Target, Rows(1)) Is Nothing Then
            Range("A" & Target.Row & ":BE" & Target.Row + Target.Rows.Count - 1).Interior.ColorIndex = 8
        End If
    End If

    Application.ScreenUpdating = True
End Sub