O erro que aparece é "Erro de compilação: Era esperada variável ou procedimento, não módulo". Eu fiz exatamente como o exemplo do vídeo da aula.
Private Sub cmdFiltrar_Click()
Sheets("Base Filtrada").Select
FiltrarBase
Sheets("Dashboard").Select
End Sub