Lista Suspensa

2024 - VBA & Macros

Post Recente por xandao6 8 anos atrás

3 Posts

2 Usuários

0 Reactions

1,022 Visualizações

RSS

xandao6

(@xandao6)

Posts: 20

Eminent Member

Topic starter

Tenho Listas Suspensas que estão me dando uma dor de cabeça;

Preciso que a Célula com a lista suspensa perca o foco quando algum texto for escolhido.

Acho que isso já ira resolver, caso não, avisarei.

(Tentei criar uma planilha de exemplo mas o erro não se repetiu o.O...)

Postado : 27/08/2016 5:57 pm

Issamu

(@issamu)

Posts: 605

Honorable Member

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!

Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
http://zip.net/bjrt0X - http://zip.net/bhrvbR
Foi útil? Clique na mãozinha
Conheça: http://excelmaniacos.com/