Discussion :

[Brainis]

Bonjour à tous,

J'ai créé une nouvelle discussion car j'ai un problème avec les combobox (dans excel 2007). J'ai créé une macro pour insérer une date dans un document. J'ai donc 2 combobox: une avec les jours (de 1 à 31) et une avec les mois (de 1 à 12). En ce qui concerne l'année, c'est figé à 2009 pour le moment.
Mon souci est le suivant: lorsque je sélectionne donc une date via les 3 combo, le résultat renvoyé dans le document excel correspond chaque fois à la premiere valeur donc: 1/1/2009 et je n'arrive pas obtenir d'autres dates.

Voici le code du formulaire:

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub Annuler_Click()
Unload Me
FormFacture.Hide
End Sub
 
 
Private Sub OK_Click()
With ComboBox1
        Sheets("Invoice").Cells(8, 8) = .List
    End With
 
With ComboBox2
         Sheets("Invoice").Cells(8, 9) = .List
    End With
 
Range("H10") = TextBox1
 
FormFacture.Hide
End Sub
 
Private Sub UserForm_Initialize()
 
Dim i As Byte
For i = 2 To 32
ComboBox1.AddItem Sheet2.Cells(i, 1)
Next i
 
Dim j As Byte
For j = 2 To 13
ComboBox2.AddItem Sheet2.Cells(j, 2)
Next j
 
End Sub

D'avance un grand merci !!

[zandru]

Bonjour et bienvenu sur le forum,

Code :

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

1
2
3
4
5
6
7
With ComboBox1
    Sheets("Invoice").Cells(8, 8) = .value
End With
 
With ComboBox2
    Sheets("Invoice").Cells(8, 9) = .value
End With

le .list(i) te donne la valeur de la ligne i de la combobox.
il faut utiliser .value pour avoir la valeur selectionné.

Pour choisir une date via un userform, le contrôle DT-Picker est très pratique aussi
( outils >> controles complementaire >>Microsoft date and time picker control)

PS : n'oublie pas les balise #code#