Déclaration existante dans la portée en cours

FeiWang - 20 juin 2018 à 16:28 - Dernière réponse : Patrice33740 7319 Messages postés dimanche 13 juin 2010Date d'inscription 17 octobre 2018 Dernière intervention
- 21 juin 2018 à 13:36
Bonjour,
j'ai fait un fonction Cmix les codes sont comme les suivantes.
Je sais pas pourquoi il y eu une erreur toujour

"erreur de compilation : déclaration existante dans la portée en cours"

Quelqu'un conait pourquoi?

Merci de votre aide.

Function Cmix(a, b, c, d, Frac_V, W_tot, D_int)

Dim a As Double
Dim b As Double
Dim c As Double
Dim d As Double
Dim Frac_V As Double
Dim W_tot As Double
Dim D_int As Double

D_int = D_int / 1000

x = Max(0.00316, a / b * (c / d) ^ 0.5)

y = (1 - (0.16 * (2.5 + Log(x)) ^ 2)) ^ 3


Gtot = W_tot / (3.14 / 4 * D_int ^ 2)

If Gtot < 300 Then
Cf = 300 + (300 - Gtot) ^ 2 / 40
Else
Cf = Gtot
End If

C1 = 2 + (32 * y) / (1 + 0.005664 * Cf ^ 0.8)


C2 = (b / a) ^ 0.5 + (a / b) ^ 0.5


rauH = b * a / (Frac_V * b + (1 - Frac_V) * a)
C3 = (rauH / a) ^ 0.5 * (b / a) ^ 0.125

If C1 > C2 Then
    C0 = C1
ElseIf C1 > C3 Then
    C0 = C1
ElseIf C1 < C3 Then

    If C3 > C2 Then
    C0 = C2
    ElseIf C3 < C2 Then
    C0 = C3
    End If
End If

Cmix = 2 * C0

End Function


EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.
Afficher la suite 

Votre réponse

3 réponses

NHenry 14274 Messages postés vendredi 14 mars 2003Date d'inscriptionModérateurStatut 18 octobre 2018 Dernière intervention - 20 juin 2018 à 18:05
0
Merci
Tu redéclare tes paramètres en tant que variable locale, donc 2 déclaration pour chaque.
Meric à votre réponse. En fait je n'ai pas compris votre phrase.

J'ai fait que une déclaration dans la fonction. Comment je peux avoir 2 déclaration pour chaque?
Patrice33740 7319 Messages postés dimanche 13 juin 2010Date d'inscription 17 octobre 2018 Dernière intervention - 21 juin 2018 à 13:36
Bonjour,

Regardes cet excellent cours VBA pour débutant, page 29 :
ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf
Commenter la réponse de NHenry

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.