Je voulais savoir s'il est possible depuis une commande sur un formulaire
lors de l'ouverture d'un état de spécifié l'imprimante à utiliser.
Actuellement j'ai copier-coller mon état en définissant pour chaque état
(états identiques) l'imprimante à utiliser et je perds beaucoup de temps
quand il faut modifier le contenu de l'état...
"Julien" | Je n'arrive pas à arriver à mes fins... | voila la fonction, dois-je rajouter un docmd.openreport ? | | Private Sub impdir_Click() | Dim repMonEtat As Report | repMonEtat = "P_DOC" | repMonEtat.UseDefaultPrinter = True | End Sub
Ceci permet d'attribuer à l'état (en mode création) la propriété "imprimante par défaut" par opposition à l'imprimante spécifique...
Par contre, pour revenir à l'imprimante "par défaut", il faut mémoriser son nom:
Dim oldName As String oldName = Printer.DeviceName
qu'il suffit de réaffecter après le détournement...
Si tu vas regarder ici http://officesystem.access.free.fr/prnprinters.htm tu peux installer une "couche supplémentaire" si tu trouve cela plus simple ;-)
"Julien"
| Je n'arrive pas à arriver à mes fins...
| voila la fonction, dois-je rajouter un docmd.openreport ?
|
| Private Sub impdir_Click()
| Dim repMonEtat As Report
| repMonEtat = "P_DOC"
| repMonEtat.UseDefaultPrinter = True
| End Sub
Ceci permet d'attribuer à l'état (en mode création) la propriété "imprimante par défaut"
par opposition à l'imprimante spécifique...
Par contre, pour revenir à l'imprimante "par défaut", il faut mémoriser son nom:
Dim oldName As String
oldName = Printer.DeviceName
qu'il suffit de réaffecter après le détournement...
Si tu vas regarder ici http://officesystem.access.free.fr/prnprinters.htm
tu peux installer une "couche supplémentaire" si tu trouve cela plus simple ;-)
"Julien" | Je n'arrive pas à arriver à mes fins... | voila la fonction, dois-je rajouter un docmd.openreport ? | | Private Sub impdir_Click() | Dim repMonEtat As Report | repMonEtat = "P_DOC" | repMonEtat.UseDefaultPrinter = True | End Sub
Ceci permet d'attribuer à l'état (en mode création) la propriété "imprimante par défaut" par opposition à l'imprimante spécifique...
Par contre, pour revenir à l'imprimante "par défaut", il faut mémoriser son nom:
Dim oldName As String oldName = Printer.DeviceName
qu'il suffit de réaffecter après le détournement...
Si tu vas regarder ici http://officesystem.access.free.fr/prnprinters.htm tu peux installer une "couche supplémentaire" si tu trouve cela plus simple ;-)
