zone de liste modifiable avec date

Le
leproust
Bonjour

j'ai dans un formulaire une zone de liste modifiable qui fait référence à
une liste de date.
Cela marche bien, la liste apparait correctement

mais dès que je passe à une autre zone de mon formulaire
il apparait à la place de la date un nombre
pourquoi la zone se transforme t elle ?

merci par avance pour votre aide

jean marie
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
MichDenis
Le #4231621
Tu peux utiliser un bout de code comme ceci pour remplir un combobox...
en choisissant l'événement qui convient le mieux à ton application...

P.S. La propriété RowSource du combobox ne doit pas être renseignée.

'------------------------
Dim S
With Worksheets("Feuil1")
S = .Range("A1:A" & .Range("A65536").End(xlUp).Row)
Me.ComboBox1.List = S
End With
'------------------------


"leproust"
Bonjour

j'ai dans un formulaire une zone de liste modifiable qui fait référence à
une liste de date.
Cela marche bien, la liste apparait correctement

mais dès que je passe à une autre zone de mon formulaire
il apparait à la place de la date un nombre
pourquoi la zone se transforme t elle ?

merci par avance pour votre aide

jean marie
leproust
Le #4231301
Bonsoir

j'ai essayé cela ne fonctionne pas

J'ai mis

Private sub userform-initilize()
me.Cboxpériode.rowsource ="F1!D9:D" & Sheets("F1").[D6500].End(xlUp).Row
End sub


mais je n'arrive pas à afficher une date

pouvez vous m'aider

jm


Tu peux utiliser un bout de code comme ceci pour remplir un combobox...
en choisissant l'événement qui convient le mieux à ton application...

P.S. La propriété RowSource du combobox ne doit pas être renseignée.

'------------------------
Dim S
With Worksheets("Feuil1")
S = .Range("A1:A" & .Range("A65536").End(xlUp).Row)
Me.ComboBox1.List = S
End With
'------------------------


"leproust"
Bonjour

j'ai dans un formulaire une zone de liste modifiable qui fait référence à
une liste de date.
Cela marche bien, la liste apparait correctement

mais dès que je passe à une autre zone de mon formulaire
il apparait à la place de la date un nombre
pourquoi la zone se transforme t elle ?

merci par avance pour votre aide

jean marie





MichDenis
Le #4231271
Si tu ne sais pas faire un copier-coller,
je ne peux pas aller au delà de ce que j'ai suggéré !

P.S. La propriété RowSource du combobox ne doit pas être renseignée.

Private sub userform-initilize()
Dim S
' Adapte le nom de la feuille
With Worksheets("Feuil1")
S = .Range("D9:D" & .Range("D65536").End(xlUp).Row)
Me.Cboxpériode.List = S
End With
End Sub



"leproust"
Bonsoir

j'ai essayé cela ne fonctionne pas

J'ai mis

Private sub userform-initilize()
me.Cboxpériode.rowsource ="F1!D9:D" & Sheets("F1").[D6500].End(xlUp).Row
End sub


mais je n'arrive pas à afficher une date

pouvez vous m'aider

jm


Tu peux utiliser un bout de code comme ceci pour remplir un combobox...
en choisissant l'événement qui convient le mieux à ton application...

P.S. La propriété RowSource du combobox ne doit pas être renseignée.

'------------------------
Dim S
With Worksheets("Feuil1")
S = .Range("A1:A" & .Range("A65536").End(xlUp).Row)
Me.ComboBox1.List = S
End With
'------------------------


"leproust"
Bonjour

j'ai dans un formulaire une zone de liste modifiable qui fait référence à
une liste de date.
Cela marche bien, la liste apparait correctement

mais dès que je passe à une autre zone de mon formulaire
il apparait à la place de la date un nombre
pourquoi la zone se transforme t elle ?

merci par avance pour votre aide

jean marie





Publicité
Poster une réponse
Anonyme