Olá colega!
Isso só com vba.
Um exemplo de código pode ser:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E6:E10")) Is Nothing Then
    Target.Offset(1, 0).Activate
End If
End Sub

Que deve ser incluido no módulo da planilha onde está a lista suspensa e o intervalo E6:E10 deve ser alterado para o intervalo ou célula onde está a sua lista suspensa.

Abraços!

Perfeito!!!