Bonjour,
Voila je voudrai imprimer un fichier vers une imprimante avec l'option plusieur exemplaires:
[PLOT] = Renvoi le fichier inscrit dans la zone texte ex: c:\projet\me.plt
------------------------------------------------------------------------------------
Le code ci-dessous me renvoie erreur d'execution 53.
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub Commande152_Click() If [Optionlpt1] = True Then Shell ("copy " & [PLOT] & " LPT1") End If If [Optionlpt2] = True Then Shell ("copy " & [PLOT] & " LPT2:") End If End Sub
Partager