Youssef Boubaddara
XLDnaute Nouveau
Bonjour tout le monde,
Je suis débutant au VBA, je suis entrain de crée un Userform sous Excel2010, mon problème est le suivant:
1- J'ai un tableau Excel très long horizontal, leur contenu est comme suivant:
- Les dates: dans la ligne N°7 du tableau excel, (du 1er janvier 2013 jusqu'à 30 décembre 2013).
- Les pourcentages: dans la ligne N°8 du tableau excel.
- Chaque date correspond à un pourcentage.
2- Sur mon Userform j'ai:
- un combobox (combodates) rempli par les dates.
- un textbox (textpourcentage).
J'ai besoin de votre aides: lorsque je choisi une date sur mon combobox, dans le textbox s'affiche le pourcentage correspond de la date sur le tableau excel.
N.B: J'ai réussi de remplir mon combobox, seulement j'ai le problème de synchroniser entre combobox et textbox sachant que mes données (%) dans le tableau sont horizontal et aussi que très long.
Vous trouverez ci-dessous le code que j'ai utilisé:
Private Sub ComboDate_Change()
Set od = Sheets("Diary Tracking General") 'définit l'onglet od
Me.Textbox.Value = Format(od.Cells(Me.ComboDate.ListIndex + 8, 53), "0.00")
'8' c'est le numéro de la ligne
'53' c'est le numéro de la colonne
Le problème c'est que lorsque je choisi une date sur mon comboDate, sur le textbox me donne des valeurs d'autres lignes verticale (par ex: la valeur de ligne N°9), mais moi je veux la valeur de la ligne N°8 qui correspond de la date que j'ai choisi.
Merci, et je compte sur votre aide.
Je suis débutant au VBA, je suis entrain de crée un Userform sous Excel2010, mon problème est le suivant:
1- J'ai un tableau Excel très long horizontal, leur contenu est comme suivant:
- Les dates: dans la ligne N°7 du tableau excel, (du 1er janvier 2013 jusqu'à 30 décembre 2013).
- Les pourcentages: dans la ligne N°8 du tableau excel.
- Chaque date correspond à un pourcentage.
2- Sur mon Userform j'ai:
- un combobox (combodates) rempli par les dates.
- un textbox (textpourcentage).
J'ai besoin de votre aides: lorsque je choisi une date sur mon combobox, dans le textbox s'affiche le pourcentage correspond de la date sur le tableau excel.
N.B: J'ai réussi de remplir mon combobox, seulement j'ai le problème de synchroniser entre combobox et textbox sachant que mes données (%) dans le tableau sont horizontal et aussi que très long.
Vous trouverez ci-dessous le code que j'ai utilisé:
Private Sub ComboDate_Change()
Set od = Sheets("Diary Tracking General") 'définit l'onglet od
Me.Textbox.Value = Format(od.Cells(Me.ComboDate.ListIndex + 8, 53), "0.00")
'8' c'est le numéro de la ligne
'53' c'est le numéro de la colonne
Le problème c'est que lorsque je choisi une date sur mon comboDate, sur le textbox me donne des valeurs d'autres lignes verticale (par ex: la valeur de ligne N°9), mais moi je veux la valeur de la ligne N°8 qui correspond de la date que j'ai choisi.
Merci, et je compte sur votre aide.
