2009-11-10 5 views
2

Voici un code mathématique qui ajoute A à B:Comment faire la racine carrée dans PowerPoint VBA?

Sub math() 
    A = 23 
    B = 2 
    ABSumTotal = A + B 
    strMsg = "The answer is " & "$" & ABSumTotal & "." 
    MsgBox strMsg 
End Sub 

Mais comment puis-je calculer une racine carrée de ABSumTotal? Est-il possible dans PowerPoint VBA?

+1

Êtes-vous essayer sérieusement de calculer une racine carrée dans les macros PowerPoint/VBA? Pourquoi avez-vous besoin de le faire en premier lieu? (Pas moqueur, juste très curieux.) – Mathias

+0

c'est juste que je veux déplacer certaines formes le long d'une ellipse – brilliant

Répondre

6

Utilisation: Sqr()

strMsg = "The answer is " & "$" & Sqr(ABSumTotal) & "." 
+0

Merci beaucoup! – brilliant

+0

de rien. – CodeMonkey

1

Vous pouvez utiliser pour calculer l'utilisation ^X^(1/2)

Edit: parenthèse ajoutée

+1

Je conseillerais généralement contre^puisque c'est moins lisible. – CodeMonkey

+0

J'ai mal lu la question et j'ai répondu pour racine cubique et fait une correction après. Mais je ne pense pas que x^1/2 soit moins lisible que sqr (x) ce qui me semble être carré :) –

+0

L'exponentiation n'a-t-elle pas préséance sur la division? Si oui, vous auriez besoin de x^(1/2). –

Questions connexes