Saberexcel - site das macros
Esse procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), cria uma lista suspensa na célula ao clicar na próxima linha em branco na área usada, a lista é inserida devido ao uso da Instrução Sendkeys.
Essa planilha faz parte do Módulo - COMO FAZER - Programação Microsoft Excel VBA_IV
Busca ítens determinadas Colunas(B e C) - Evento SelectionChange - (Wsh) (ao selecionar)
ao clicar na primeira próxima linha vazia na Coluna(B e C) , abre a lista, tb incrementa nomes não existentes à lista suspensa
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If (Target.Column = 2 Or Target.Column = 3) And Target.Count = 1 Then
If Target = "" Then SendKeys "%{down}"
'SendKeys "%{down}"
End If
End Sub
Este exemplo de planilha faz parte das planilhas
COMO FAZER - Programação Microsoft Excel VBA - SaberExcel
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o exemplo de planilha contendo o procedimento acima
Excel vba sendkeys cria lista suspensa selecionar (19.26 KB)
Comentários
Alguém pode me ajudar a modificá-lo para buscar valores em outra aba ?
Agradeço desde já !
Assine o RSS dos comentários