Excel-Access récupération de champs
Résolu
mod77
Messages postés
1284
Date d'inscription
Statut
Membre
Dernière intervention
-
mod77 Messages postés 1284 Date d'inscription Statut Membre Dernière intervention -
mod77 Messages postés 1284 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai fait un formulaire de saisie d'identité de client sous access avec d'autre saisie.
J'ai fait un questionnaire sous excel qui devra être lié au client.
Pour faire mon rapport, j'ai besoin de récupérer, sous excel, certains champs saisis sous access.
Comment dois-je faire pour que ça soit automatique et pas au coup par coup ?
C'est a dire que lorsque j'ouvre mon fichier excel il y ait les coordonnées du client dans la feuil du questionnaire.
Quelqu'un peut-il me renseigner SVP ?
J'ai fait un formulaire de saisie d'identité de client sous access avec d'autre saisie.
J'ai fait un questionnaire sous excel qui devra être lié au client.
Pour faire mon rapport, j'ai besoin de récupérer, sous excel, certains champs saisis sous access.
Comment dois-je faire pour que ça soit automatique et pas au coup par coup ?
C'est a dire que lorsque j'ouvre mon fichier excel il y ait les coordonnées du client dans la feuil du questionnaire.
Quelqu'un peut-il me renseigner SVP ?
A voir également:
- Valeur champ excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
- Excel moyenne - Guide
64 réponses
Bonjour,
Dans le poste 42 j'ai bien mis que vous devez mettre le nom du champ de votre formulaire et non pas celui de la table ou du sous-formulaire.
A la limite vous pouvez compacter votre base et ensuite la compressée puis sur https://www.cjoint.com/ ...
Dans le poste 42 j'ai bien mis que vous devez mettre le nom du champ de votre formulaire et non pas celui de la table ou du sous-formulaire.
A la limite vous pouvez compacter votre base et ensuite la compressée puis sur https://www.cjoint.com/ ...
Bonjour,
Je m'excuse par avance car je ne comprends pas "le nom du champ du formulaire" car lorsque j'ai regardé votre formulaire c'est sur le champ "identification" que j'ai trouvé via propriété le nom "matricule". D'où mes question du poste 44 ?
Voici le lien: https://www.cjoint.com/?dfpySmPrpG
merci
Je m'excuse par avance car je ne comprends pas "le nom du champ du formulaire" car lorsque j'ai regardé votre formulaire c'est sur le champ "identification" que j'ai trouvé via propriété le nom "matricule". D'où mes question du poste 44 ?
Voici le lien: https://www.cjoint.com/?dfpySmPrpG
merci
Bonjour,
Pour ceci :
je ne comprends pas "le nom du champ du formulaire" car lorsque j'ai regardé votre formulaire c'est sur le champ "identification" que j'ai trouvé via propriété le nom "matricule"
Il ne faut pas comfondre le nom du champ qui est [Matricule] avec le texte que vous voyez [Identifications] qui correspond au nom de la source de contrôle qui est, dans se cas, le nom du champ de la table [T_Noms].
Je regarde encore votre base.
Salutations.
Jean-Pierre
Pour ceci :
je ne comprends pas "le nom du champ du formulaire" car lorsque j'ai regardé votre formulaire c'est sur le champ "identification" que j'ai trouvé via propriété le nom "matricule"
Il ne faut pas comfondre le nom du champ qui est [Matricule] avec le texte que vous voyez [Identifications] qui correspond au nom de la source de contrôle qui est, dans se cas, le nom du champ de la table [T_Noms].
Je regarde encore votre base.
Salutations.
Jean-Pierre
Bonjour,
Le champ à utiliser dans la requête est [N°Client] du formulaire principale [F_Client].
De plus on a la chance que votre champ et de format numérique et ceci modifie l’écriture de la requête (supprimer caractère de ponctuation) doit être comme suit :
strSQL = "SELECT * FROM T_Client" & " WHERE T_Client.N°Client = " & Form_F_Client.N°Client
Ce formulaire ne possède pas de module de classe, ce qui provoque une erreur lors de l’exécution de la requête.
Vous allez sur les propriétés du formulaire [F_Client] et sur l’onglet [Autres] propriété [Avec module] = Oui.
Le champ à utiliser dans la requête est [N°Client] du formulaire principale [F_Client].
De plus on a la chance que votre champ et de format numérique et ceci modifie l’écriture de la requête (supprimer caractère de ponctuation) doit être comme suit :
strSQL = "SELECT * FROM T_Client" & " WHERE T_Client.N°Client = " & Form_F_Client.N°Client
Ce formulaire ne possède pas de module de classe, ce qui provoque une erreur lors de l’exécution de la requête.
Vous allez sur les propriétés du formulaire [F_Client] et sur l’onglet [Autres] propriété [Avec module] = Oui.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Le Pingou,
Pouvez-vous me dire pourquoi je ne récupère pas des infos du sous-formulaire "table" SVP, par exemple
date repas ?
Merci
Pouvez-vous me dire pourquoi je ne récupère pas des infos du sous-formulaire "table" SVP, par exemple
date repas ?
Merci
Bonjour,
Voici un petit conseil, utiliser l'aide fourni avec le logiciel aussi souvent que possible. Dans se cas précis vous êtes sur la propriété [Avec module] du formulaire, vous ne savez pas se que c'est, clic sur le nom puis la touche F1 et ensuite clic sur l'une des suggestions [...... HasModule.... et là vous avez se qu'il faut savoir...
C'est un réflexe, que se soit sur Access, Excel, VBA etc., qui vous apportera beaucoup plus qu'une simple explication écourtée...
Voici un petit conseil, utiliser l'aide fourni avec le logiciel aussi souvent que possible. Dans se cas précis vous êtes sur la propriété [Avec module] du formulaire, vous ne savez pas se que c'est, clic sur le nom puis la touche F1 et ensuite clic sur l'une des suggestions [...... HasModule.... et là vous avez se qu'il faut savoir...
C'est un réflexe, que se soit sur Access, Excel, VBA etc., qui vous apportera beaucoup plus qu'une simple explication écourtée...
Bonjour,
Merci à vous vous, je ne connaissais pas cette manipulation.
Ce que j'aime bien dans vos réponses, c'est que "vous m'apportez la façon de pêcher et non le poisson" et ça me sert toujours. Car j'avais essayé, l'aide via l'assistant mais les réponses n'avaient aucun sens pour moi, voila pourquoi je vous ai sollicité de nouveau. Donc, merci à vous, encore.
A part cela, dans mon problème, avez-vous une réponse pour le poste 51 SVP ?
merci
Merci à vous vous, je ne connaissais pas cette manipulation.
Ce que j'aime bien dans vos réponses, c'est que "vous m'apportez la façon de pêcher et non le poisson" et ça me sert toujours. Car j'avais essayé, l'aide via l'assistant mais les réponses n'avaient aucun sens pour moi, voila pourquoi je vous ai sollicité de nouveau. Donc, merci à vous, encore.
A part cela, dans mon problème, avez-vous une réponse pour le poste 51 SVP ?
merci
Bonjour,
Juste au passage, je pense que vous n'avez pas la bonne table dans la requête.....
Pouvez-vous énumérer les champs que vous voulez récupérer ?
Je donnerai un oeil dans la journée.
Juste au passage, je pense que vous n'avez pas la bonne table dans la requête.....
Pouvez-vous énumérer les champs que vous voulez récupérer ?
Je donnerai un oeil dans la journée.
Bonjour,
J'aimerai avoir tous les champs du formulaire et du sous-formulaire, soit:
N°client, Nom, Tel, Adresse, N°Table, Date-repas, NbRésa
Merci
J'aimerai avoir tous les champs du formulaire et du sous-formulaire, soit:
N°client, Nom, Tel, Adresse, N°Table, Date-repas, NbRésa
Merci
Bonsoir,
Je suis désolé mais, ça ne marche pas...contrairement à la version précédente. De plus, il n'y a pas toutes les données que j'aimerai récupérer.
J'étudierai l'affaire dès lundi.
Merci à vous, et Bon week-end.
Je suis désolé mais, ça ne marche pas...contrairement à la version précédente. De plus, il n'y a pas toutes les données que j'aimerai récupérer.
J'étudierai l'affaire dès lundi.
Merci à vous, et Bon week-end.
Bonjour,
Le ne marche pas n'apporte strictement rien ....
Comme je ne lis pas encore dans les pensées, il m'est impossible de savoir qu'elles sont les valeurs que vous voulez.
Par contre mon exemple fonctionne. Probablement que le nom du fichier Excel avec les accents n'est pas adéquat. Voici une version sans accent : https://www.cjoint.com/?dgwWaMdGsS
Le ne marche pas n'apporte strictement rien ....
Comme je ne lis pas encore dans les pensées, il m'est impossible de savoir qu'elles sont les valeurs que vous voulez.
Par contre mon exemple fonctionne. Probablement que le nom du fichier Excel avec les accents n'est pas adéquat. Voici une version sans accent : https://www.cjoint.com/?dgwWaMdGsS
Bonjour,
Ce que je voulais dire par "ca ne marche pas" est que lorsque je clic sur le bouton "transfert vers Excel" aucune des données n'est transmises au fichier Excel "QuestionEntrée" et c'est toujours pareil avec le nouveua fichier "QuestionEntrer".
Au poste 55, je vous avais déjà écris les données que je veux. Il manque seulement "Nom", "adresse" et "Tel".
J'avais déjà tenté d'ajouter d'autres lignes ".Range("D" & 2 + c) = rstcha.Fields(3)" dans la boucle "while", mais ca a planté a 5.
C'est pourquoi j'ai posé les questions 43 et 45.
Ce qui est incroyable, c'est que, c'est ni plus ni moins que la même chose que pour votre base, mais tous les éléments ne sont pas transmis dans la mienne. Je ne sais pas pourquoi...
Merci à vous, je verrai demain.
Ce que je voulais dire par "ca ne marche pas" est que lorsque je clic sur le bouton "transfert vers Excel" aucune des données n'est transmises au fichier Excel "QuestionEntrée" et c'est toujours pareil avec le nouveua fichier "QuestionEntrer".
Au poste 55, je vous avais déjà écris les données que je veux. Il manque seulement "Nom", "adresse" et "Tel".
J'avais déjà tenté d'ajouter d'autres lignes ".Range("D" & 2 + c) = rstcha.Fields(3)" dans la boucle "while", mais ca a planté a 5.
C'est pourquoi j'ai posé les questions 43 et 45.
Ce qui est incroyable, c'est que, c'est ni plus ni moins que la même chose que pour votre base, mais tous les éléments ne sont pas transmis dans la mienne. Je ne sais pas pourquoi...
Merci à vous, je verrai demain.
Bonjour Le Pingou,
Je vous remercie pour votre aide et l'aboutissement de cette adaptation, cela me rend un immense service croyez le.
Merci aussi à Michel_m.
J'ai néanmoins une petite question pratique que j'avais déjà posé au poste 41:
Pouvez-vous faire en sorte que sur le clic le fichier excel s'ouvre et que les données soient transférées, plutôt que j'ai à ouvrir le fichier excel avant, s'il vous plait ? cela permettra un gain de temps.
Bonne journée,
Merci
Je vous remercie pour votre aide et l'aboutissement de cette adaptation, cela me rend un immense service croyez le.
Merci aussi à Michel_m.
J'ai néanmoins une petite question pratique que j'avais déjà posé au poste 41:
Pouvez-vous faire en sorte que sur le clic le fichier excel s'ouvre et que les données soient transférées, plutôt que j'ai à ouvrir le fichier excel avant, s'il vous plait ? cela permettra un gain de temps.
Bonne journée,
Merci
Bonjour,
Il vous suffit d’apporter les modifications suivantes dans la procédure:
Dim xlapp As Object remplacer par Dim xlapp As Excel.Application
Set xlapp = GetObject(checlas) remplacer par Set xlapp = CreateObject("Excel.Application")
With xlapp.Sheets("Feuil1") remplacer par With xlapp
Juste après, insérer les 2 lignes:
.Workbooks.Open checlas
.Visible = True
Entre Wend et End With, insérer la ligne
Workbooks("QuestionEntrer.xls").Close savechanges:=True
Il vous suffit d’apporter les modifications suivantes dans la procédure:
Dim xlapp As Object remplacer par Dim xlapp As Excel.Application
Set xlapp = GetObject(checlas) remplacer par Set xlapp = CreateObject("Excel.Application")
With xlapp.Sheets("Feuil1") remplacer par With xlapp
Juste après, insérer les 2 lignes:
.Workbooks.Open checlas
.Visible = True
Entre Wend et End With, insérer la ligne
Workbooks("QuestionEntrer.xls").Close savechanges:=True
Bonsoir,
Il y a comme un problème car cela ouvre bien le fichier Excel mais il se referme tout de suite.
Lorsque je reclic , Excel s'ouvre avec les bonnes données, mais lorsque je ferme excel, la base plante avec le message "erreur d'éxécution 9, l'indice n'apparait pas à la sélection"
et la ligne " Workbooks("QuestionEntrer.xls").Close savechanges:=True" est en jaune.
Savez-vous pourquoi?
Merci
Il y a comme un problème car cela ouvre bien le fichier Excel mais il se referme tout de suite.
Lorsque je reclic , Excel s'ouvre avec les bonnes données, mais lorsque je ferme excel, la base plante avec le message "erreur d'éxécution 9, l'indice n'apparait pas à la sélection"
et la ligne " Workbooks("QuestionEntrer.xls").Close savechanges:=True" est en jaune.
Savez-vous pourquoi?
Merci