Saberexcel - site das macros

Funções e Macros do Aplicativo microsoft soft Excel, chama procedimentos e argumentos veja os exemplos abaixo

 Chamando procedimentos Sub e Function

Para chamar um procedimento Sub de outro procedimento, digite o nome do procedimento e inclua valores para quaisquer argumentos obrigatórios. A instrução Call não é obrigatória, mas, caso seja utilizada, quaisquer argumentos devem ser colocados entre parênteses.

Você pode utilizar um procedimento Sub para organizar outros procedimentos, facilitando a compreensão e a depuração dos mesmos. No exemplo a seguir, o procedimento Sub Main chama o procedimento Sub MultiBeep, passando o valor 56 para o seu argumento. Depois que o MultiBeep for executado, o controle retornará para o procedimento Main, que por sua vez chamará o procedimento Sub Message. Message exibe uma caixa de mensagem; quando o usuário clicar em OK, o controle retornará para Main, que encerrará a execução.

Sub Principal()
MultiBeep 56
Message
End Sub

Sub MultiBeep(numbeeps)
For counter = 1 To numbeeps
Beep
Next counter
End Sub

Sub Message()
MsgBox "Pausa para o café!"
End Sub

Chamando procedimentos Sub com mais de um argumento

O exemplo a seguir mostra duas formas de se chamar um procedimento Sub com mais de um argumento. Na segunda vez em que Calcula_Aquisicao for chamado, será necessário colocar os argumentos entre parênteses porque a instrução Call é utilizada.

Sub Calculando_valor()
Calcula_Aquisicao 99.800, 43.100
Call Calcula_Aquisicao(38.0950, 49.500) 'chamando o procedimento (instrução Call)
End Sub

Sub Calcula_Aquisicao (preco As Single, salario As Single)
If 2,5 * salario <= 0,8 * preco Then
MsgBox "Você não tem dinheiro para comprar esta casa."
Else
MsgBox "Você tem dinheiro para comprar esta casa."
End If
End Sub

Utilizando parênteses ao chamar procedimentos Function

Para utilizar o valor de retorno de uma função, atribua a função a uma variável e coloque os argumentos entre parênteses, como mostra o exemplo a seguir.

Cuidado Caso você inclua parênteses no exemplo acima, a instrução provocará um erro de sintaxe.

Passando argumentos nomeados

Uma instrução em um procedimento Sub ou Function pode passar valores para os procedimentos chamados usando argumentos nomeados. Você pode listar argumentos nomeados em qualquer ordem. Um argumento nomeado consiste no nome do argumento, seguido por dois-pontos e um sinal de igualdade (:=), e o valor atribuído ao argumento.

O exemplo a seguir chama a função MsgBox utilizando argumentos nomeados sem valor de retorno.

O exemplo a seguir chama a função MsgBox usando argumentos nomeados. O valor de retorno é atribuído à variável resposta3.

Sub visualizar_macros_vbe()
Dim Resposta As String
Resposta = MsgBox("Você está satisfeito com o seu salário?", vbYesNo, "Saberexcel - o site das macros")
If Resposta17 = 6 Then '6 = vbyes
MsgBox ("Ainda bem, voce é um ótimo funcionário"), vbInformation, "Saberexcel - site das macros"
Else
MsgBox ("Pense bem em tornar isso público, tem 8.974.887.76 pessoas quendo sua vaga"), vbCritical, "saberexcel - site das macros"
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

Saberexcel - o site das macros Essas macros do Aplicativo Microsoft Excel VBA, chamam determinadas macros atribuidos a botões na folha de planilha. Option Explicit Sub Chama_Botao() Run Application.Caller End Sub Sub Macro1() MsgBox "Botao 1", vbInformation, "Excel VBA Estudos®" End Sub Sub Macro2() MsgBox "Botao 2", vbInformation, "Excel VBA Estudos®" End Sub Sub Macro3() MsgBox "Botao 3", vbInformation, "Excel VBA Estudos®" End Sub Sub Macro4() MsgBox "Botao 4", vbInformation, "Excel VBA Estudos®" End Sub Sub Macro5() MsgBox "Botao 5", vbInformation, "Excel VBA Estudos®" End Sub Sub ver() Sheets("Saber1").Shapes("xx").Visible = True End Sub Sub ocultar() Sheets("Saber1").Shapes("xx").Visible = False End Sub Referência sobre o desenvolvedor do Excel

Application.Propriedade Caller

Retorna informações sobre como o Visual Basic foi chamado (para obter mais informações, consulte a seção Comentários).

Sintaxe

expressão.Caller(Index)

expressão Uma variável que representa um objeto Application.

Parâmetros

Comentários

Essa propriedade retorna informações sobre como o Visual Basic foi chamado, como mostrado na tabela seguinte.

Exemplo

Este exemplo exibe informações sobre como o Visual Basic foi chamado.

Select Case TypeName(Application.Caller)
Case "Range"
v = Application.Caller.Address
Case "String"
v = Application.Caller
Case "Error"
v = "Error"
Case Else
v = "unknown"
End Select
MsgBox "caller = " & v

Aprenda tudo sobre Microsoft Excel VBA com SaberExcel

Saberexcel - o site das macros
Aqui voce poderá baixar um pequeno e simples tutorial desenvolvido no próprio Microsoft Excel com macros que manipulam shapes(autoformas) que você poderá visualizar através de imagens como ligar uma determinada macro a uma folha de planilha usando uma autoforma(retângulo, circulo...qualquer uma). Baixe a planilha(tutorial exemplo) no final da página.
Espero que lhe seja útil, Fique com Deus, Boa Sorte. E_Marcondes








Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Saberexcel - o site das macros
Um pequeno tutorial feito no Word para quem não sabe como criar uma macro no Aplicativo MS Excel, esse foi feito a partir do excel 2003, mas o princípio é o mesmo, mas logo farei outro no excel 2007 e 2010, para ajudar a quem precisar.



Aprenda Microsoft Excel VBA com Saberexcel

Saberexcel - o site de quem precisa Aprender Macros Microsoft Excel VBA

Um pequeno tutorial feito no Word para quem não sabe como criar uma macro no Aplicativo MS Excel, esse foi feito a partir do excel 2003, mas o princípio é o mesmo, mas logo farei outro no excel 2007 e 2010, para ajudar a quem precise.



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel







Publicidade
Compre com segurança, garantia e ótimos preços