C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
"JièL Goubert" a écrit dans le message de news:ufhS$
Bonjoir(c) o.0
Bon, c'est plus clair, même si c'est un peut surprenant comme fonctionnement
Geo à sorti de derrière les fagots une macros qui me semble faire ce que tu
as besoin, je lui laisse le soin de t'en parler un peu mieux, je ne sais plus dans quel fil elle se trouve (...et je sais même pas si elle est pas un
peu superfétatoire :-ppp, pendant les vacances les AMIS se relachent un peu)
AMIS : Anti Macros Inutilement Superfétatoire
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Le 30/07/2004 16:18 vous avez écrit ceci :
Bé oui mé
En fait j'ai des documents qui proviennent d'un Centre de frappe...
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à
l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section
retour sur Bac 2.
Est-ce plus clair ? Il me faudrait une config générale pour tous ces documents.
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas
sur les autres...
"JièL Goubert" <NoSpam_JieL.Goubert@LaPoste-Net.Nospam> a écrit dans le
message de news:ufhS$6kdEHA.2384@TK2MSFTNGP09.phx.gbl...
Bonjoir(c) o.0
Bon, c'est plus clair, même si c'est un peut surprenant comme
fonctionnement
Geo à sorti de derrière les fagots une macros qui me semble faire ce que
tu
as besoin, je lui laisse le soin de t'en parler un peu mieux, je ne sais
plus dans quel fil elle se trouve (...et je sais même pas si elle est pas
un
peu superfétatoire :-ppp, pendant les vacances les AMIS se relachent un
peu)
AMIS : Anti Macros Inutilement Superfétatoire
--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Le 30/07/2004 16:18 vous avez écrit ceci :
Bé oui mé
En fait j'ai des documents qui proviennent d'un Centre de frappe...
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1
Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section
à
l'intérieur du doc..alors retour sur bac 1 et au prochain saut de
section
retour sur Bac 2.
Est-ce plus clair ? Il me faudrait une config générale pour tous ces
documents.
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
"JièL Goubert" a écrit dans le message de news:ufhS$
Bonjoir(c) o.0
Bon, c'est plus clair, même si c'est un peut surprenant comme fonctionnement
Geo à sorti de derrière les fagots une macros qui me semble faire ce que tu
as besoin, je lui laisse le soin de t'en parler un peu mieux, je ne sais plus dans quel fil elle se trouve (...et je sais même pas si elle est pas un
peu superfétatoire :-ppp, pendant les vacances les AMIS se relachent un peu)
AMIS : Anti Macros Inutilement Superfétatoire
-- La FAQ Outlook est la : http://faq.outlook.free.fr JièL / Jean-Louis GOUBERT Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm
Le 30/07/2004 16:18 vous avez écrit ceci :
Bé oui mé
En fait j'ai des documents qui proviennent d'un Centre de frappe...
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à
l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section
retour sur Bac 2.
Est-ce plus clair ? Il me faudrait une config générale pour tous ces documents.
Geo
Bonjour o.0
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans le modèle, intéressant et à creuser. Pour l'instant il y a trois enseignements à cette conversation : 1- Lorsque le souhait est exprimé clairement (et non la solution) on gagne un temps fou (j'allais écrire un temps four ) 2- JièL propose des macros superfétatoires sous réserve du point trois. 3- Une piste à suivre sur les possibilités des modèles à associer un bac à une section. Nous faudrait une magicienne ;-)
--
A+
Bonjour o.0
C'est curieux parce que ça fonctionne sur une bécane ici sans macro
mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans
le modèle, intéressant et à creuser.
Pour l'instant il y a trois enseignements à cette conversation :
1- Lorsque le souhait est exprimé clairement (et non la solution) on
gagne un temps fou (j'allais écrire un temps four )
2- JièL propose des macros superfétatoires sous réserve du point
trois.
3- Une piste à suivre sur les possibilités des modèles à associer un
bac à une section.
Nous faudrait une magicienne ;-)
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans le modèle, intéressant et à creuser. Pour l'instant il y a trois enseignements à cette conversation : 1- Lorsque le souhait est exprimé clairement (et non la solution) on gagne un temps fou (j'allais écrire un temps four ) 2- JièL propose des macros superfétatoires sous réserve du point trois. 3- Une piste à suivre sur les possibilités des modèles à associer un bac à une section. Nous faudrait une magicienne ;-)
--
A+
Geo
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans
le modèle, intéressant et à creuser.
Dans http://support.microsoft.com/?scid=kb;fr;469857 on nous dit : ------------- début de copie Le modèle Normal.dot contient les éléments suivants :
1. Les formats personnalisés (police par défaut, marges par défaut, alignement par défaut, les bordures par défaut) 2. Les styles. 3. Les insertions automatiques que l'on a créées. 4. Les macros que l'on a créées. 5. Les menus et boutons de barre d'outils personnalisés. -------------- fin de copie
Donc il nous reste : les styles, mais là pas vu de rapport avec l'imprimante ou le format du papier. Reste : les macros Pourquoi pas une petite macro automatique ?
-- A+
C'est curieux parce que ça fonctionne sur une bécane ici sans macro
mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé
dans
le modèle, intéressant et à creuser.
Dans
http://support.microsoft.com/?scid=kb;fr;469857
on nous dit :
------------- début de copie
Le modèle Normal.dot contient les éléments suivants :
1. Les formats personnalisés (police par défaut, marges par défaut,
alignement par défaut, les bordures par défaut)
2. Les styles.
3. Les insertions automatiques que l'on a créées.
4. Les macros que l'on a créées.
5. Les menus et boutons de barre d'outils personnalisés.
-------------- fin de copie
Donc il nous reste :
les styles, mais là pas vu de rapport avec l'imprimante ou le format
du papier.
Reste : les macros
Pourquoi pas une petite macro automatique ?
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans
le modèle, intéressant et à creuser.
Dans http://support.microsoft.com/?scid=kb;fr;469857 on nous dit : ------------- début de copie Le modèle Normal.dot contient les éléments suivants :
1. Les formats personnalisés (police par défaut, marges par défaut, alignement par défaut, les bordures par défaut) 2. Les styles. 3. Les insertions automatiques que l'on a créées. 4. Les macros que l'on a créées. 5. Les menus et boutons de barre d'outils personnalisés. -------------- fin de copie
Donc il nous reste : les styles, mais là pas vu de rapport avec l'imprimante ou le format du papier. Reste : les macros Pourquoi pas une petite macro automatique ?
-- A+
Geo
Bonjour o.0
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec l'évènement before print. Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta description soit incomplète En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Sub SectionsAvecBacsAlternés() Dim i As Integer Const P1 As Long = wdPrinterEnvelopeFeed Const S1 As Long = wdPrinterDefaultBin Const P2 As Long = wdPrinterTractorFeed Const S2 As Long = wdPrinterLargeCapacityBin Const P3 As Long = wdPrinterFormSource Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs : 'wdPrinterAutomaticSheetFeed 'wdPrinterDefaultBin 'wdPrinterEnvelopeFeed 'wdPrinterFormSource 'wdPrinterLargeCapacityBin 'wdPrinterLargeFormatBin 'wdPrinterLowerBin 'wdPrinterManualEnvelopeFeed 'wdPrinterManualFeed 'wdPrinterMiddleBin 'wdPrinterOnlyBin 'wdPrinterPaperCassette 'wdPrinterSmallFormatBin 'wdPrinterTractorFeed 'wdPrinterUpperBin With ActiveDocument.Sections(1).PageSetup 'première page du document .FirstPageTray = P1 ' le reste de la première section .OtherPagesTray = S1 End With For i = 2 To ActiveDocument.Sections.Count If i Mod 2 = 1 Then With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P3 .OtherPagesTray = S3 End With Else With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P2 .OtherPagesTray = S2 End With End If Next End Sub
Bonjour o.0
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1
Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de
section à l'intérieur du doc..alors retour sur bac 1 et au prochain
saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec
l'évènement before print.
Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta
description soit incomplète
En pratique on peut essayer les différentes valeurs (placées en
commentaires) puis regarder dans format Mise en page ce que ça donne
comme bac sélectionné.
C'est probablement intimement lié à l'imprimante utilisée, mais je
n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le
bac automatique par exemple.
Sub SectionsAvecBacsAlternés()
Dim i As Integer
Const P1 As Long = wdPrinterEnvelopeFeed
Const S1 As Long = wdPrinterDefaultBin
Const P2 As Long = wdPrinterTractorFeed
Const S2 As Long = wdPrinterLargeCapacityBin
Const P3 As Long = wdPrinterFormSource
Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs :
'wdPrinterAutomaticSheetFeed
'wdPrinterDefaultBin
'wdPrinterEnvelopeFeed
'wdPrinterFormSource
'wdPrinterLargeCapacityBin
'wdPrinterLargeFormatBin
'wdPrinterLowerBin
'wdPrinterManualEnvelopeFeed
'wdPrinterManualFeed
'wdPrinterMiddleBin
'wdPrinterOnlyBin
'wdPrinterPaperCassette
'wdPrinterSmallFormatBin
'wdPrinterTractorFeed
'wdPrinterUpperBin
With ActiveDocument.Sections(1).PageSetup
'première page du document
.FirstPageTray = P1
' le reste de la première section
.OtherPagesTray = S1
End With
For i = 2 To ActiveDocument.Sections.Count
If i Mod 2 = 1 Then
With ActiveDocument.Sections(i).PageSetup
.FirstPageTray = P3
.OtherPagesTray = S3
End With
Else
With ActiveDocument.Sections(i).PageSetup
.FirstPageTray = P2
.OtherPagesTray = S2
End With
End If
Next
End Sub
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec l'évènement before print. Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta description soit incomplète En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Sub SectionsAvecBacsAlternés() Dim i As Integer Const P1 As Long = wdPrinterEnvelopeFeed Const S1 As Long = wdPrinterDefaultBin Const P2 As Long = wdPrinterTractorFeed Const S2 As Long = wdPrinterLargeCapacityBin Const P3 As Long = wdPrinterFormSource Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs : 'wdPrinterAutomaticSheetFeed 'wdPrinterDefaultBin 'wdPrinterEnvelopeFeed 'wdPrinterFormSource 'wdPrinterLargeCapacityBin 'wdPrinterLargeFormatBin 'wdPrinterLowerBin 'wdPrinterManualEnvelopeFeed 'wdPrinterManualFeed 'wdPrinterMiddleBin 'wdPrinterOnlyBin 'wdPrinterPaperCassette 'wdPrinterSmallFormatBin 'wdPrinterTractorFeed 'wdPrinterUpperBin With ActiveDocument.Sections(1).PageSetup 'première page du document .FirstPageTray = P1 ' le reste de la première section .OtherPagesTray = S1 End With For i = 2 To ActiveDocument.Sections.Count If i Mod 2 = 1 Then With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P3 .OtherPagesTray = S3 End With Else With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P2 .OtherPagesTray = S2 End With End If Next End Sub
o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
"Geo" a écrit dans le message de news:
Bonjour o.0
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans le modèle, intéressant et à creuser. Pour l'instant il y a trois enseignements à cette conversation : 1- Lorsque le souhait est exprimé clairement (et non la solution) on gagne un temps fou (j'allais écrire un temps four ) 2- JièL propose des macros superfétatoires sous réserve du point trois. 3- Une piste à suivre sur les possibilités des modèles à associer un bac à une section. Nous faudrait une magicienne ;-)
--
A+
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents provenant de
ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en
fonction des sauts de section...mais alors : pquoi cela ne fonctionne t-il
pas avec certaines imprimantes ?
"Geo" <Geo@sans.pub> a écrit dans le message de
news:uJm2fNldEHA.1000@TK2MSFTNGP12.phx.gbl...
Bonjour o.0
C'est curieux parce que ça fonctionne sur une bécane ici sans macro
mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans
le modèle, intéressant et à creuser.
Pour l'instant il y a trois enseignements à cette conversation :
1- Lorsque le souhait est exprimé clairement (et non la solution) on
gagne un temps fou (j'allais écrire un temps four )
2- JièL propose des macros superfétatoires sous réserve du point
trois.
3- Une piste à suivre sur les possibilités des modèles à associer un
bac à une section.
Nous faudrait une magicienne ;-)
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
"Geo" a écrit dans le message de news:
Bonjour o.0
C'est curieux parce que ça fonctionne sur une bécane ici sans macro mais pas sur les autres...
Ce qui laisserait supposer que la bac d'imprimante est programmé dans le modèle, intéressant et à creuser. Pour l'instant il y a trois enseignements à cette conversation : 1- Lorsque le souhait est exprimé clairement (et non la solution) on gagne un temps fou (j'allais écrire un temps four ) 2- JièL propose des macros superfétatoires sous réserve du point trois. 3- Une piste à suivre sur les possibilités des modèles à associer un bac à une section. Nous faudrait une magicienne ;-)
--
A+
o.0
en la lançant avec l'évènement before print.
Euh c'est-à-dire ? Parce que je viens d'essayer la macro, (executée après ouverture des fameux docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
"Geo" a écrit dans le message de news:%
Bonjour o.0
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec l'évènement before print. Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta description soit incomplète En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Sub SectionsAvecBacsAlternés() Dim i As Integer Const P1 As Long = wdPrinterEnvelopeFeed Const S1 As Long = wdPrinterDefaultBin Const P2 As Long = wdPrinterTractorFeed Const S2 As Long = wdPrinterLargeCapacityBin Const P3 As Long = wdPrinterFormSource Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs : 'wdPrinterAutomaticSheetFeed 'wdPrinterDefaultBin 'wdPrinterEnvelopeFeed 'wdPrinterFormSource 'wdPrinterLargeCapacityBin 'wdPrinterLargeFormatBin 'wdPrinterLowerBin 'wdPrinterManualEnvelopeFeed 'wdPrinterManualFeed 'wdPrinterMiddleBin 'wdPrinterOnlyBin 'wdPrinterPaperCassette 'wdPrinterSmallFormatBin 'wdPrinterTractorFeed 'wdPrinterUpperBin With ActiveDocument.Sections(1).PageSetup 'première page du document .FirstPageTray = P1 ' le reste de la première section .OtherPagesTray = S1 End With For i = 2 To ActiveDocument.Sections.Count If i Mod 2 = 1 Then With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P3 .OtherPagesTray = S3 End With Else With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P2 .OtherPagesTray = S2 End With End If Next End Sub
en la lançant avec l'évènement before print.
Euh c'est-à-dire ?
Parce que je viens d'essayer la macro, (executée après ouverture des fameux
docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
"Geo" <Geo@sans.pub> a écrit dans le message de
news:%23Hf95budEHA.3512@TK2MSFTNGP12.phx.gbl...
Bonjour o.0
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1
Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de
section à l'intérieur du doc..alors retour sur bac 1 et au prochain
saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec
l'évènement before print.
Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta
description soit incomplète
En pratique on peut essayer les différentes valeurs (placées en
commentaires) puis regarder dans format Mise en page ce que ça donne
comme bac sélectionné.
C'est probablement intimement lié à l'imprimante utilisée, mais je
n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le
bac automatique par exemple.
Sub SectionsAvecBacsAlternés()
Dim i As Integer
Const P1 As Long = wdPrinterEnvelopeFeed
Const S1 As Long = wdPrinterDefaultBin
Const P2 As Long = wdPrinterTractorFeed
Const S2 As Long = wdPrinterLargeCapacityBin
Const P3 As Long = wdPrinterFormSource
Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs :
'wdPrinterAutomaticSheetFeed
'wdPrinterDefaultBin
'wdPrinterEnvelopeFeed
'wdPrinterFormSource
'wdPrinterLargeCapacityBin
'wdPrinterLargeFormatBin
'wdPrinterLowerBin
'wdPrinterManualEnvelopeFeed
'wdPrinterManualFeed
'wdPrinterMiddleBin
'wdPrinterOnlyBin
'wdPrinterPaperCassette
'wdPrinterSmallFormatBin
'wdPrinterTractorFeed
'wdPrinterUpperBin
With ActiveDocument.Sections(1).PageSetup
'première page du document
.FirstPageTray = P1
' le reste de la première section
.OtherPagesTray = S1
End With
For i = 2 To ActiveDocument.Sections.Count
If i Mod 2 = 1 Then
With ActiveDocument.Sections(i).PageSetup
.FirstPageTray = P3
.OtherPagesTray = S3
End With
Else
With ActiveDocument.Sections(i).PageSetup
.FirstPageTray = P2
.OtherPagesTray = S2
End With
End If
Next
End Sub
Euh c'est-à-dire ? Parce que je viens d'essayer la macro, (executée après ouverture des fameux docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
"Geo" a écrit dans le message de news:%
Bonjour o.0
Ces documents sont formatés de la sorte :
1ere page = page d'entête -> toujours sur Bac 1 Pages suivantes - > toutes sur Bac 2 sauf s'il existe un saut de section à l'intérieur du doc..alors retour sur bac 1 et au prochain saut de section retour sur Bac 2.
Voici une macro qui pourrait être automatisée en la lançant avec l'évènement before print. Elle va un peu au delà de ce que tu as demandé car je soupçonne que ta description soit incomplète En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Sub SectionsAvecBacsAlternés() Dim i As Integer Const P1 As Long = wdPrinterEnvelopeFeed Const S1 As Long = wdPrinterDefaultBin Const P2 As Long = wdPrinterTractorFeed Const S2 As Long = wdPrinterLargeCapacityBin Const P3 As Long = wdPrinterFormSource Const S3 As Long = wdPrinterLargeCapacityBin
' choix de bacs : 'wdPrinterAutomaticSheetFeed 'wdPrinterDefaultBin 'wdPrinterEnvelopeFeed 'wdPrinterFormSource 'wdPrinterLargeCapacityBin 'wdPrinterLargeFormatBin 'wdPrinterLowerBin 'wdPrinterManualEnvelopeFeed 'wdPrinterManualFeed 'wdPrinterMiddleBin 'wdPrinterOnlyBin 'wdPrinterPaperCassette 'wdPrinterSmallFormatBin 'wdPrinterTractorFeed 'wdPrinterUpperBin With ActiveDocument.Sections(1).PageSetup 'première page du document .FirstPageTray = P1 ' le reste de la première section .OtherPagesTray = S1 End With For i = 2 To ActiveDocument.Sections.Count If i Mod 2 = 1 Then With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P3 .OtherPagesTray = S3 End With Else With ActiveDocument.Sections(i).PageSetup .FirstPageTray = P2 .OtherPagesTray = S2 End With End If Next End Sub
Geo
Bonjour o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair, tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-) Comme je le disais dans un autre courriel, tel paramètre indique tel bac sur une imprimante, un autre sur une autre. Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils s'appellent multifonction et je ne sais trop quoi. Donc cette imprimante peut très bien faire correspondre le bac par défaut dans les deux cas. Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas de standard.
A+
Bonjour o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents
provenant de ce centre de frappe sont "programmés" pour imprimer sur
bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair,
tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi
cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-)
Comme je le disais dans un autre courriel, tel paramètre indique tel
bac sur une imprimante, un autre sur une autre.
Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils
s'appellent multifonction et je ne sais trop quoi.
Donc cette imprimante peut très bien faire correspondre le bac par
défaut dans les deux cas.
Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas
de standard.
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair, tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-) Comme je le disais dans un autre courriel, tel paramètre indique tel bac sur une imprimante, un autre sur une autre. Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils s'appellent multifonction et je ne sais trop quoi. Donc cette imprimante peut très bien faire correspondre le bac par défaut dans les deux cas. Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas de standard.
A+
Geo
Bonjour o.0
en la lançant avec l'évènement before print.
Euh c'est-à-dire ? Voir l'aide de DocumentBeforePrint
La acro mettrait des bacs différents selon la section au moment de l'impression.
Parce que je viens d'essayer la macro, (executée après ouverture des fameux docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
sans doute ce que j'écrivais :
En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne
comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Il reste qu'il faut faire le test par type d'imprimante. On pourrait évidemment compléter la macro en récupérant le type d'imprimante et en adaptant les valeurs de paramètres. Mais il faut connaître les valeurs adéquates de toutes façon. Ca devient un peu compliqué.
--
A+
Bonjour o.0
en la lançant avec l'évènement before print.
Euh c'est-à-dire ?
Voir l'aide de DocumentBeforePrint
La acro mettrait des bacs différents selon la section au moment de
l'impression.
Parce que je viens d'essayer la macro, (executée après ouverture des
fameux docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
sans doute ce que j'écrivais :
En pratique on peut essayer les différentes valeurs (placées en
commentaires) puis regarder dans format Mise en page ce que ça
donne
comme bac sélectionné.
C'est probablement intimement lié à l'imprimante utilisée, mais je
n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le
bac automatique par exemple.
Il reste qu'il faut faire le test par type d'imprimante.
On pourrait évidemment compléter la macro en récupérant le type
d'imprimante et en adaptant les valeurs de paramètres.
Mais il faut connaître les valeurs adéquates de toutes façon.
Ca devient un peu compliqué.
Euh c'est-à-dire ? Voir l'aide de DocumentBeforePrint
La acro mettrait des bacs différents selon la section au moment de l'impression.
Parce que je viens d'essayer la macro, (executée après ouverture des fameux docs) et non rien...toujours pareil.
J'ai oublié qqchose sans doute mais quoi ?
sans doute ce que j'écrivais :
En pratique on peut essayer les différentes valeurs (placées en commentaires) puis regarder dans format Mise en page ce que ça donne
comme bac sélectionné. C'est probablement intimement lié à l'imprimante utilisée, mais je n'ai pas le matériel pour tout tester, chez moi S1 et S2 donnent le bac automatique par exemple.
Il reste qu'il faut faire le test par type d'imprimante. On pourrait évidemment compléter la macro en récupérant le type d'imprimante et en adaptant les valeurs de paramètres. Mais il faut connaître les valeurs adéquates de toutes façon. Ca devient un peu compliqué.
--
A+
o.0
Oui mais toutes les imprimantes ici ont le même nom pour les bacs. Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du modèle de document qui nous est destiné.
"Geo" a écrit dans le message de news:u$
Bonjour o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair, tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-) Comme je le disais dans un autre courriel, tel paramètre indique tel bac sur une imprimante, un autre sur une autre. Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils s'appellent multifonction et je ne sais trop quoi. Donc cette imprimante peut très bien faire correspondre le bac par défaut dans les deux cas. Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas de standard.
A+
Oui mais toutes les imprimantes ici ont le même nom pour les bacs.
Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du modèle de
document qui nous est destiné.
"Geo" <Geo@sans.pub> a écrit dans le message de
news:u$NDcGMeEHA.2812@tk2msftngp13.phx.gbl...
Bonjour o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents
provenant de ce centre de frappe sont "programmés" pour imprimer sur
bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair,
tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi
cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-)
Comme je le disais dans un autre courriel, tel paramètre indique tel
bac sur une imprimante, un autre sur une autre.
Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils
s'appellent multifonction et je ne sais trop quoi.
Donc cette imprimante peut très bien faire correspondre le bac par
défaut dans les deux cas.
Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas
de standard.
Oui mais toutes les imprimantes ici ont le même nom pour les bacs. Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du modèle de document qui nous est destiné.
"Geo" a écrit dans le message de news:u$
Bonjour o.0
Bonjour,
Oui il semblerait et on me l'a confirmé que tous les documents provenant de ce centre de frappe sont "programmés" pour imprimer sur bac 1 ou bac 2 en fonction des sauts de section...
Ah c'est déja plus clair, tu avais fini par semer le doute dans nos cerveaux surchauffés.
mais alors : pquoi cela ne fonctionne t-il pas avec certaines imprimantes ?
probablement parce que ce ne sont pas les mêmes imprimantes :-) Comme je le disais dans un autre courriel, tel paramètre indique tel bac sur une imprimante, un autre sur une autre. Par exemple, sur mon imprimante il n'y a pas de bac 1 et de bac 2, ils s'appellent multifonction et je ne sais trop quoi. Donc cette imprimante peut très bien faire correspondre le bac par défaut dans les deux cas. Dès qu'on touche aux imprimantes ça devient complexe car il n'y a pas de standard.
A+
Geo
Bonjour o.0
Oui mais toutes les imprimantes ici ont le même nom pour les bacs. Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du modèle
de document qui nous est destiné.
Là on n'utilise pas les noms des bacs mais des constantes. Par exemple : wdPrinterEnvelopeFeed peut correspondre au bac 1 sur une imprimante, à bac par défaut sur une autre etc. Pour s'en convaincre, prendre un document sur un poste pour lequel ça marche pas. Se mettre dans la section 1 et regarder dans format mise en page alimentation papier Et voir quels sont les bacs sélectionnés. Aller sur la section 2 et faire la même chose. Même manip sur la machine où ça marche et regarder les mêmes choses. Il y a bien une différence, non ?
--
A+
Bonjour o.0
Oui mais toutes les imprimantes ici ont le même nom pour les bacs.
Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du
modèle
de document qui nous est destiné.
Là on n'utilise pas les noms des bacs mais des constantes.
Par exemple : wdPrinterEnvelopeFeed peut correspondre au bac 1 sur une
imprimante, à bac par défaut sur une autre etc.
Pour s'en convaincre, prendre un document sur un poste pour lequel ça
marche pas.
Se mettre dans la section 1 et regarder dans format mise en page
alimentation papier
Et voir quels sont les bacs sélectionnés.
Aller sur la section 2 et faire la même chose.
Même manip sur la machine où ça marche et regarder les mêmes choses.
Il y a bien une différence, non ?
Oui mais toutes les imprimantes ici ont le même nom pour les bacs. Bac 1 & Bac 2 ce qui explique sans doute la "programmation" du modèle
de document qui nous est destiné.
Là on n'utilise pas les noms des bacs mais des constantes. Par exemple : wdPrinterEnvelopeFeed peut correspondre au bac 1 sur une imprimante, à bac par défaut sur une autre etc. Pour s'en convaincre, prendre un document sur un poste pour lequel ça marche pas. Se mettre dans la section 1 et regarder dans format mise en page alimentation papier Et voir quels sont les bacs sélectionnés. Aller sur la section 2 et faire la même chose. Même manip sur la machine où ça marche et regarder les mêmes choses. Il y a bien une différence, non ?