stefano
Gebruiker
- Lid geworden
- 22 mei 2004
- Berichten
- 865
Ik maak gebruik van een bestand met 5 tabbladen.
tabblad data : gegevens over personen, printers, servers, ...
tabblad info : gegevens over klant, taalkeuze, ...
tabblad A : dokument met gegevens dat intern blijft
tabblad B (Nl) : nederlandstalig dokument dat chauffeur mee krijgt
tabblad B (Fr) : franstalig ...
tabblad B (D) : duitstalig ...
Document A en 1 document B (afhankelijk van de taalkeuze) moeten altijd afgedrukt worden, de anderen niet.
De documenten worden ingevuld in de productieruimte maar moeten afgedrukt worden op de weegbrug.
Selecteren van document A en en document B ( geselecteerde taal) en afdrukken op de standaardprinter lukt met onderstaande code, maar hoe bouw ik nu de code in om de twee geselecteerde tabbladen af te drukken op de netwerkprinter ( \\svrmid008\PRTMID012 op Ne09: ) ? En hoe kan ik na afdrukken de lokale standaardprinter opnieuw selecteren ?
tabblad data : gegevens over personen, printers, servers, ...
tabblad info : gegevens over klant, taalkeuze, ...
tabblad A : dokument met gegevens dat intern blijft
tabblad B (Nl) : nederlandstalig dokument dat chauffeur mee krijgt
tabblad B (Fr) : franstalig ...
tabblad B (D) : duitstalig ...
Document A en 1 document B (afhankelijk van de taalkeuze) moeten altijd afgedrukt worden, de anderen niet.
De documenten worden ingevuld in de productieruimte maar moeten afgedrukt worden op de weegbrug.
Selecteren van document A en en document B ( geselecteerde taal) en afdrukken op de standaardprinter lukt met onderstaande code, maar hoe bouw ik nu de code in om de twee geselecteerde tabbladen af te drukken op de netwerkprinter ( \\svrmid008\PRTMID012 op Ne09: ) ? En hoe kan ik na afdrukken de lokale standaardprinter opnieuw selecteren ?
Code:
Private Sub Afdruk_Click()
Dim taal As String
taal = Sheets("info").Range("U7")
Sheets("A").PrintOut
Sheets(taal).PrintOut
End sub
Bijlagen
Laatst bewerkt: