Coleção 25.000 Macros MS Excel VBA

   Mega_Colecao Macros de Macros MS Excel VBA
      

Curso Completo MS Excel VBA

Excel VBA Video Aulas

 Aprenda Excel VBA - SaberExcel VBA - Video Aulas       
Com Simplicidade e Facilidade,
Escrevendo menos e fazendo mais
Linha de raciocínio de fácil entendimento...

 

35.000 Planilhas MS Excel VBA

 35.000 Planilhas Microsoft Excel VBA, treinamentos, busca, pesquisas, desenvolvimento a partir de exemplos prontos, estudos e pratica com planilhas prontas.
Comprar - Aquisição direto no PagSeguro

Excel VBA VD lista suspensa adiciona ou deleta na celula

Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções

Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application),

Procedimento ligado ao Evento Worksheet_Change(), ligados a folha de planilha, é sensibilizado quando alterar a célula C2, Há uma lista suspensa, que adiciona caso ainda não exista na lista, ou deleta caso já exista. Bons estudos. Fique com Deus Expedito Marcondes.

'//=============='
Procedimento ligado ao Evento Worksheet_Change(), ligados a folha de planilha, é sensibilizado quando alterar a célula C2,Há uma lista suspensa, que adiciona caso ainda não exista na lista, ou deleta caso já exista. Bons estudos. Fique com Deus Expedito Marcondes.
'//=============='

 

Private Sub Worksheet_Change(ByVal Target As Range)

 If Target.Address = "$C$2" And Target.Count = 1 Then

    Application.EnableEvents = False

    valDIGITADO = Target

    Application.Undo

    p = InStr(Target, valDIGITADO)

    If p > 0 Then

      Target = Left(Target, p - 1) & Mid(Target, p + Len(valDIGITADO) + 1)

      If Right(Target, 1) = ":" Then

        Target = Left(Target, Len(Target) - 1)

      End If

    Else

        If Target = "" Then

           Target = valDIGITADO

        Else

           Target = Target & ":" & valDIGITADO

           Columns("C").AutoFit

        End If

    End If

    Application.EnableEvents = True

 End If

End Sub

 


Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.




 u - Procedimentos de Aquisição dos produtos Didáticos SaberExcel
 Baixe o exemplo de planilha contendo os macros acima:
acesse o Servidor    membros.saberexcel.com.br

 

Você está aqui: Home Planilhas Inteligentes SBI Excel VBA - Planilhas Inteligentes SBI Excel VBA - Validacao de Dados Excel VBA VD lista suspensa adiciona ou deleta na celula