Discussion :

[mulanzia2003]

Bonjour,
cela fait suite à mon post concernant le textbox.
Mon problème :
J'ai un tableau
| MATE | MATM | MATC |
Janvier | 1800 | 1200 | 600 |
Février | 1200 | 1000 | 900 |
Mars | 1300 | 1400 | 200 |

Je souhaite récupérer les valeurs dans une textbox1 qui correspond à la valeur croisé entre Le Mois (Janvier, Février,...) pris dans la combobox1 et ensuite la rubrique (MATE, MATC,...) pris dans la combobox2.

Celui qui a un code pour cela ou un petit bout qui permet de mettre une valeur dans un textbox, je suis preneur!!!

Merci !!!

[ouskel'n'or]

Tu fais deux find, le premier sur le mois
Le mois trouvé, tu as le N° de ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NoLigne = activecell.row

le second sur l'entête
L'entête trouvée, tu as la colonne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NoColonne = activecell.column

La rencontre des deux

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ValeurCherchée = Cells(NoLigne, NoColonne).value

A+

[mulanzia2003]

J'ai presque fait la même chose.
F8 reçoit la valeur de ma combobox1
F7 reçoit la valeur de ma combobox1
J'ai fait un tableau croisé dynamique de mon tableau original et ensuite

En F10, j'ai mis la formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"=LIREDONNEESTABCROISDYNAMIQUE("Somme de "&F7;$A$3;"Mois";F8)"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Private Sub ComboBox1_Change()
Worksheets("Feuil4").Select
[F8] = Budget.ComboBox1.Value
End Sub
 
Private Sub ComboBox2_Change()
If Budget.ComboBox1.Value = "" Then
    MsgBox ("Veuillez renseigner d'abord le mois de la saisie")
    Budget.ComboBox2.Value = ""
    Else
        Worksheets("Feuil4").Select
        [F7] = Budget.ComboBox2.Value
            If Budget.ComboBox2.Value <> "" And Budget.ComboBox1.Value <> "" Then
                Budget.TextBox2.Value = Worksheets("Feuil4").Range("F10").Value
            End If
End If
End Sub

Je vais essayé avec ton code et je mettrai un petit mot !!!

Merci