mathieu.cxp
XLDnaute Nouveau
Salut à tous.
Je viens vers vous car j'ai un soucis de traduction d'une formule sous forme de macro, et je vois pas comment faire.
Je vous explique, j'ai la formule suivante :
Et j'ai transtormé ça comme ceci :
J'ai des erreurs dans tous les sens (j'ai essayé de modifier la structure de mon code, mais -> choux blanc
Pourriez vous m'aider ????
D'avance merci.
Autre Problème que je rencontre : Je souhaiterai faire une userform avec un outil de recherche intégré.
J'ai une liste de 200 applications (colone A) et un code équivalent à l'application (colone B)
J'ai créé une liste dans ma userform qui permet de sélectionner l'application voulue, et de retourner le code équivalent (aucun soucis pour faire ça grâce à vous ).
Maintenant, ce que je souhaiterai faire :
Dans ma userform, avoir un textBox, servant de champ de recherche.
Quand je tappe un mot dedans, que la liste déroulante ne propose plus que les applications contenant ce ou même CES mots
Et toujours, que quand je sélectionne mon application dans cette liste déroulante dynamique, mon code équivalent soit retourné
Si vous avez besoin d'un fichier pour démarrer, n'hésitez pas à me le faire savoir
Merci d'avance à tous ceux qui voudront bien se pencher sur mon problème.
Bonne Journée.
Je viens vers vous car j'ai un soucis de traduction d'une formule sous forme de macro, et je vois pas comment faire.
Je vous explique, j'ai la formule suivante :
Code:
=SI(Q2="OK";SI(E2="NOT EU";SI(Z2<>"WON";0;SI(O2="USD";P2*PARAMETERS!$A$15;P2));0);0)
Et j'ai transtormé ça comme ceci :
Code:
Dim QUOTE_WON_NOTEU As Integer
If ("Q" & derligne) = "OK" Then
If ("E" & derligne) = "NOT EU" Then
If ("Z" & derligne) <> "WON" Then
QUOTE_WON_NOTEU = 0
Else
If ("o" & derligne) = "USD" Then
QUOTE_WON_NOTEU = Range("P" & derligne).Value * Sheet("PARAMETERS").Range(A15).Value
Else
QUOTE_WON_NOTEU = Range("P" & derligne).Value
End If
End If
Else
QUOTE_WON_NOTEU = 0
End If
Else
QUOTE_WON_NOTEU = 0
End If
Range ("a" & derligne).Value = QUOTE_WON_NOTEU
J'ai des erreurs dans tous les sens (j'ai essayé de modifier la structure de mon code, mais -> choux blanc
Pourriez vous m'aider ????
D'avance merci.
Autre Problème que je rencontre : Je souhaiterai faire une userform avec un outil de recherche intégré.
J'ai une liste de 200 applications (colone A) et un code équivalent à l'application (colone B)
J'ai créé une liste dans ma userform qui permet de sélectionner l'application voulue, et de retourner le code équivalent (aucun soucis pour faire ça grâce à vous ).
Maintenant, ce que je souhaiterai faire :
Dans ma userform, avoir un textBox, servant de champ de recherche.
Quand je tappe un mot dedans, que la liste déroulante ne propose plus que les applications contenant ce ou même CES mots
Et toujours, que quand je sélectionne mon application dans cette liste déroulante dynamique, mon code équivalent soit retourné
Si vous avez besoin d'un fichier pour démarrer, n'hésitez pas à me le faire savoir
Merci d'avance à tous ceux qui voudront bien se pencher sur mon problème.
Bonne Journée.