Microsoft 365 [Résolu] VBA - Problème pour rentrer dans une boucle

[Kyirra]

Bonjour tout le monde,

Mon problème aujourd'hui est le suivant,

J'ai créé une fonction (je sais elle est pas belle mais passons) avec pour but de me renvoyer des pourcentages tout fonctionne bien pour la comparaison entre deux variable mais quand je veux le faire avec ma troisième variable la fonction ne rentre même pas dans le si suivant :

'C'est pas propre je sais ! Mais je n'avais pas d'autre solution en tête à ce moment là !

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' PrixForfait '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

MsgBox (prixForfait)
MsgBox (prixForfait2)
MsgBox (prixForfait3)

If prixForfait <> 0 And pixForfait2 <> 0 And prixForfait3 <> 0 Then '000

MsgBox ("TEST ICI LA TERRE")

If prixForfait < prixForfait2 And prixForfait < prixForfait3 Then '00

RECAP.Range("I7") = prixForfait2 / prixForfait - 1
RECAP.Range("O7") = prixForfait3 / prixForfait - 1

End If

If prixForfait < prixForfait2 And prixForfait > prixForfait3 Then '01

RECAP.Range("C7") = prixForfait / prixForfait3 - 1
RECAP.Range("I7") = prixForfait2 / prixForfait3 - 1

End If

If prixForfait > prixForfait2 And prixForfait < prixForfait3 Then '10

RECAP.Range("C7") = prixForfait / prixForfait2 - 1
RECAP.Range("O7") = prixForfait / prixForfait3 - 1

End If

If prixForfait > prixForfait2 And prixForfait > prixForfait3 Then '11

'ne rien faire

End If

End If






Les Msg Box sont juste là pour vérifier que chaque variable détient bien une valeur différente de 0.
mais le message box "test ici la terre" lui ne s'affiche pas. Ca veut dire qu'il ne rentre même pas dans le si.

Je ne comprend vraiment pas, si quelqu'un a une idée. Merci d'avance !

 

[Wayki]

Hello,
Si il rentre pas dedans c'est qu'une condition n'est pas vrai.
Essaie :
If prixForfait <> 0 then
if pixForfait2 <> 0 then
If prixForfait3 <> 0 Then
Msgbox "TEST ICI LA TERRE"
Else
La suite de ton code
End if
End if
End if
A +

 

[Kyirra]

Ca faisait une heure que je tournais en rond en voyant ton code j'ai compris mon erreur, une faute de frappe sur pRixForfait2.
En voyant le code écrit différemment tu m'as apportés la solution merci !