Thanks, it solved the problem by including the this code onto it. it has cleared the previous results & shown the current results
Range("F10:H1000").Cells.ClearContents

the code i used is

Private Sub CommandButton1_Click()
Range("F10:H1000").Cells.ClearContents

Application.ScreenUpdating = False
With Cells(1).CurrentRegion
.AutoFilter 1, "*" & [H2] & "*": .AutoFilter 2, "*" & [H3] & "*"
.Offset(1).Resize(.Rows.Count - 1).SpecialCells(12).Copy [F10]
.AutoFilter
End With
Application.ScreenUpdating = True
End Sub