Acess - vba comment remplir un champ de table avec le résultat du choix multiple [Résolu]
karloi28
- Messages postés
- 4
- Date d'inscription
- mercredi 28 juillet 2010
- Dernière intervention
- 4 mai 2011
- Messages postés
- 781
- Date d'inscription
- lundi 22 janvier 2007
- Dernière intervention
- 30 octobre 2013
A voir également:
- Acess vba
- Alternative au champ compteur table access - Codes sources - Visual Basic / VB.NET (ASP)
- Compo tcyfieldlink - brancher n' importe quel control à un champ de table - Codes sources - Delphi / Pascal (Composants)
- Suite, comment écrire la syntaxe VBA (excel) pour un champ date ✓ - Forum - VBA Office (Excel, Word ...)
- [VBA] Comment remplir des textbox en série ✓ - Forum - Visual Basic 6
- [Catégorie modifiée VB6 -> VBA] import le contenu de la table access vers excel ✓ - Forum - Visual Basic 6
7 réponses
Meilleure réponse
- Messages postés
- 4
- Date d'inscription
- mercredi 28 juillet 2010
- Dernière intervention
- 4 mai 2011
Ce que je veux c'est justement créer une nouvelle ligne.
Merci de t'être interessé à mon problème.
Pendant ce temps là, j'ai continué à essayé de trouver quelque chose sur internet.
Et j'ai trouvé quelque chose !!
Mon champ à plusieurs valeurs est nouveau depuis Access 2007 et s'appelle champ multi-varié (ce que je ne savais pas !!!).
J'ai trouvé tout ce qu'il faut savoir sur le traitement de ce champ à cette adresse :
http://warin.developpez.com/access/multivalue/
J'ai donc résolu mon problème.
Merci encore à toi de m'avoir aidé.
Merci de t'être interessé à mon problème.
Pendant ce temps là, j'ai continué à essayé de trouver quelque chose sur internet.
Et j'ai trouvé quelque chose !!
Mon champ à plusieurs valeurs est nouveau depuis Access 2007 et s'appelle champ multi-varié (ce que je ne savais pas !!!).
J'ai trouvé tout ce qu'il faut savoir sur le traitement de ce champ à cette adresse :
http://warin.developpez.com/access/multivalue/
J'ai donc résolu mon problème.
Merci encore à toi de m'avoir aidé.
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
122 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4
- Date d'inscription
- mercredi 28 juillet 2010
- Dernière intervention
- 4 mai 2011
J'ai essayé et cela provoque la meme erreur ...
J'ai essayé de définir un nouveau champ dans ma table avec les memes caractéristiques (controle de l'affichage en zone de liste déroulante) mais sans autoriser plusieurs valeurs. Dans ce cas cela fonctionne.
C'est pour cela que je me demande si le "problème" ne vient pas du fait que j'autorise plusieurs valeurs. Mais dans ce cas, comment faire ...?
je n'arrive d'ailleurs pas non plus en vba à récupérer toutes les valeurs de ce champ.
Si je fais :
La valeur que me retourne rsSuibi.fields(9) (qui correspond à mon fameux champ) est seulement la première valeur de la liste et non la liste entière ...
J'ai essayé de définir un nouveau champ dans ma table avec les memes caractéristiques (controle de l'affichage en zone de liste déroulante) mais sans autoriser plusieurs valeurs. Dans ce cas cela fonctionne.
C'est pour cela que je me demande si le "problème" ne vient pas du fait que j'autorise plusieurs valeurs. Mais dans ce cas, comment faire ...?
je n'arrive d'ailleurs pas non plus en vba à récupérer toutes les valeurs de ce champ.
Si je fais :
Dim tblSuivi As String
Dim rsSuivi As DAO.Recordset
tblSuivi = "SELECT * FROM [suivi]"
Set rsSuivi = CurrentDb.OpenRecordset(tblSuivi)
La valeur que me retourne rsSuibi.fields(9) (qui correspond à mon fameux champ) est seulement la première valeur de la liste et non la liste entière ...
- Messages postés
- 4
- Date d'inscription
- mercredi 28 juillet 2010
- Dernière intervention
- 4 mai 2011
oui je sais. Mais cela fait passer à la ligne suivant.
Ce n'est pas ce que je veux faire. Mon champ contient une liste de plusieurs valeurs sur une seule ligne.
Par exemple la valeur d'une ligne pour ce champ est "1;2;3" et la ligne suivante "4;5;6" puisque j'autorise plusieurs valeurs pour ce champ pour une seule ligne.
Quand j'execute le code précédent, cela ne me donne que la valeur "1", puis le movenext ne me donne que la valeur "4"
Ce n'est pas ce que je veux faire. Mon champ contient une liste de plusieurs valeurs sur une seule ligne.
Par exemple la valeur d'une ligne pour ce champ est "1;2;3" et la ligne suivante "4;5;6" puisque j'autorise plusieurs valeurs pour ce champ pour une seule ligne.
Quand j'execute le code précédent, cela ne me donne que la valeur "1", puis le movenext ne me donne que la valeur "4"
- Messages postés
- 781
- Date d'inscription
- lundi 22 janvier 2007
- Dernière intervention
- 30 octobre 2013
Apparemment le problème vient du fait que tu veuille autorise plusieurs valeurs. Peut-être que le mieux pour toi et de : 1)supprimer cette option.
2)Changer le type de ton champ en texte.
Autre chose ton code
N'est pas cohérent avec ce que tu voudrais faire. Si tu met rsSuivi.AddNew il va créer une nouvelle ligne ou client est vide. Si tu veux modifier une valeur tu dois utiliser rsSuivi.edit et faire rsSuivi![client] = rsSuivi![client] & zldClient.Value.
2)Changer le type de ton champ en texte.
Autre chose ton code
¨ Dim tblSuivi As String
Dim rsSuivi As DAO.Recordset
tblSuivi = "SELECT * FROM [suivi]"
Set rsSuivi = CurrentDb.OpenRecordset(tblSuivi)
rsSuivi.AddNew
rsSuivi![client] = zldClient.Value
rsSuivi.Update
rsSuivi.Close
N'est pas cohérent avec ce que tu voudrais faire. Si tu met rsSuivi.AddNew il va créer une nouvelle ligne ou client est vide. Si tu veux modifier une valeur tu dois utiliser rsSuivi.edit et faire rsSuivi![client] = rsSuivi![client] & zldClient.Value.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.