Hello,

I've created a button, using "Shapes" in Excel, with macros which will move it from "Pending" to "Completed" and back(and it works). However, I would like to also have the option to move it to "All" to show both "Pending" and "Completed" rows but I can't figure it out. Would anyone be able to assist me? Thank you in advance! This is what I have to move the button so far:

Sub MoveBtn()
With Sheet1
If .Range("B1").Value = "Pending" Then
.Shapes("MoveBtn").IncrementLeft 103
.Range("B1").Value = "Completed"
Else
.Shapes("MoveBtn").IncrementLeft -103
.Range("B1").Value = "Pending"

End If

End With

End Sub