Home Excel - Dicas Microsoft Excel VBA Excel VBA - Operadores matematicos Excel planilha vba operacoes matematica com variaveis e resultados

Excel planilha vba operacoes matematica com variaveis e resultados

E-mail Imprimir PDF

Saberexcel - o site das macros

Macro do Aplicativo Microsoft Excel VBA, retornam valores baseados em operadores matemáticos.
Os valores retornados são baseados em valores contidos nas células [A1] e [A2] 

Sub resultado_Operacoes()
Dim num1 As Integer
Dim num2 As Integer
Dim resposta1, resposta2, resposta3, resposta4, resposta5, resposta6 As String

num1 = Range("A1").Value
num2 = Range("A2").Value

limpar

resposta1 = num1 + num2 '  o resultado é soma A1+A2
resposta2 = num1 - num2 '   o resultado é subtração A2-A2
resposta3 = num1 * num2 '  o resultado é multiplicação A1*A2
resposta4 = num1 / num2 '  o resultado é divisão A1/A2
resposta5 = num1 ^ Range("a1").Value '  o resultado é raiz quadrada de A1
resposta6 = Range("A2").Value ^ num2 ' o resultado é potencia de A2

'aqui vamos retornar mensagem do resultado das operações matemática, porém, vamos concatenar valores e textos.

MsgBox "resposta da soma é : " & [A1] & " + " & [A2] & " =" & " [ " & resposta1 & " ]", vbInformation, "Saberexcel.com"
Range("C1") = "resposta da soma é.....:" & resposta1

MsgBox "resposta da subtração de : " & [A1] & " - " & [A2] & " =" & " [ " & resposta2 & " ]", vbInformation, "Saberexcel.com"
Range("C2") = "resposta da subtração é: " & resposta2

MsgBox "resposta da multiplicação de : " & [A1] & " x " & [A2] & " =" & " [ " & resposta3 & " ]", vbInformation, "Saberexcel.com"
Range("C3") = "resposta da multiplicação é: " & resposta3

MsgBox "resposta da subtração de : " & [A1] & " : " & [A2] & " =" & " [ " & resposta4 & " ]", vbInformation, "Saberexcel.com"
Range("C4") = "resposta da divisão é: " & resposta4

MsgBox "resposta do quadrado de : [" & [A1] & "  " & [A2] & "]² =" & " [ " & resposta5 & " ]", vbInformation, "Saberexcel.com"
Range("C5") = "resposta do quadrado é: " & resposta5

MsgBox "resposta da Potencia de :  [ " & [A1] & "  " & [A2] & "]  =" & " [ " & resposta6 & " ]", vbInformation, "Saberexcel.com"
Range("C6") = "resposta da potência de A2 é: " & resposta6

End Sub

Sub limpar()
Range("C1:C10").ClearContents
End Sub




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




  Baixe o exemplo de planilha contendo as macros acima
Excel planilha vba operacoes matematicas com variaveis e resultados (21.63 kb)

Última atualização em Dom, 14 de Agosto de 2011 12:43  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

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


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA