Sub シートのフィルターをオフに変更する()
    
    '現在のフィルター設定状況に関わらずオフ
    ActiveSheet.AutoFilterMode = False
    
End Sub