comment imprimer des fichiers Excel sous vb.net ?

Question

Bonjour

j'aimerai imprimer des fichiers excel sous vb.net et choisir l'imprimante 

Merci

mortalino · Answer

Salut,

regarde la source de notre ami Drikce :
http://www.vbfrance.com/codes/CODE-PERMETTANT-MANIPULER-OBJETS-EXCEL-NET_38534.aspx

Cela te permettra de manipuler un fichier Excel.

Pour le choix de l'imprimante, avant d'effectuer le PrintOut :
xlApp.ActivePrinter = "Nom de l'imprimante sur tel port"

@++

  --Mortalino-- 
Le Mystérieux Chevalier "Provençal, le Gaulois"

nakata77 · Answer

Bonjour

j'ai essayé 
Pour le choix de l'imprimante, avant d'effectuer le PrintOut :
xlApp.ActivePrinter = "Nom de l'imprimante sur tel port"
ça ne marche pas 

il m'inscrit comme erreur 
Exception from HRESULT: 0x800A03EC

ya t'il une autre solution 

merci

mortalino · Answer

Pour xlApp, remplace le par ta propre référence (si tu as déclaré ton classeur par un autre nom de vriable, met celui-là)

pour le nom de l'imprimante, ce doit-etre qque chose du style
"Desjet XXX sur Ne03"

++

nakata77 · Answer

j'ai utilisé le meme nom xlApp 
dans mon prog  et concernant le nom de l'imprimante j'ai mis
xlApp.ActivePrinter =  "
[file://\splpt10031\PILPT11Y1P sur Ne01: \splpt10031\PILPT11Y1P sur Ne01:]"mais ça veut pas marché , j'ai bien vérifié le nom de mon imprimante et si je met 
mon imprimante par defaut ("  \splpt10031\PLLPT11ZMR
 sur Ne01:")

[file://\splpt10031\PLLPT11ZMR xlApp.ActivePrinter  = "\splpt10031\PLLPT11ZMR] sur Ne01:"
la ça marche 
en faite j'ai l'impression qui veut pas d'autres imprimantes

j'ai essayé aussi 
xlApp.ActivePrinter = "[file://splpt10031/PILPT11Y1P%20sur%20Ne01: PILPT11Y1P sur Ne01:]"
ça marche pas 

merci 

++

mortalino · Answer

L'idéal, ce serait que tu ouvres excel, met en route l'enregistreur de macro*, puis fait "Fichier", "Imprimer...", sélectionne la bonne imprimante et fait l'impression (d'un fichier bidon, c'est juste pour la syntaxe).
Arrête l'enregistreur de macro et regarde le code, tu auras le nom précis de l'imprimante.

* pour lancer l'enregistreur de macro, fait un clic droit sur une zone libre de la barre d'outils, sélectionne Visual Basic, une petite fenêtre (rectangulaire) apparaît. Appuie sur le rond rouge (enregistrement).
Pour l'arrêter, c'est le carré. Ensuite sélectionne "Macro1", fait "modifier" (ou éditer, je sais plus trop)

@++

   Mortalino 
Le mystérieux chevalier, "Provençal, le Gaulois"

nakata77 · Answer

Merci beaucoup ,j'ai réussi a imprimer sur une autre imprimante 
c'est vrai que le nom de mon imprimante n'était pas exact, je suis désolé
Enfaite le nom de mon imprimante est bonne c'est juste le port qui n'était pas bon 
Tu sais comment on peut recupéré le port de l'imprimante ? 
merci
++

mortalino · Answer

Seulement de cette façon. 
En plus il y a les Switch qui viennent se gréfer au milieu donc pas évident.

Désolé,

@++

   Mortalino 
Le mystérieux chevalier, "Provençal, le Gaulois"

nakata77 · Answer

ok ok , j'ai trouvé kelke truc sur le net intérrésant 

pour obtenir les ports imprimantes aparament il faut utilisé Win_32 printer la classe 
celui te permettra d'avoir les portnames 

mais le problemme c'est que je n'arrive pas a l'utilisé 

je fais ça 

Dim mos 
As
New System.Management.ManagementObjectSearcher( _

"Select * from Win32_Printer")

Dim moc 
As System.Management.ManagementObjectCollection = _mos.Get()

Dim mo 
As System.Management.ManagementObject

For
Each mo 
In moc

string test = mo.portname

Nextça marche pas , je dois surement trop mal utilisé 

si tu as une idé ou une aide ou un lien merciiiiiiii

Comment imprimer des fichiers Excel sous vb.net ?

8 réponses

Votre réponse

Discussions similaires