Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Liste de champs dans zone de liste

21 réponses
Avatar
denis le breton
Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre chose, ou
l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de liste
déroulante le nom des champs de la table (que j'aurai passé en paramètre)
ceci afin de d'applquer un traitement (par exemple s'assurer que le code
postal est bien sur 5 chiffres, mais le champ de la table peut être nommé :
CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements sur d'autre
champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas encore fait.

10 réponses

1 2 3
Avatar
denis le breton
Oui le café aussi, je dis papa maman. Mais ce que je veux faire ... toujours
pas
en particulier lister ET récupérer le nom d'une table sur une BdD distante
en particulier lister ET récupérer le nom d'un champ d'une table tout en
permettant le raffraîchissement des données
Je cherche encore


je ne comprend pas: tu sais tout faire !
- récupérer la base
- lister les tables
- lister les champs
il te suffit de placer les noms dans le filtre de chaque liste.


--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Cet été, j'en ai rien à coder, je me forme : les devoirs de vacances
http://www.comscamp.com/Tracker/Redirect.ashx?linkidp47a5ea-bce8-4da8-bb67-87e0c49c57e8


"denis le breton" a écrit dans le
message de news:
| Désolé de ne pas être clair.
| Ce que je sais : récupérer le nom d'une BdD ex : C:TravailMaBdD.mdb
| lister les tables de ma base de données (pour l'instant pas sur BdD
| distante) (j'utilise un select sur msysobjects.name et je crée une table
| temporaire qui porte toujours le meme nom.) et je sais récupérer le nom de
le
| table en pointant sur la table temporaire.
| Je sais lister les champs d'une table 5si je connais celle ci
| j'utilise un subterfuge en copiant la table choisie sur une autre table et
| je liste kes champs de cette table pour sélectionner celui qui m'intéresse
|
| Voila la situation
| En prime l'actualisation de la liste box 1 ou 2 me génère un pb car la
table
| temporaire créée reste verrouillée par un autre utilisateur (je cherche à
| l'effecer avant de la recréer). Bref je boucle depuis 8 jours et cela m'en
| réveille la nuit., alors dans la journée je fais les zombies.
|
| Merci encore de ton intérêt
| Denis





Avatar
denis le breton
Oui Oui une colonne une seule
j'ai fait un test en remplaçant dans le fonction & ";" par & vbCrLf et
Jobtiens une présentation plus ,lisible maiçs cela ne fait en résultat qu'un
seul champ concaténé


J'ai dû rater quelque chose...
Tu as bien 1 seule colonne dans ta liste déroulante ?

Dans ton message
Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur E:2007PP3BPP3B_2007-07-10.mdb
une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin) réussi
à passer le resultat de la fonction dans la liste box, mais j'ai un champ
rempli de la concaténation (table1;table2;table3;...) pas de possibilité
de sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient exactement
ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les champs
par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD en
paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la table en
paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite
Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a écrit dans
le message de news:

Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre chose,
ou l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de
liste déroulante le nom des champs de la table (que j'aurai passé en
paramètre) ceci afin de d'applquer un traitement (par exemple s'assurer
que le code postal est bien sur 5 chiffres, mais le champ de la table
peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements sur
d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas encore
fait.







--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info












Avatar
jerome crevecoeur
Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à j our
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur E:2007PP3BPP3B_2007-0 7-10.mdb
une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", séle ctionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin) r éussi à
passer le resultat de la fonction dans la liste box, mais j'ai un ch amp
rempli de la concaténation (table1;table2;table3;...) pas de possi bilité de
sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient exact ement
ce que tu voulais. Qu'en as-tu fait ?

Dans ton message >
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les cha mps
par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD en
paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant l a table en
paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la sui te Office
!
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78 e8-4371-abaf-b73c259e58db


"denis le breton" a éc rit dans
le message de news: t.com...
Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher a utre chose, ou
l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zon e de liste
déroulante le nom des champs de la table (que j'aurai passé e n paramètre)
ceci afin de d'applquer un traitement (par exemple s'assurer que le code
postal est bien sur 5 chiffres, mais le champ de la table peut ê tre nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traiteme nts sur
d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info












Avatar
denis le breton
testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur E:2007PP3BPP3B_2007-07-10.mdb
une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin) réussi à
passer le resultat de la fonction dans la liste box, mais j'ai un champ
rempli de la concaténation (table1;table2;table3;...) pas de possibilité de
sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient exactement
ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les champs
par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD en
paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la table en
paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office
!
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a écrit dans
le message de news:
Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre chose, ou
l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de liste
déroulante le nom des champs de la table (que j'aurai passé en paramètre)
ceci afin de d'applquer un traitement (par exemple s'assurer que le code
postal est bien sur 5 chiffres, mais le champ de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements sur
d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info
















Avatar
jerome crevecoeur
Dans contenu mets ºnane,Fraise,Orange
Si tu ouvres ton formulaire, tu as bien 3 lignes?



sinon essaye cet exercice déjà:
http://www.self-access.com/access/grenier/acRedir.php?id

Il vaut mieux procéder par étapes!


testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur E:2007PP3BPP3B_2007 -07-10.mdb
une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sé lectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourd e
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin) réussi à
passer le resultat de la fonction dans la liste box, mais j'ai un champ
rempli de la concaténation (table1;table2;table3;...) pas de pos sibilité de
sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient exa ctement
ce que tu voulais. Qu'en as-tu fait ?

Dans ton message om>
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les c hamps
par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant l a BdD en
paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la table en
paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la s uite Office
!
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3- 78e8-4371-abaf-b73c259e58db


"denis le breton" a é crit dans
le message de news: oft.com...
Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre chose, ou
l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une z one de liste
déroulante le nom des champs de la table (que j'aurai passé en paramètre)
ceci afin de d'applquer un traitement (par exemple s'assurer qu e le code
postal est bien sur 5 chiffres, mais le champ de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, . ..
voilà pourquoi je cherche ça (et j'ai plein d'autres traite ments sur
d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pa s encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info

















Avatar
denis le breton
Non et Oui
je m'explique si je tape
contenu ºnane,Fraise,Orange (je n'ai rien)
si je tape
contenu ="Banane","Fraise","Orange" (j'ai Banane ou Fraise ou Orange)
tout tines donc dans la syntaxe et le rajout de "
Je cherche



Dans contenu mets ºnane,Fraise,Orange
Si tu ouvres ton formulaire, tu as bien 3 lignes?



sinon essaye cet exercice déjà:
http://www.self-access.com/access/grenier/acRedir.php?id

Il vaut mieux procéder par étapes!


testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur E:2007PP3BPP3B_2007-07-10.mdb
une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin) réussi à
passer le resultat de la fonction dans la liste box, mais j'ai un champ
rempli de la concaténation (table1;table2;table3;...) pas de possibilité de
sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient exactement
ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les champs
par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD en
paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la table en
paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite Office
!
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a écrit dans
le message de news:
Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre chose, ou
l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de liste
déroulante le nom des champs de la table (que j'aurai passé en paramètre)
ceci afin de d'applquer un traitement (par exemple s'assurer que le code
postal est bien sur 5 chiffres, mais le champ de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements sur
d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info





















Avatar
Thierry (ze Titi)
Essaie de remplacer & ";" par & "," dans la fonction. Mais ça me paraît
bien curieux.

Message du lundi 16/07/2007

Non et Oui
je m'explique si je tape
contenu ºnane,Fraise,Orange (je n'ai rien)
si je tape
contenu ="Banane","Fraise","Orange" (j'ai Banane ou Fraise ou Orange)
tout tines donc dans la syntaxe et le rajout de "
Je cherche



Dans contenu mets ºnane,Fraise,Orange
Si tu ouvres ton formulaire, tu as bien 3 lignes?



sinon essaye cet exercice déjà:
http://www.self-access.com/access/grenier/acRedir.php?id

Il vaut mieux procéder par étapes!


testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur
E:2007PP3BPP3B_2007-07-10.mdb une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin)
réussi à passer le resultat de la fonction dans la liste box, mais
j'ai un champ rempli de la concaténation (table1;table2;table3;...)
pas de possibilité de sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient
exactement ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les
champs par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD
en paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la
table en paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite
Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a écrit
dans le message de news:

Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre
chose, ou l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de
liste déroulante le nom des champs de la table (que j'aurai passé
en paramètre) ceci afin de d'applquer un traitement (par exemple
s'assurer que le code postal est bien sur 5 chiffres, mais le champ
de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements
sur d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas
encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info













--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info











Avatar
denis le breton
Rien à faire !!!
le meilleur résulat et soit par Public Function ListeTables(ByVal strBase As
String) As String
Dim db As Database
Set db = OpenDatabase(strBase)
ListeTables = ";"
For Each tdf In db.TableDefs
ListeTables = ListeTables & """" & tdf.Name & """;"
'MsgBox ListeTables
Next
db.Close: Set db = Nothing
End Function
avec placé sur la ligne source contrôle : =ListeTables([BdD].[Valeur]) les
crochets ne sont obilgatoires
si je place sur la ligne contenu : ListeTables([BdD].[Valeur]) j'obtiens
dans la liste de choix : ListeTables([BdD].[Valeur]) mais de de liste
je crois que je vais me pendre avec mon trombone ! (j'ai plus d'élastique)
Denis

Essaie de remplacer & ";" par & "," dans la fonction. Mais ça me paraît
bien curieux.

Message du lundi 16/07/2007

Non et Oui
je m'explique si je tape
contenu ºnane,Fraise,Orange (je n'ai rien)
si je tape
contenu ="Banane","Fraise","Orange" (j'ai Banane ou Fraise ou Orange)
tout tines donc dans la syntaxe et le rajout de "
Je cherche



Dans contenu mets ºnane,Fraise,Orange
Si tu ouvres ton formulaire, tu as bien 3 lignes?



sinon essaye cet exercice déjà:
http://www.self-access.com/access/grenier/acRedir.php?id

Il vaut mieux procéder par étapes!


testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur
E:2007PP3BPP3B_2007-07-10.mdb une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin)
réussi à passer le resultat de la fonction dans la liste box, mais
j'ai un champ rempli de la concaténation (table1;table2;table3;...)
pas de possibilité de sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient
exactement ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les
champs par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la BdD
en paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la
table en paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite
Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a écrit
dans le message de news:

Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre
chose, ou l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone de
liste déroulante le nom des champs de la table (que j'aurai passé
en paramètre) ceci afin de d'applquer un traitement (par exemple
s'assurer que le code postal est bien sur 5 chiffres, mais le champ
de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements
sur d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas
encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info













--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info
















Avatar
Thierry (ze Titi)
Public Function ListeTables(ByVal strBase As String) As String
Dim db As Database, tdf As AccessObject
Set db = OpenDatabase(strBase)
ListeTables = "" ' <============= On initialise la chaîne à
vide...
For Each tdf In db.TableDefs
ListeTables = ListeTables & chr(34) & tdf.Name & chr(34) &
";"
'MsgBox ListeTables
Next
db.Close: Set db = Nothing
End Function


Essaie de remplacer & ";" par & "," dans la fonction. Mais ça me paraît
bien curieux.

Message du lundi 16/07/2007

Non et Oui
je m'explique si je tape
contenu ºnane,Fraise,Orange (je n'ai rien)
si je tape
contenu ="Banane","Fraise","Orange" (j'ai Banane ou Fraise ou Orange)
tout tines donc dans la syntaxe et le rajout de "
Je cherche



Dans contenu mets ºnane,Fraise,Orange
Si tu ouvres ton formulaire, tu as bien 3 lignes?



sinon essaye cet exercice déjà:
http://www.self-access.com/access/grenier/acRedir.php?id

Il vaut mieux procéder par étapes!


testé pas plus rien dans ma liste box ?


Tout est bon sauf que ce n'est pas

sourcecontrôle = ListeTables(Texte78.valeur)
mais
contenu=ListeTables(Texte78.valeur)

Pour le rafraichissement, il vaudrait mieux l'affecter aprés mise à jour
de Texte78 afin que la liste se réactualise.

Et garder les point virgule en séparateur
Cordialement

Que nenni helas 173,729 fois helas!
un textbox nommé 'Texte78' avec comme valeur
E:2007PP3BPP3B_2007-07-10.mdb une listbox déroulante avec
source contrôle : =ListeTables(Texte78.Valeur)
Origine source : Liste valeurs
me ramène
PP3B10;PP3B10_COR;PP3B10_EST;PP3B2;PP3B2_COR;PP3B2_EST;...
sur un champ!
Gasp! qu'est ce que j'ai raté ?

Dans les propriétés de la liste, dans l'onglet "Données", sélectionne
"Liste valeurs" dans la propriété "Origine source".

En ce jour mémorable du lundi 16/07/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Ze titi, en fait je ne m'en sors pas, car j'ai bien (enfin)
réussi à passer le resultat de la fonction dans la liste box, mais
j'ai un champ rempli de la concaténation (table1;table2;table3;...)
pas de possibilité de sélectionner l'une des tables !
Denis


Bonjour denis

Il me semblait t'avoir proposé 2 fonctions qui te ramenaient
exactement ce que tu voulais. Qu'en as-tu fait ?

Dans ton message
du lundi
Merci Raymond de t'intéresser à nouveau à mes soucis
Cela fonctionne bien si je sais sur quel table je recherche les
champs par contre comment passer en paramètre le nom de la table
je suis sur le schéma suivant
dans une liste box je sélectionne ma base de données
dans une seconde liste box je sélectionne la table en passant la
BdD en paramètre (source : listebox1.value)
dans la troisème liste box je sélectionne le champ en passant la
table en paramètre
(source : listebox2.value)

Denis

Bonjour.

sur la ligne contenu, indiquer le nom de la table.
sur la ligne origine source, indiquer: Liste des champs

--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Venez découvrir Open XML, le nouveau format de fichier de la suite
Office !
http://www.comscamp.com/Tracker/Redirect.ashx?linkidÿ71c7f3-78e8-4371-abaf-b73c259e58db


"denis le breton" a
écrit dans le message de news:

Patatras et oui je vous le dit bien humblement
à force de vouloir ce qu l'on a déjà on fini par chercher autre
chose, ou l'inverse d'ailleurs.
En fait ce qui m'intéresse c'est de pouvoir lister dans une zone
de liste déroulante le nom des champs de la table (que j'aurai
passé en paramètre) ceci afin de d'applquer un traitement (par
exemple s'assurer que le code postal est bien sur 5 chiffres,
mais le champ de la table peut être nommé

CP, CodPos, codepostal, code postal, cp_client, cp livraison, ...
voilà pourquoi je cherche ça (et j'ai plein d'autres traitements
sur d'autre champs)
Merci
Denis
PS je teste ce que Ze Titi m'a donné hier, mais je ne l'ai pas
encore
fait.




--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info













--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Thierry

Tout pour réussir avec Access :
http://www.mpfa.info













Avatar
Raymond [mvp]
Je refais un bout de chemin avec vous.

pour placer les noms de tables d'une base dans une combobox, il faut faire
ceci:

Dim Tdf As DAO.TableDef
Dim Db As DAO.Database
Set Db = OpenDatabase("F:Mes Documentscomptoir.mdb")
Me.Modifiable1.RowSource = ""
For Each Tdf In Db.TableDefs
If Left(Tdf.Name, 4) <> "MSys" Then
Me.Modifiable1.RowSource = Me.Modifiable1.RowSource & Tdf.Name & ";"
End If
Next Tdf
Set Db = Nothing

ensuite utiliser Modifiable1 (qui contient le nom de la table) pour donner
le nom de la table à la prochaine liste.
--
@+
Raymond Access MVP http://www.OfficeSystemAccess.com/
http://officesystem.access.over-blog.com/
http://officesystem.access.free.fr/wiki/
Pour débuter sur le forum: http://www.mpfa.info/

Cet été, j'en ai rien à coder, je me forme : les devoirs de vacances
http://www.comscamp.com/Tracker/Redirect.ashx?linkidJd96883-a859-4212-b4a0-bce47c8e0d99


"denis le breton" a écrit dans le
message de news:
| Rien à faire !!!
| le meilleur résulat et soit par Public Function ListeTables(ByVal strBase
As
| String) As String
| Dim db As Database
| Set db = OpenDatabase(strBase)
| ListeTables = ";"
| For Each tdf In db.TableDefs
| ListeTables = ListeTables & """" & tdf.Name & """;"
| 'MsgBox ListeTables
| Next
| db.Close: Set db = Nothing
| End Function
| avec placé sur la ligne source contrôle : =ListeTables([BdD].[Valeur]) les
| crochets ne sont obilgatoires
| si je place sur la ligne contenu : ListeTables([BdD].[Valeur]) j'obtiens
| dans la liste de choix : ListeTables([BdD].[Valeur]) mais de de liste
| je crois que je vais me pendre avec mon trombone ! (j'ai plus d'élastique)
| Denis
1 2 3