J'aimerais pouvoir créer des étiquettes pour un publipostage en utilisant
l'assistant à cet effet dans Access.
Cependant, j'aimerais qu'au moment de l'ouverture de l'état créant les
étiquettes, avoir la possibilité de choisir un format différent entre 4 ou 5
formats (identifiés au préalable) parmi ceux offerts dans Access.
J'aimerais donc que le processus se passe ainsi:
Chaque fois que la commande d'ouverture de l'état est activée en cliquant
sur un bouton de commande placé sur un formulaire, une boîte de dialogue
pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou
5 formats d'étiquettes.
Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur
un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes
choisi et que le publipostage se fasse.
Je crois que tout cela pourrait être possible mais voilà... je ne sais pas
comment développer cette procédure dans Access n'étant pas très à l'aise
avec VBA.
P.-S: J'ai déjà une requête et un état qui effectue ce publipostage en
cliquant sur un bouton de commande sur un formulaire. Cependant, le format
d'étiquettes de l'état est "fixe"!
Merci à qui peut m'aider ou me donner des références à ce sujet.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Phil
Salut, Pour cela, il faut créer un état pour chaque modèle voulu. Ensuite, dans VBA, il faut aller voir le code d'ouverture de l'état (dans les évènements sur clic du bouton). Là, une variable stdocname prend le nom de l'état. Ce qu'il faut, c'est que lorsque tu as choisi ton modèle et que tu appuies sur OK, une variable récupère le nom de modèle choisi, et que la variable citée plus haut prenne comme valeur le nom de l'état correspondant. Pour ce faire, essayer ce code :
dim nommod as string nommod = listemodifiable.value
ensuite, si les noms de la liste modifiables sont bien les noms des états :
stdocname=nommod
Enfin, laisser le reste du code qui est l'ouverture de l'état dont le nom est stdocname.
ca devrait fonctionner...
-----Message d'origine----- Bonjour,
Configuration: Access 2000 - Windows 98 SE.
J'aimerais pouvoir créer des étiquettes pour un publipostage en utilisant
l'assistant à cet effet dans Access. Cependant, j'aimerais qu'au moment de l'ouverture de l'état créant les
étiquettes, avoir la possibilité de choisir un format différent entre 4 ou 5
formats (identifiés au préalable) parmi ceux offerts dans Access.
J'aimerais donc que le processus se passe ainsi: Chaque fois que la commande d'ouverture de l'état est activée en cliquant
sur un bouton de commande placé sur un formulaire, une boîte de dialogue
pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou
5 formats d'étiquettes. Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur
un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes
choisi et que le publipostage se fasse.
Je crois que tout cela pourrait être possible mais voilà... je ne sais pas
comment développer cette procédure dans Access n'étant pas très à l'aise
avec VBA.
P.-S: J'ai déjà une requête et un état qui effectue ce publipostage en
cliquant sur un bouton de commande sur un formulaire. Cependant, le format
d'étiquettes de l'état est "fixe"!
Merci à qui peut m'aider ou me donner des références à ce sujet.
Butch
.
Salut,
Pour cela, il faut créer un état pour chaque modèle voulu.
Ensuite, dans VBA, il faut aller voir le code d'ouverture
de l'état (dans les évènements sur clic du bouton). Là,
une variable stdocname prend le nom de l'état.
Ce qu'il faut, c'est que lorsque tu as choisi ton modèle
et que tu appuies sur OK, une variable récupère le nom de
modèle choisi, et que la variable citée plus haut prenne
comme valeur le nom de l'état correspondant.
Pour ce faire, essayer ce code :
dim nommod as string
nommod = listemodifiable.value
ensuite, si les noms de la liste modifiables sont bien les
noms des états :
stdocname=nommod
Enfin, laisser le reste du code qui est l'ouverture de
l'état dont le nom est stdocname.
ca devrait fonctionner...
-----Message d'origine-----
Bonjour,
Configuration: Access 2000 - Windows 98 SE.
J'aimerais pouvoir créer des étiquettes pour un
publipostage en utilisant
l'assistant à cet effet dans Access.
Cependant, j'aimerais qu'au moment de l'ouverture de
l'état créant les
étiquettes, avoir la possibilité de choisir un format
différent entre 4 ou 5
formats (identifiés au préalable) parmi ceux offerts
dans Access.
J'aimerais donc que le processus se passe ainsi:
Chaque fois que la commande d'ouverture de l'état est
activée en cliquant
sur un bouton de commande placé sur un formulaire, une
boîte de dialogue
pourrait apparaître à l'écran. Dans celle-ci, avoir déjà
la liste des 4 ou
5 formats d'étiquettes.
Ensuite, il suffirait de sélectionner le format désiré
puis de cliquer sur
un bouton (ex: OK) pour que l'état s'ouvre avec le format
d'étiquettes
choisi et que le publipostage se fasse.
Je crois que tout cela pourrait être possible mais
voilà... je ne sais pas
comment développer cette procédure dans Access n'étant
pas très à l'aise
avec VBA.
P.-S: J'ai déjà une requête et un état qui effectue ce
publipostage en
cliquant sur un bouton de commande sur un formulaire.
Cependant, le format
d'étiquettes de l'état est "fixe"!
Merci à qui peut m'aider ou me donner des références à ce
sujet.
Salut, Pour cela, il faut créer un état pour chaque modèle voulu. Ensuite, dans VBA, il faut aller voir le code d'ouverture de l'état (dans les évènements sur clic du bouton). Là, une variable stdocname prend le nom de l'état. Ce qu'il faut, c'est que lorsque tu as choisi ton modèle et que tu appuies sur OK, une variable récupère le nom de modèle choisi, et que la variable citée plus haut prenne comme valeur le nom de l'état correspondant. Pour ce faire, essayer ce code :
dim nommod as string nommod = listemodifiable.value
ensuite, si les noms de la liste modifiables sont bien les noms des états :
stdocname=nommod
Enfin, laisser le reste du code qui est l'ouverture de l'état dont le nom est stdocname.
ca devrait fonctionner...
-----Message d'origine----- Bonjour,
Configuration: Access 2000 - Windows 98 SE.
J'aimerais pouvoir créer des étiquettes pour un publipostage en utilisant
l'assistant à cet effet dans Access. Cependant, j'aimerais qu'au moment de l'ouverture de l'état créant les
étiquettes, avoir la possibilité de choisir un format différent entre 4 ou 5
formats (identifiés au préalable) parmi ceux offerts dans Access.
J'aimerais donc que le processus se passe ainsi: Chaque fois que la commande d'ouverture de l'état est activée en cliquant
sur un bouton de commande placé sur un formulaire, une boîte de dialogue
pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou
5 formats d'étiquettes. Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur
un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes
choisi et que le publipostage se fasse.
Je crois que tout cela pourrait être possible mais voilà... je ne sais pas
comment développer cette procédure dans Access n'étant pas très à l'aise
avec VBA.
P.-S: J'ai déjà une requête et un état qui effectue ce publipostage en
cliquant sur un bouton de commande sur un formulaire. Cependant, le format
d'étiquettes de l'état est "fixe"!
Merci à qui peut m'aider ou me donner des références à ce sujet.
Butch
.
Butch
Bonjour Phil,
Merci pour les indications. Tout fonctionne à merveille!
Butch
Bonjour Phil,
Merci pour les indications. Tout fonctionne à merveille!
Merci pour les indications. Tout fonctionne à merveille!
Butch
3stone
Salut,
"Butch"
J'aimerais donc que le processus se passe ainsi: Chaque fois que la commande d'ouverture de l'état est activée en cliquant sur un bouton de commande placé sur un formulaire, une boîte de dialogue pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou 5 formats d'étiquettes. Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes choisi et que le publipostage se fasse.
Préparer les "états d'étiquettes" à l'avance... avec une nom commencant par: "Etiquette_" (par exemple)
Sur le formulaire qui propose le choix, créer une liste "lst_EtatEtiquette" qui "présente" les différents modèles.
Sur ouverture du formulaire...
'Peupler la liste déroulante avec les noms d'état stockés 'dans la collection Documents du conteneur Reports
Dim Bdd As Database, rpt As Document, cnt As Container Dim strContenuValeurs As String, NomEtat As String Set Bdd = CurrentDb Set cnt = Bdd.Containers!Reports 'Lecture de la collection documents du conteneur Reports 'pour construire la liste des valeurs peuplant la liste déroulante For Each rpt In cnt.Documents If Left(rpt.Name, 2) = "Etiquette_" Then NomEtat = rpt.Name strContenuValeurs = strContenuValeurs & NomEtat & ";" End If Next rpt Me!lst_EtatEtiquette.RowSource = strContenuValeurs Set cnt = Nothing Set Bdd = Nothing
Ajouter un bouton qui permet de lancer l'impression...
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Salut,
"Butch"
J'aimerais donc que le processus se passe ainsi:
Chaque fois que la commande d'ouverture de l'état est activée en cliquant
sur un bouton de commande placé sur un formulaire, une boîte de dialogue
pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou
5 formats d'étiquettes.
Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur
un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes
choisi et que le publipostage se fasse.
Préparer les "états d'étiquettes" à l'avance...
avec une nom commencant par: "Etiquette_" (par exemple)
Sur le formulaire qui propose le choix, créer une liste "lst_EtatEtiquette"
qui "présente" les différents modèles.
Sur ouverture du formulaire...
'Peupler la liste déroulante avec les noms d'état stockés
'dans la collection Documents du conteneur Reports
Dim Bdd As Database, rpt As Document, cnt As Container
Dim strContenuValeurs As String, NomEtat As String
Set Bdd = CurrentDb
Set cnt = Bdd.Containers!Reports
'Lecture de la collection documents du conteneur Reports
'pour construire la liste des valeurs peuplant la liste déroulante
For Each rpt In cnt.Documents
If Left(rpt.Name, 2) = "Etiquette_" Then
NomEtat = rpt.Name
strContenuValeurs = strContenuValeurs & NomEtat & ";"
End If
Next rpt
Me!lst_EtatEtiquette.RowSource = strContenuValeurs
Set cnt = Nothing
Set Bdd = Nothing
Ajouter un bouton qui permet de lancer l'impression...
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
J'aimerais donc que le processus se passe ainsi: Chaque fois que la commande d'ouverture de l'état est activée en cliquant sur un bouton de commande placé sur un formulaire, une boîte de dialogue pourrait apparaître à l'écran. Dans celle-ci, avoir déjà la liste des 4 ou 5 formats d'étiquettes. Ensuite, il suffirait de sélectionner le format désiré puis de cliquer sur un bouton (ex: OK) pour que l'état s'ouvre avec le format d'étiquettes choisi et que le publipostage se fasse.
Préparer les "états d'étiquettes" à l'avance... avec une nom commencant par: "Etiquette_" (par exemple)
Sur le formulaire qui propose le choix, créer une liste "lst_EtatEtiquette" qui "présente" les différents modèles.
Sur ouverture du formulaire...
'Peupler la liste déroulante avec les noms d'état stockés 'dans la collection Documents du conteneur Reports
Dim Bdd As Database, rpt As Document, cnt As Container Dim strContenuValeurs As String, NomEtat As String Set Bdd = CurrentDb Set cnt = Bdd.Containers!Reports 'Lecture de la collection documents du conteneur Reports 'pour construire la liste des valeurs peuplant la liste déroulante For Each rpt In cnt.Documents If Left(rpt.Name, 2) = "Etiquette_" Then NomEtat = rpt.Name strContenuValeurs = strContenuValeurs & NomEtat & ";" End If Next rpt Me!lst_EtatEtiquette.RowSource = strContenuValeurs Set cnt = Nothing Set Bdd = Nothing
Ajouter un bouton qui permet de lancer l'impression...
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
