You cna use a worksheet change function like the one below

Sub worksheet_change(ByVal target As Range)

If target.Address = "$F$2" Then

Shapes("Line 1").Height = target
End If

End Sub


"MichaelSpy2008" wrote:

Is it possible to automatically resize a shape (eg arrow) based on a value.
If I change a value the shape will automatically change to reflect this.