Excel planilha vba macros calcula area do circulo

Sáb, 23 de Julho de 2011 19:36 Expedito Marcondes
Imprimir

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

Essa função e macro do Aplicativo Microsoft Excel VBA, retornam o área do círculo, a o macro abaixo chama a função Area_do_Circulo,
observe que na céula usei a formula  =Area_do_circulo(12,34) , retornam o valor (Area do círculo = 119,5969)

 
Function Area_do_circulo(Diametro As Double) As Double
Area_do_circulo = 0.25 * Application.Pi() * Diametro ^ 2
End Function


Sub retornando_funcao_area_do_circulo()
Dim sba, sb  As Variant
sb = "Saberexcel - o site das macros"
sba = vbInformation

sbx = Area_do_circulo([A1].Value)
MsgBox "Area do círculo de um diâmetro medindo [ " & [A1].Value & " ] é..: [ " & sbx & " ]", sba, sb
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 o macro e função acima
Excel planilha vba macros calcula area do circulo (21.5 KB)

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