Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Problème impression d'un classeur excel

Problème impression d'un classeur excel

11 réponses
Avatar
richard28
Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2
Avatar
michdenis
Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28
Avatar
richard28
Merci michdenis de ton attention
Précision:
Je lance bien ,un dossier à la fois et les dossiers sont identiques.C'est le
contenu qui change.(Références,opération, ect )

Quant je parle de paramétrage c'est par le biais de VBA comme ton exemple.

Le soucis c'est que même paramétré et imprimé manuellement le problème
subsiste.

Il y peut-être comme "un saut de document" qui génére un autre Job
d'impression ?

--
richard28



Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28





Avatar
michdenis
Bonjour Richard,

Si tu lances "aperçu avant impression" de ton fichier est-ce que le nombre de pages est ok ?

P.S. Si tu as une mise en page très précise... tu devras probablement refaire la mise
en page si tu changes d'imprimante. Chacune de ces dernières ont des spécificités
particulières déterminées par leur "pilote" (driver)


Salutations!





"richard28" a écrit dans le message de news:

Merci michdenis de ton attention
Précision:
Je lance bien ,un dossier à la fois et les dossiers sont identiques.C'est le
contenu qui change.(Références,opération, ect )

Quant je parle de paramétrage c'est par le biais de VBA comme ton exemple.

Le soucis c'est que même paramétré et imprimé manuellement le problème
subsiste.

Il y peut-être comme "un saut de document" qui génére un autre Job
d'impression ?

--
richard28



Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28





Avatar
richard28
Merci michdenis je me sens moins seul.

Mon aperçu est correcte.Je n'ai pas de problème de mise en page.Si je
reprend mon exemple de mon classeur de 10 feuilles avec une seule page par
onglet,mon aperçu sera bon : 10 feuilles non tronquées.
C'est qu'elles ne vont pas être toutes les dix dans le même job d'impression
dans la file d'attente de mon imprimante .

Ma file d'attente normale serait :

Nom du document pages etat
ect....
toto.xls 10

Alors que j'obtiens ceci :

Nom du document pages etat
ect....
toto.xls 2
toto.xls 1
toto.xls 4
toto.xls 2
toto.xls 1

J'aurai bien mes dix feuilles d'imprimées correctement mais, en 5 lots
différents.

Etant donné que j'agrafe mon dossier par l'imprimante ,au lieue d'avoir 10
feuilles sur un seul agrafage (1 dossier) j'ai 1 agrafage par lot
d'impression donc 5 petits dossiers!

Questions:
Est-il possible de renomer le nom d'une feuille en tant qu'objet avec un
code VBA ou VB6. Pas le nom qui se trouve sur l'onglet bien sûre,mais sur
VBAProject lorsque l'on fait la propriété d'une feuille il y a 2 noms
(name) et name : le name entre parenthéses est le nom de l'objet je suppose.


bonsoir

--
richard28



Bonjour Richard,

Si tu lances "aperçu avant impression" de ton fichier est-ce que le nombre de pages est ok ?

P.S. Si tu as une mise en page très précise... tu devras probablement refaire la mise
en page si tu changes d'imprimante. Chacune de ces dernières ont des spécificités
particulières déterminées par leur "pilote" (driver)


Salutations!





"richard28" a écrit dans le message de news:

Merci michdenis de ton attention
Précision:
Je lance bien ,un dossier à la fois et les dossiers sont identiques.C'est le
contenu qui change.(Références,opération, ect )

Quant je parle de paramétrage c'est par le biais de VBA comme ton exemple.

Le soucis c'est que même paramétré et imprimé manuellement le problème
subsiste.

Il y peut-être comme "un saut de document" qui génére un autre Job
d'impression ?

--
richard28



Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28










Avatar
michdenis
Bonjour Richard28,

Si tu ouvres ton fichier, sélectionne les 10 feuilles de ton classeur et lance l'impression et que la sortie
de l'impression se fait selon ce que tu as indiqué, moi, je n'ai jamais vu ça !!!

Si tu le fais par VBA, tu devrais publier l'intégralité de la macro.


Salutations!



"richard28" a écrit dans le message de news:

Merci michdenis je me sens moins seul.

Mon aperçu est correcte.Je n'ai pas de problème de mise en page.Si je
reprend mon exemple de mon classeur de 10 feuilles avec une seule page par
onglet,mon aperçu sera bon : 10 feuilles non tronquées.
C'est qu'elles ne vont pas être toutes les dix dans le même job d'impression
dans la file d'attente de mon imprimante .

Ma file d'attente normale serait :

Nom du document pages etat
ect....
toto.xls 10

Alors que j'obtiens ceci :

Nom du document pages etat
ect....
toto.xls 2
toto.xls 1
toto.xls 4
toto.xls 2
toto.xls 1

J'aurai bien mes dix feuilles d'imprimées correctement mais, en 5 lots
différents.

Etant donné que j'agrafe mon dossier par l'imprimante ,au lieue d'avoir 10
feuilles sur un seul agrafage (1 dossier) j'ai 1 agrafage par lot
d'impression donc 5 petits dossiers!

Questions:
Est-il possible de renomer le nom d'une feuille en tant qu'objet avec un
code VBA ou VB6. Pas le nom qui se trouve sur l'onglet bien sûre,mais sur
VBAProject lorsque l'on fait la propriété d'une feuille il y a 2 noms
(name) et name : le name entre parenthéses est le nom de l'objet je suppose.


bonsoir

--
richard28



Bonjour Richard,

Si tu lances "aperçu avant impression" de ton fichier est-ce que le nombre de pages est ok ?

P.S. Si tu as une mise en page très précise... tu devras probablement refaire la mise
en page si tu changes d'imprimante. Chacune de ces dernières ont des spécificités
particulières déterminées par leur "pilote" (driver)


Salutations!





"richard28" a écrit dans le message de news:

Merci michdenis de ton attention
Précision:
Je lance bien ,un dossier à la fois et les dossiers sont identiques.C'est le
contenu qui change.(Références,opération, ect )

Quant je parle de paramétrage c'est par le biais de VBA comme ton exemple.

Le soucis c'est que même paramétré et imprimé manuellement le problème
subsiste.

Il y peut-être comme "un saut de document" qui génére un autre Job
d'impression ?

--
richard28



Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28










Avatar
richard28
Bonjour michdenis

Tu as bien compris, c'est pourtant ce qui ce passe.
Il faut absolument trouver ce qui provoque ce découpage dans l'impression en
manuel, avant de régler le probléme du code VBA.
Depuis plus d'un an, avec la société d' entretient de nos imprimantes (qui
connait chez d'autre client, ce probléme),nous avons essayé plusieurs driver
sur plusieurs marques différentes,même soucis.Pour eux ce probléme est lié à
Excel.Il y a une info dans le classeur qui au moment de l'impression, entre 2
feuilles est interpretée comme un nouveau document ou un saut de document.
Si tu n'agrafe pas et si tu ne fais pas de recto/verso sur ton dossier le
probléme ne se voit pas.

Pour moi il faut chercher l'info/propriété qui définie qu'une feuille est la
derniére feuille d'un classeur,et je ne trouve pas.


--
richard28



Bonjour Richard28,

Si tu ouvres ton fichier, sélectionne les 10 feuilles de ton classeur et lance l'impression et que la sortie
de l'impression se fait selon ce que tu as indiqué, moi, je n'ai jamais vu ça !!!

Si tu le fais par VBA, tu devrais publier l'intégralité de la macro.


Salutations!



"richard28" a écrit dans le message de news:

Merci michdenis je me sens moins seul.

Mon aperçu est correcte.Je n'ai pas de problème de mise en page.Si je
reprend mon exemple de mon classeur de 10 feuilles avec une seule page par
onglet,mon aperçu sera bon : 10 feuilles non tronquées.
C'est qu'elles ne vont pas être toutes les dix dans le même job d'impression
dans la file d'attente de mon imprimante .

Ma file d'attente normale serait :

Nom du document pages etat
ect....
toto.xls 10

Alors que j'obtiens ceci :

Nom du document pages etat
ect....
toto.xls 2
toto.xls 1
toto.xls 4
toto.xls 2
toto.xls 1

J'aurai bien mes dix feuilles d'imprimées correctement mais, en 5 lots
différents.

Etant donné que j'agrafe mon dossier par l'imprimante ,au lieue d'avoir 10
feuilles sur un seul agrafage (1 dossier) j'ai 1 agrafage par lot
d'impression donc 5 petits dossiers!

Questions:
Est-il possible de renomer le nom d'une feuille en tant qu'objet avec un
code VBA ou VB6. Pas le nom qui se trouve sur l'onglet bien sûre,mais sur
VBAProject lorsque l'on fait la propriété d'une feuille il y a 2 noms
(name) et name : le name entre parenthéses est le nom de l'objet je suppose.


bonsoir

--
richard28



Bonjour Richard,

Si tu lances "aperçu avant impression" de ton fichier est-ce que le nombre de pages est ok ?

P.S. Si tu as une mise en page très précise... tu devras probablement refaire la mise
en page si tu changes d'imprimante. Chacune de ces dernières ont des spécificités
particulières déterminées par leur "pilote" (driver)


Salutations!





"richard28" a écrit dans le message de news:

Merci michdenis de ton attention
Précision:
Je lance bien ,un dossier à la fois et les dossiers sont identiques.C'est le
contenu qui change.(Références,opération, ect )

Quant je parle de paramétrage c'est par le biais de VBA comme ton exemple.

Le soucis c'est que même paramétré et imprimé manuellement le problème
subsiste.

Il y peut-être comme "un saut de document" qui génére un autre Job
d'impression ?

--
richard28



Bonjour Richard28,

Si tu lances plusieurs impression de fichier en même temps,
si chaque fichier qui sera imprimé n'a pas une mise en page
spécifique, la présentation sera la même... les marges par exemple
peuvent être très bien pour un fichier mais devenir problématique
pour un autre...

Il est préférable de définir par une macro une mise en page spécifique
pour chacun de tes classeurs.

Tu pourrais insérer une procédure de ce type dans le ThisWorkbook de chaque
classeur au besoin :

'------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim Sh As Worksheet

For Each Sh In ActiveWindow.SelectedSheets
With Sh
With .PageSetup
.CenterFooter = "x"
.BottomMargin = "y"
.HeaderMargin = "z"
End With
End With
Next

End Sub
'------------------------

P.S. Seulement quelques propriétés au hasard a été énuméré. La liste
des propriétés à définir est beaucoup plus longue ... selon tes besoins.


Salutations!





"richard28" a écrit dans le message de news:

Bonjour à tous

Le probléme est simple, j'imprime des classeurs excel pour des gammes de
fabrication avec VBA. ex: Pour un classeur de 10 feuilles j'ai dix onglets
de 1 page,
je sélectionne toutes les feuilles et paramétre
l'impression(format,marge,zoom ect..).Dans la file d'attente de l'imprimante
j'ai plusieurs fichiers en impression!
Mon classeur de 10 pages (que j'agrafe) se transforme en 2 ou trois dossiers
de plusieur pages voir de 1 page agrafés séparément.
En plus ce phénomène n'est pas systématique à tous mes nouveaux dossiers.
Quelqu'un a-t-il déjà recontré et surtout résolu ce probléme?
Merci d'avance




--
richard28















Avatar
Modeste
Bonsour® richard28 avec ferveur ;o))) vous nous disiez :

.Il y a une info dans le classeur qui au moment de l'impression, entre 2
feuilles est interpretée comme un nouveau document ou un saut de document.


c'est exact, et c'est le fonctionnement standard d'un spooler impression,
cela n'a rien a voir avec EXCEL ou autre application
il s'agit de quelques codes ASCII parmi : FF; ETX;
EOT;ETS;ETS;EM;FS;GS;RS;US
codes de valeur inférieurs à 32 déc ou 20 hex

Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???

puisque tu parles d'agrafage, ton imprimante semble dotée de capacités
multifonctions évoluées,
il devrait etre possible alors de lui envoyer l'ordre de regroupement puis
d'agrafage
( voir dans ce cas la doc de l'imprimante)
ceci s'effectue sous forme de chaine codée spécifique envoyé vers
l'imprimante comme un vulgaire fichier.


encore faut-il que "le systeme de dictature informatique" ;o)))
en ai laissé la possibilité à l'utilisateur final,
ce qui n'était pas le cas chez mon ancien employeur....
seule était possible les commandes au tableau de bord (Xerox et Lexmark je
n'ai plus les types)

mais ce fonctionnement était possible puisque j'ai eu sous les yeux le
manuel d'utilisation avancée
ainsi que ces fameuses chaines de commandes codées.

le code VBA devrait alors ressembler à ceci :

for each classeur in workbooks
envoi de l'ordre de regroupement(ou réservation)
for each onglet in classeur.onglets
print.onglet
next
envoie ordre d'agrafage
next

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr

Avatar
richard28
Salut modeste
Quand je parle de l'info générée entre 2 feuilles d'un dossier excel ,c'est
l'info de création d'un nouveau job d'impression. L'impression classique d'un
dossier crée 1 seul job par dossier imprimé dans la file d'attente de
l'imprimante, qui lui imprime x pages.
Une impression de 10 feuilles sélectionnées = 1 job
S'il y a plusieurs job c'est qu'il y a quelque chose qui perturbe le spool
et crée un job suplémentaire.Mais quoi?

tu dis:
Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???
Les dossiers contiennent 1 seul page par onglet: nombre de copie = 1

J'ai des dossiers du même type(même structure,même paramétres) qui ne posent
pas de problèmes à l'impression.
Mais aucune différences (visible) entre les propriétés de :ThisWorkbook ou
individuellement par feuille.

Quand la société de maintenance nous dit Excel,ils ont fait beaucoup de
testes avec moi et de leur coté, c'est le dossier qu'elle incrimine et non
pas l'application par elle-même.

Merci de ton écoute et peut-être bientôt une solution.


--
richard28



Bonsour® richard28 avec ferveur ;o))) vous nous disiez :

.Il y a une info dans le classeur qui au moment de l'impression, entre 2
feuilles est interpretée comme un nouveau document ou un saut de document.


c'est exact, et c'est le fonctionnement standard d'un spooler impression,
cela n'a rien a voir avec EXCEL ou autre application
il s'agit de quelques codes ASCII parmi : FF; ETX;
EOT;ETS;ETS;EM;FS;GS;RS;US
codes de valeur inférieurs à 32 déc ou 20 hex

Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???

puisque tu parles d'agrafage, ton imprimante semble dotée de capacités
multifonctions évoluées,
il devrait etre possible alors de lui envoyer l'ordre de regroupement puis
d'agrafage
( voir dans ce cas la doc de l'imprimante)
ceci s'effectue sous forme de chaine codée spécifique envoyé vers
l'imprimante comme un vulgaire fichier.


encore faut-il que "le systeme de dictature informatique" ;o)))
en ai laissé la possibilité à l'utilisateur final,
ce qui n'était pas le cas chez mon ancien employeur....
seule était possible les commandes au tableau de bord (Xerox et Lexmark je
n'ai plus les types)

mais ce fonctionnement était possible puisque j'ai eu sous les yeux le
manuel d'utilisation avancée
ainsi que ces fameuses chaines de commandes codées.

le code VBA devrait alors ressembler à ceci :

for each classeur in workbooks
envoi de l'ordre de regroupement(ou réservation)
for each onglet in classeur.onglets
print.onglet
next
envoie ordre d'agrafage
next

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr






Avatar
michdenis
Bonjour Richard28,

Si cette problématique est présente seulement dans un ou 2 fichiers,
tu peux toujours copier les feuilles de ce classeur vers un nouveau et
tenter de lancer une impression "test"

Pour copier l'ensemble de tes feuilles vers un nouveau classeur :

Sub Copie()
Sheets.copy
En sub

Si cela solutionne ton problème, tu peux directement copier les modules
et formulaires le cas échéant en glissant à l'aide de la souris, ces éléments
vers ton nouveau classeur en utilisant la fenêtre d'édition de code VBA.


Salutations!


"richard28" a écrit dans le message de news:

Salut modeste
Quand je parle de l'info générée entre 2 feuilles d'un dossier excel ,c'est
l'info de création d'un nouveau job d'impression. L'impression classique d'un
dossier crée 1 seul job par dossier imprimé dans la file d'attente de
l'imprimante, qui lui imprime x pages.
Une impression de 10 feuilles sélectionnées = 1 job
S'il y a plusieurs job c'est qu'il y a quelque chose qui perturbe le spool
et crée un job suplémentaire.Mais quoi?

tu dis:
Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???
Les dossiers contiennent 1 seul page par onglet: nombre de copie = 1

J'ai des dossiers du même type(même structure,même paramétres) qui ne posent
pas de problèmes à l'impression.
Mais aucune différences (visible) entre les propriétés de :ThisWorkbook ou
individuellement par feuille.

Quand la société de maintenance nous dit Excel,ils ont fait beaucoup de
testes avec moi et de leur coté, c'est le dossier qu'elle incrimine et non
pas l'application par elle-même.

Merci de ton écoute et peut-être bientôt une solution.


--
richard28



Bonsour® richard28 avec ferveur ;o))) vous nous disiez :

.Il y a une info dans le classeur qui au moment de l'impression, entre 2
feuilles est interpretée comme un nouveau document ou un saut de document.


c'est exact, et c'est le fonctionnement standard d'un spooler impression,
cela n'a rien a voir avec EXCEL ou autre application
il s'agit de quelques codes ASCII parmi : FF; ETX;
EOT;ETS;ETS;EM;FS;GS;RS;US
codes de valeur inférieurs à 32 déc ou 20 hex

Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???

puisque tu parles d'agrafage, ton imprimante semble dotée de capacités
multifonctions évoluées,
il devrait etre possible alors de lui envoyer l'ordre de regroupement puis
d'agrafage
( voir dans ce cas la doc de l'imprimante)
ceci s'effectue sous forme de chaine codée spécifique envoyé vers
l'imprimante comme un vulgaire fichier.


encore faut-il que "le systeme de dictature informatique" ;o)))
en ai laissé la possibilité à l'utilisateur final,
ce qui n'était pas le cas chez mon ancien employeur....
seule était possible les commandes au tableau de bord (Xerox et Lexmark je
n'ai plus les types)

mais ce fonctionnement était possible puisque j'ai eu sous les yeux le
manuel d'utilisation avancée
ainsi que ces fameuses chaines de commandes codées.

le code VBA devrait alors ressembler à ceci :

for each classeur in workbooks
envoi de l'ordre de regroupement(ou réservation)
for each onglet in classeur.onglets
print.onglet
next
envoie ordre d'agrafage
next

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr






Avatar
richard28
Merci de ne pas m'anbandonner.

J'ai environ 100 à 150 dossiers à éditer par mois et le problème se produit
au moins sur un tier.
Il y a t-il un moyen que je te passe un classeur Excel pour que tu constates.


--
richard28



Bonjour Richard28,

Si cette problématique est présente seulement dans un ou 2 fichiers,
tu peux toujours copier les feuilles de ce classeur vers un nouveau et
tenter de lancer une impression "test"

Pour copier l'ensemble de tes feuilles vers un nouveau classeur :

Sub Copie()
Sheets.copy
En sub

Si cela solutionne ton problème, tu peux directement copier les modules
et formulaires le cas échéant en glissant à l'aide de la souris, ces éléments
vers ton nouveau classeur en utilisant la fenêtre d'édition de code VBA.


Salutations!


"richard28" a écrit dans le message de news:

Salut modeste
Quand je parle de l'info générée entre 2 feuilles d'un dossier excel ,c'est
l'info de création d'un nouveau job d'impression. L'impression classique d'un
dossier crée 1 seul job par dossier imprimé dans la file d'attente de
l'imprimante, qui lui imprime x pages.
Une impression de 10 feuilles sélectionnées = 1 job
S'il y a plusieurs job c'est qu'il y a quelque chose qui perturbe le spool
et crée un job suplémentaire.Mais quoi?

tu dis:
Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???
Les dossiers contiennent 1 seul page par onglet: nombre de copie = 1

J'ai des dossiers du même type(même structure,même paramétres) qui ne posent
pas de problèmes à l'impression.
Mais aucune différences (visible) entre les propriétés de :ThisWorkbook ou
individuellement par feuille.

Quand la société de maintenance nous dit Excel,ils ont fait beaucoup de
testes avec moi et de leur coté, c'est le dossier qu'elle incrimine et non
pas l'application par elle-même.

Merci de ton écoute et peut-être bientôt une solution.


--
richard28



Bonsour® richard28 avec ferveur ;o))) vous nous disiez :

.Il y a une info dans le classeur qui au moment de l'impression, entre 2
feuilles est interpretée comme un nouveau document ou un saut de document.


c'est exact, et c'est le fonctionnement standard d'un spooler impression,
cela n'a rien a voir avec EXCEL ou autre application
il s'agit de quelques codes ASCII parmi : FF; ETX;
EOT;ETS;ETS;EM;FS;GS;RS;US
codes de valeur inférieurs à 32 déc ou 20 hex

Comment pourrait-ton savoir que c'est 10 pages différentes d'un meme onglet
ou 10 fois la meme page ???

puisque tu parles d'agrafage, ton imprimante semble dotée de capacités
multifonctions évoluées,
il devrait etre possible alors de lui envoyer l'ordre de regroupement puis
d'agrafage
( voir dans ce cas la doc de l'imprimante)
ceci s'effectue sous forme de chaine codée spécifique envoyé vers
l'imprimante comme un vulgaire fichier.


encore faut-il que "le systeme de dictature informatique" ;o)))
en ai laissé la possibilité à l'utilisateur final,
ce qui n'était pas le cas chez mon ancien employeur....
seule était possible les commandes au tableau de bord (Xerox et Lexmark je
n'ai plus les types)

mais ce fonctionnement était possible puisque j'ai eu sous les yeux le
manuel d'utilisation avancée
ainsi que ces fameuses chaines de commandes codées.

le code VBA devrait alors ressembler à ceci :

for each classeur in workbooks
envoi de l'ordre de regroupement(ou réservation)
for each onglet in classeur.onglets
print.onglet
next
envoie ordre d'agrafage
next

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr











1 2