Plusieurs conditions pour valeurs textbox

folls

XLDnaute Junior
Bonjour à tout le forum,
J'ai un petit soucis depuis quelques jours et malgrés mes recherches deans le forum je n'arrive pas à trouver mon erreur (je débute)
Je désire si trois conditions sont remplies dans mes textbox12, 13 et 14 par apport à des valeurs se situant sur la feuille "données" dans les cellules respective a2,a15,a28... pour textbox12; a3,a16,a29... pour textbox13 et b3,b16,b29... pour textbox14 (les données de la feuille vont jusqu'à "a378").
Si par exemple textbox12 = a2 , textbox13 = a3 et textbox14 = b3 alors
Textbox1 = b4 ;Textbox2 = b5 ;...;Textbox11 = b15 (11textbox de destination).
Je ne sais pas si j'ai été clair dans mes excplications!!
Pour l'instant j'ai écrit (et réécrit!) ceci que pour une condition mais déjà çà bloque. Je suppose qu'il faut écrire à chaque fois toutes les conditions pour chaque solution!

Private Sub UserForm_Initialize()
Dim i As Integer
For i = 1 To 11
If TextBox12.Value = Sheets("Tableau").Range("a2").Value Then

If TextBox13.Value = Sheets("Tableau").Range("a3").Value Then
If TextBox14.Value = Sheets("Tableau").Range("b3").Value Then

Me.Controls(TextBox & i).Value = Sheets("tableau").Range("b4" & i).Value
i = i + 1
End If
End If
End If
Next
End Sub

Merci par avace à vous tous pour votre aide.
Folls...
 

skoobi

XLDnaute Barbatruc
Re : Plusieurs conditions pour valeurs textbox

Re bonjour,

Par contre pourrais tu me dire comment on peut voir le problème de date et de valeur (celà m'interresserait de savoir au cas où je parviens à élaborer un projet plus simple!!)?

Dans VBE se trouve une "marge" à gauche de la fenêtre de saisie des macros.
Dans cette marge, tu peux y mettre des "stop" (point rouge) en cliquant dedans avec la souris.
Cela permet de stopper la macro à cet endroit précis lorsque tu la lanceras. Pourquoi? Car tu peux continuer la macro en "pas à pas" (touche F8) et "voir" la valeur d'une variable de 2 facons:
1- en placant le curseur dessus.
2- en copiant collant dans la fenêtre d'exécution se que tu veux analyser.
Exemple sur le soucis que tu avais:
écrit dans la fenêtre d'exécution ceci:

?Détail.TextBox14.Text

puis appuie sur entrée.
Celà affichera juste en-dessous la valeur pour le textbox14.

idem pour

?Sheets("Tableau").Range("b" & j - 11).Value

Ne pas oublier le "?".

Quand tu auras fini les analyses tu pourras enlever le "stop".

Mais comme tu le dis si bien "il doit y avoir moyen de faire beaucoup plus simple!". Malheureusement mes connaissances ne me permettent pas pour l'instant de faire alors je fais ce que je peux (avec l'aide des Forums et de "Skooby"!).

2 suggestions. Tu peux créer les pays et les années dans une liste de choix (combobox), cela évitera tous ces boutons actuels.
Regarde aussi si tu ne pourrais pas mettre 2 USF ou plus dans un seul (séparer par un cadre "Frame" par exemple).
 

folls

XLDnaute Junior
Re : Plusieurs conditions pour valeurs textbox

Re,
Merci Skooby de tes réponses instructives et je vais suivre tes conseils à la lettre car avec tout ce que je voulais faire, celà serait non plus une "usine à gaz" mais une véritable "centrale nucléaire".
Encore merci pour tout
@+ !!
Folls...
 

Discussions similaires

Réponses
11
Affichages
343
Réponses
4
Affichages
231

Statistiques des forums

Discussions
312 428
Messages
2 088 319
Membres
103 812
dernier inscrit
mehdifr