tlc53
Active Member
- Joined
- Jul 26, 2018
- Messages
- 399
Hi there,
I would like an arrow to show if cell H107 does not equal zero.
I'm not even sure if I'm going in the right direction with this VBA code. Can anyone help please?
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("h107") = 0 Then
ActiveSheet.Shapes.Range(Array("Arrow")).Select
Selection.ShapeRange.LineColour.RGB = RGB(0, 0, 0)
End Sub
I was thinking I could have the arrow black if cell H107 does not equal 0 and white (so it can't be seen) if it does equal 0.
Thank you!
I would like an arrow to show if cell H107 does not equal zero.
I'm not even sure if I'm going in the right direction with this VBA code. Can anyone help please?
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("h107") = 0 Then
ActiveSheet.Shapes.Range(Array("Arrow")).Select
Selection.ShapeRange.LineColour.RGB = RGB(0, 0, 0)
End Sub
I was thinking I could have the arrow black if cell H107 does not equal 0 and white (so it can't be seen) if it does equal 0.
Thank you!