Comment faire pour recuperer et modifier l'entete et pied de page de
plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu
avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais
pour avoir les infos entete et pied de page je n'arrive a le faire que sur
une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par
exemple;
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
LOIC
autant pour moi ca as l'air de fonstionner par contre je récupère un entête et pied de page existant
comment faire pour qu'il s'affiche correctement dans une text box car tout s'inscrit à la suite sans mise en forme
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
autant pour moi ca as l'air de fonstionner par contre je récupère un entête
et pied de page existant
comment faire pour qu'il s'affiche correctement dans une text box car tout
s'inscrit à la suite sans mise en forme
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de
news:O$9SYGufEHA.904@TK2MSFTNGP09.phx.gbl...
Comment faire pour recuperer et modifier l'entete et pied de page de
plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu
avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais
pour avoir les infos entete et pied de page je n'arrive a le faire que sur
une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par
exemple;
autant pour moi ca as l'air de fonstionner par contre je récupère un entête et pied de page existant
comment faire pour qu'il s'affiche correctement dans une text box car tout s'inscrit à la suite sans mise en forme
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
michdenis
Bonjour Loic,
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$ Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
Bonjour Loic,
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets.PrintPreview
With Sh.PageSetup
.RightHeader = "???"
'.../...
End With
Next
Salutations!
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de news:O$9SYGufEHA.904@TK2MSFTNGP09.phx.gbl...
Comment faire pour recuperer et modifier l'entete et pied de page de
plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu
avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais
pour avoir les infos entete et pied de page je n'arrive a le faire que sur
une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par
exemple;
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$ Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
LOIC
Merci beaucoup
"michdenis" a écrit dans le message de news:
Bonjour Loic,
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
Merci beaucoup
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:uJVggsxfEHA.396@TK2MSFTNGP12.phx.gbl...
Bonjour Loic,
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets.PrintPreview
With Sh.PageSetup
.RightHeader = "???"
'.../...
End With
Next
Salutations!
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de
news:O$9SYGufEHA.904@TK2MSFTNGP09.phx.gbl...
Comment faire pour recuperer et modifier l'entete et pied de page de
plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu
avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais
pour avoir les infos entete et pied de page je n'arrive a le faire que sur
une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par
exemple;
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
michdenis
Bonjour Loic,
On aurait plutôt dû lire ceci :
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets With Sh.PageSetup .RightHeader = "???" '.../... .PrintPreview End With Next
Salutations!
"LOIC" a écrit dans le message de news: Merci beaucoup
"michdenis" a écrit dans le message de news:
Bonjour Loic,
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
si quelqu'un pouvait m'aider ;)
Bonjour Loic,
On aurait plutôt dû lire ceci :
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets
With Sh.PageSetup
.RightHeader = "???"
'.../...
.PrintPreview
End With
Next
Salutations!
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de news:eq0ZaZ5fEHA.3192@tk2msftngp13.phx.gbl...
Merci beaucoup
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:uJVggsxfEHA.396@TK2MSFTNGP12.phx.gbl...
Bonjour Loic,
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets.PrintPreview
With Sh.PageSetup
.RightHeader = "???"
'.../...
End With
Next
Salutations!
"LOIC" <NOSPAM..LOICLS@HOTMAIL.COM> a écrit dans le message de
news:O$9SYGufEHA.904@TK2MSFTNGP09.phx.gbl...
Comment faire pour recuperer et modifier l'entete et pied de page de
plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu
avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais
pour avoir les infos entete et pied de page je n'arrive a le faire que sur
une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par
exemple;
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets With Sh.PageSetup .RightHeader = "???" '.../... .PrintPreview End With Next
Salutations!
"LOIC" a écrit dans le message de news: Merci beaucoup
"michdenis" a écrit dans le message de news:
Bonjour Loic,
Dim Sh As Worksheet For Each Sh In ActiveWindow.SelectedSheets.PrintPreview With Sh.PageSetup .RightHeader = "???" '.../... End With Next
Salutations!
"LOIC" a écrit dans le message de news:O$
Comment faire pour recuperer et modifier l'entete et pied de page de plusieurs feuilles sélectionner ?
J'ai l'ensemble de mes feuilles dans une list box je peux avoir l'apercu avant impression en fesant ActiveWindow.SelectedSheets.PrintPreview mais pour avoir les infos entete et pied de page je n'arrive a le faire que sur une page avec l'instruction ActiveWindow.SelectedSheets.RightHeader par exemple;
