Coleção 15.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...

 

20.000 Planilhas MS Excel VBA

 20.000 Planilhas Microsoft Excel VBA, treinamentos, busca, pesquisas, desenvolvimento a partir de exemplos prontos, estudos e pratica com planilhas prontas.

SBL Excel VBA Variaveis e subrotina retorna nome idade

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

Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application),MACRO COM VARIAVEIS PARA RETORNAR NOME , SOBRENOME E IDADE. 2 EXEMPLOS -  O primeiro vamos usar uma rotina com argumento e o outro uma simples macro.
'//=============='
Esse exemplo de com macros usando variaveis e subrotina, retorna Nome, SobreNome e Idade
'//=============='
Sub sbx_macro_nome_idade()
Dim Nome1 As String, SobreNome1 As String, Idade1 As Integer
Nome1 = Range("A1")
SobreNome1 = Range("B1")
Idade1 = Range("C1")
'retornar nome, sobrenome e idade (A1,B1,C1)
caixa_dialogo Nome1, SobreNome1, Idade1
End Sub
'//=============='
Private Sub caixa_dialogo(Nome As String, Optional SobreNome, Optional Idade)
If IsMissing(Idade) Then 'Se a variavel Idade estiver ausente..
   If IsMissing(SobreNome) Then 'Se a variavel SobreNome estiver Ausente, ele exibe apenas o Nome
      MsgBox Nome
   Else 'Caso contrário, ele exibe o Nome e sobreNome
      MsgBox Nome & " " & SobreNome
   End If
Else 'Se a variável está presente Idade...
   If IsMissing(SobreNome) Then 'Se a variável é sobreNome estiver ausente, exibe o Nome e Idade
      MsgBox Nome & ", " & Idade & " Anos"
   Else 'Senão exiba o Nome, o sobreNome e Idade
      MsgBox Nome & " " & SobreNome & ", " & Idade & " Anos"
   End If
End If
End Sub
Isso poderia ser feito também de forma simples veja:
'//==============='
Sub sbx_retorna_msg()
Dim s, a, b As String
 s = [a1].Value
 a = [b1].Value
 b = [c1].Value
 MsgBox s & " " & a & ", [ " & b & " ] Anos", vbInformation, "Escola Saberexcel VBA Estudos®"
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:
  

Você está aqui: Home Excel VBA - Dicas Livre Excel VBA - Dicas Livre Excel VBA - Variaveis SBL Excel VBA Variaveis e subrotina retorna nome idade