An image appears when a cell is selected
 

Im doing something that I thing there are somehow easier and functional
If I make a validation (List Validation) when I get into the cell appears a
little button with a little row pointing down, now, I want when I select a
cell, the same button appears, but with a different image and the macro
should apply an autofilter, I mean:

sub filterF()
ActiveSheet.Range("A1", Range("A65535").End(xlUp)).EntireRow.Select
Selection.Sort Key1:=Range("F2"), Order1:=xlAscending, Header:= _
True, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("a2").Select
End Sub

If this possible
Pd. I know its easier to apply just the autofilter but, I want to know if
this is possible and how to accomplish it

TIA