Excel planilha vba celulas chama macro a selecionar celulas

Qui, 18 de Novembro de 2010 20:20 Expedito Marcondes
Imprimir

Saberexcel - O Site das Macros Microsoft Excel VBA

Esse procediemento e macros do Aplicativo Microsoft Excel VBA, chamam uma determinada macro quando seleciona uma célula específica na folha de planilha, observe que o evento selection change foi usado, (ao selecionar)


Private Sub Worksheet_SelectionChange
(ByVal Target As Range)
If ActiveCell.Address() = "$D$12" Then Minha_Macro1
If ActiveCell.Address() = "$D$15" Then Minha_Macro2
If ActiveCell.Address() = "$D$18" Then Minha_Macro3
If ActiveCell.Address() = "$I$12" Then ver_codigo
If ActiveCell.Address() = "$K$2" Then ocultar_codigo
End Sub

Sub Minha_Macro1()
MsgBox ("Esta macro chama a Macro Minha_Macro1"), vbInformation, "Saberexcel.com - Minha_Macro1"
End Sub

Sub Minha_Macro2()
MsgBox "Esta celula chama a macro Minha_Macro2!", vbExclamation, "Excel VBA Estudos® - Minha_Macro2"
End Sub

Sub Minha_Macro3()
MsgBox "Minha_Macro3 é chamada ao selecionar a celula C18", vbInformation, "Saberexcel.com - Minha_Macro3"
End Sub

Sub ver_codigo()
Sheets("Plan1").Shapes("cod").Visible = True
End Sub

Sub ocultar_codigo()
If Sheets("Plan1").Shapes("cod").Visible = False Then
MsgBox "Shapes oculto - tem que torná-lo visível primeiro!", vbCritical, "Saberexcel.com"
Else
Sheets("Plan1").Shapes("cod").Visible = False
End If
End Sub



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 procedimento e macros acima
Excel planilha vba celulas chama macro a selecionar celulas (78.77 kB)




Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Tags:
Última atualização em Qua, 10 de Agosto de 2011 08:16