OVH Cloud OVH Cloud

Formule dans VBA

4 réponses
Avatar
JOJO
Bonjour.

Quelle la commande ou la syntaxe pour utliser une formule exel dans VBA.
je crois que çà marche qu'en anglais ?
Où peut-on trouver la traduction des commandes de formules?

Merci.

4 réponses

Avatar
Pierre Fauconnier
Bonjour

Application.WorksheetFunction. suivi du nom de la fonction ( en anglais )
que tu souhaites utiliser

Cela convient-il?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci



"JOJO" a écrit dans le message de
news:
Bonjour.

Quelle la commande ou la syntaxe pour utliser une formule exel dans VBA.
je crois que çà marche qu'en anglais ?
Où peut-on trouver la traduction des commandes de formules?

Merci.


Avatar
Christophe JEAN
Sinon si tu as encore Excel 97 ou 2000, dans le dossier Office, il y a un
classeur excel intitulé ListeVBA.xls. Il contient trois feuilles. C'est la
troisième feuille qui te donne les correspondance entre fonction française
et leur version US

A+

Bonjour.

Quelle la commande ou la syntaxe pour utliser une formule exel dans VBA.
je crois que çà marche qu'en anglais ?
Où peut-on trouver la traduction des commandes de formules?

Merci.


Avatar
Jacky
Il y a aussi

http://www.excelabo.net/moteurs/compteclic.php?nom=av-traducfonctions

Salutations
JJ

"JOJO" a écrit dans le message de
news:
Bonjour.

Quelle la commande ou la syntaxe pour utliser une formule exel dans VBA.
je crois que çà marche qu'en anglais ?
Où peut-on trouver la traduction des commandes de formules?

Merci.


Avatar
docm
Bonjour JoJo

'--------------------------
'Tiré du site de frédéric S.:
'Comment faire des calculs dans VBA en utilisant les fonctions d'Excel

Sub EquivalentAnglaisDuneFormule()
Set reference = Cells(1, 4)
FormuleEquivalenteEnAnglais = LireFormule(reference, 2)
Debug.Print vbNewLine; "Formule:"
Debug.Print FormuleEquivalenteEnAnglais
MsgBox FormuleEquivalenteEnAnglais

b = InStr(FormuleEquivalenteEnAnglais, "=")
EquivalentAnglaisEnVBA = Mid(FormuleEquivalenteEnAnglais, b + 1)

Debug.Print "VBA:"
Debug.Print "? Application.Evaluate(" & Chr(34) & EquivalentAnglaisEnVBA &
Chr(34) & ")"

EquivalentAnglaisAvecCrochets = "[" & EquivalentAnglaisEnVBA & "]"

Debug.Print "? "; EquivalentAnglaisAvecCrochets

End Sub
Function LireFormule(reference, param)
' Modeste, mpfe
Select Case param
Case 1 ' --------formule en langue locale
If reference.HasArray Then
LireFormule = "{" & reference.FormulaLocal & "}"
Else
LireFormule = " " & reference.FormulaLocal
End If
Case 2 ' --------formule en langue US
If reference.HasArray Then
LireFormule = "{" & reference.Formula & "}"
Else
LireFormule = " " & reference.Formula
End If
Case 3 '-formule en langue locale notation ligne-colonne
If reference.HasArray Then
LireFormule = "{" & reference.FormulaR1C1Local & "}"
Else
LireFormule = " " & reference.FormulaR1C1Local
End If
Case 4 ' --formule en langue US notation ligne-colonne
If reference.HasArray Then
LireFormule = "{" & reference.FormulaR1C1 & "}"
Else
LireFormule = " " & reference.FormulaR1C1
End If
Case Else
End Select
End Function


"JOJO" wrote in message
news:
Bonjour.

Quelle la commande ou la syntaxe pour utliser une formule exel dans VBA.
je crois que çà marche qu'en anglais ?
Où peut-on trouver la traduction des commandes de formules?

Merci.