deja commence par metre ton code dans le form_load et non dans l'activate......
ensuite tu boucle sur rien du tout la
et pour ermplir une liste il faut utiliser le AddItem
essaye un truc du style
form_load()
'var
dim i as integer
'debut
i = 1
while range("A" & i) <> ""
marque.additem range("A" & i)
i=i+1
wend
end sub
ca devrai marcher ....
mais réadapte surment un peu le code....
a+
marcelin
-------------------------------
Réponse au message :
-------------------------------
> Re salut Marcelin
> Voilà le code de mon userform
> Private Sub UserForm_Activate()
> Dim DerniereMarque As String
> DerniereMarque = Range("A1").End(xlDown).Address
> ' Plage de données pour afficher dans liste déroulante
> Marque.RowSource = "A1:" & DerniereMarque
> ' Afficher la première marque de la liste (0)
> Marque.ListIndex = 0
> End Sub
>
> Private Sub Valider_Click()
> ListeDeroulante.Hide
> Index = Marque.ListIndex
> ChoixMarque = Marque.List(Index)
> ' Stockage du résultat dans la cellule D2
> Range("D2").Value = ChoixMarque
> End Sub
>
> Merci de m'aider pour la synthaxe qui fait référence la feuile deux pour localiser les données
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > donc tu fais une feuille qui sert d'affichage et une feuille qui sert de sauvegarde de données
> >
> > ben donc tu fais le code que je t'ai filer avant c'est a dire :
> > "
> > 'var
> > dim i as integer
> >
> > 'debut
> > i = [N° de ligne du 1er element]
> >
> > while feuilB.range("A" & i).value <> ""
> >
> > combobox.additem range("A" & i).value
> >
> > wend
> >
> > "
> > le control range utilise les celulle.
> >
> > mais tu peut aussi utiliser "cell" si tes données sont stocker à l'horizontale
> >
> > a+
> >
> > marcelin
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Salut Marcelin
> > >
> > > Enfait je voudrais connaître le synthaxe pour:
> > > J'ai un classeur avec deux feuilles. Dans la feuille A, un userform s'ouvre avec un clic droit sur une certaine cellule. Je voudrais que les éléments qui apparaissent dans ce userform (liste déroulante) soit basé dans la feuille B
> > > Voilà j'espére que c'est plus simple comme cela
> > > Merci d'avance
> > > @+
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > si je comprend bien tu voudrais remplir ta combobox avec les valeur qui se trouverais sur une feuille?
> > > >
> > > > si c'est ca tu fais ca :
> > > > tu les met tous(tes élément) les un sous les autre(dans une colone quoi !!) et tu fais:
> > > > i = [N° de ligne du 1er element]
> > > > while range("A" & i).value <> ""
> > > > combobox.additem range("A" & i).value
> > > > wend
> > > >
> > > > voila c'est tout comme je l'ai compris
> > > >
> > > > a+
> > > >
> > > > marcelin
> > > >
> > > >
> > > >
> > > > -------------------------------
> > > > Réponse au message :
> > > > -------------------------------
> > > >
> > > > >
> > > > >
> > > > > Salut
> > > > >
> > > > > Je voudrais savoir si cela marche quand on veut récupérer les données qui se trouvent dans une liste et non pas dans une seule cellule. J'ai une userfom combobox qui apparait dans une feuille et je souhaiterais que la liste de référence se trouve dans une autre feuille
> > > > >
> > > > > Merci d'avance
> > > > >
> > > > >
> > > > > -------------------------------
> > > > > Réponse au message :
> > > > > -------------------------------
> > > > >
> > > > > >
> > > > > > tu fais:
> > > > > > feuil1.range("B2").value = feuil2.range("A1").value
> > > > > > voila
> > > > > >
> > > > > > a+
> > > > > >
> > > > > > marcelin
> > > > > >
> > > > > >
> > > > > >
> > > > > > -------------------------------
> > > > > > Réponse au message :
> > > > > > -------------------------------
> > > > > >
> > > > > > > Bonjour,
> > > > > > > je sais que ça va vous paraître bateau... mais, j'ai un soucis.
> > > > > > > J'ai deux feuilles excel (feuil1 et feuil2).
> > > > > > > Je voudrais à partir du code VBA, récupérer les données d'une cellule A1 de la feuil2 et les affecter à la cellule B2 de la feuil1.
> > > > > > > Ceci est un exemple.
> > > > > > >
> > > > > > > Si quelque'un pouvait m'aider ce serait sympa.
> > > > > > > Merci !
> > > > > > > A+
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>