Dim Hair As Object
Set Hair = Nothing