Hello all. First post so excuse the ignorance of formatting. I've searched what I feel would be relevant and haven't found anything conclusive.
I'm looking to have a non active worksheet change border formatting based off of cells on the active sheet.
This is what I have so far. I don't receive any errors but there is not change to the worksheet.
This code is in the object of sheet "Lineup"
I'm looking to have a non active worksheet change border formatting based off of cells on the active sheet.
This is what I have so far. I don't receive any errors but there is not change to the worksheet.
This code is in the object of sheet "Lineup"
VBA Code:
If Not Intersect(Target, Range("R14:GO53")) Is Nothing Then
If Range("P4").Value > 9 Then
With Worksheets("Presentation").Range("P13:AG14")
.Borders.LineStyle = xlContinuous
.BorderAround Weight:=xlMedium
End With
ElseIf Range("P4").Value = 9 Then
With Worksheets("Presentation").Range("P13:AE14")
.Borders.LineStyle = xlContinuous
.BorderAround Weight:=xlMedium
End With
With Worksheets("Presentation").Range("AF13:AG14")
.Borders.LineStyle = xlNone
.BorderAround Weight:=xlNone
ElseIf Range("P4").Value = 8 Then
With Worksheets("Presentation").Range("P13:AC14")
.Borders.LineStyle = xlContinuous
.BorderAround Weight:=xlMedium
End With
With Worksheets("Presentation").Range("AD13:AG14")
.Borders.LineStyle = xlNone
.BorderAround Weight:=xlNone
End With
End If
End If