consegui uma solução para meu caso, é só chamar a animação no
codebehind:
If btnMn.Content = "+" Then
Dim myStoryboard As Storyboard = DirectCast(FindResource("EntrarMnLateral"), Storyboard)
myStoryboard.Begin()
btnMn.Content = "-"
ElseIf btnMn.Content = "-" Then
Dim myStoryboard As Storyboard = DirectCast(FindResource("SairMnLateral"), Storyboard)
myStoryboard.Begin()
btnMn.Content = "+"
End If