Bonjour,
 
Je vous explique mon problème :  
J'ai :
- une zone de saisie (Saisie)
- un bouton (BtnTransfer)
- une liste (Liste)
 
Je saisie qqch dans ma zone de saisie.
Je clique sur le bouton.
 
Avec VB, c'est Liste.AddItem Saisie
 
Mais avec VBA, il n'y a pas de AddItem
 
Comment puis-je faire ?
 
Merci d'avance

Salut,  
 
Voici pour ton problème :  
 
Combobox1.Additem TextBox1 'Combobox1 représente le nom de l' object (que tu peut appeler Liste si tu veux). Ensuite, TextBox1 représente Saisie.  
 
Ca devrait aussi marcher si tu remplace les noms Liste et Saisie.
 
C' est ça ?
 
 

le problème, c'est qu'il n'y a pas "AssItem" en VBA (sous Access 2000)

Bonjour,
 
Peut être que ceci dans le code d'action du bouton:
Après un petit "google",  
 
Private Sub BtnTransfer()
 
   Me!Liste.RowSource = Me!Liste.RowSource & ";" & Liste
 
End Sub
 
A chaque clic sur le bouton: ajout à la liste la valeur contenue dans la zone de saisie.
 
Cordialement
 
Pifa

Merci
ça a l'air compliqué, mais je vais tester.

ben, ça ne me le met pas dans ma ListBox

Bonjour,
 
Avec cette fois-ci quelque chose de plus juste:
 
Private Sub BtnTransfer_Click()
    Me!Liste.RowSource = Me!Liste.RowSource & ";" & Saisie
End Sub
 
En prenant:
Saisie: Nom de la zone de texte qui doit être ajoutée dans la liste.
Liste: Nom de la zone de liste.
BtnTransfer: Nom du bouton dont le code évenement est ci-dessus.
 
Cordialement
 
Pifa

ça marche tjr pas
 
c'est du VBA sous Access 2000, ne l'oublions pas

Bonjour,
 
Ceci fonctionne aussi bien sous 97 que 2002, en souhaitant que sous 2000 cela réponde à la question:
 
Private Sub BtnTransfer_Click()  
    Me.Liste.RowSource = Me.Liste.RowSource & ";" & Me.Saisie  
End Sub  
 
En prenant:  
Saisie: Nom de la zone de texte qui doit être ajoutée dans la liste.  
Liste: Nom de la zone de liste.  
BtnTransfer: Nom du bouton dont le code évenement est ci-dessus.  
 
Cordialement  
 
Pifa

merci
 
c'est bon, mais maintenant, ça va aller mieux, j'ai installé VB6 sur mon poste (au bureau) et VB.NET chez moi