Why not just use code associated with the spinner?

transferxxx wrote:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target = Cells(1, 1) Then Filternonblank
End Sub

The above macro does not work when changing cell A1 value with a spinner
button
Can anybody help pls

--

Dave Peterson