si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une cellule ?
Si oui comment ?
Merci
Stephane
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une
cellule ?
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une cellule ?
Si oui comment ?
Merci
Stephane
Robert
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une
cellule ?
Si oui comment ?
Merci
Stephane
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une
cellule ?
Si oui comment ?
Merci
Stephane
isabelle
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une
cellule ?
Si oui comment ?
Merci
Stephane
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu d'une
cellule ?
Si oui comment ?
Merci
Stephane
Stephane
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du
pied de page change à chaque impression alors que dans la macro donnée c'est
placé comme une constante
A plus
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
4079D09B.2087F261@videotron.ca...
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
sabatier
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
bonjour sréphane
je comprends pas trop ton souci : si tu changes la valeur de A1, ton
en-tête ou ton pied de page changera bien lui aussi à chaque impression,
non?
ou bien, je n'ai rien compris, une fois de plus...comme dirait
jacquouille, je dois recevoir ces messages zippés...
jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du
pied de page change à chaque impression alors que dans la macro donnée c'est
placé comme une constante
A plus
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
4079D09B.2087F261@videotron.ca...
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
isabelle
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-) isabelle
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne
comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-)
isabelle
bonjour sréphane
je comprends pas trop ton souci : si tu changes la valeur de A1, ton
en-tête ou ton pied de page changera bien lui aussi à chaque impression,
non?
ou bien, je n'ai rien compris, une fois de plus...comme dirait
jacquouille, je dois recevoir ces messages zippés...
jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du
pied de page change à chaque impression alors que dans la macro donnée c'est
placé comme une constante
A plus
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
4079D09B.2087F261@videotron.ca...
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-) isabelle
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
sabatier
bonjour mon ange tiens, tu tombes à pic ; j'ai rencontré un ami québécois qui me disait que dans votre pays, il y avait deux saisons : l'hiver passé et l'hiver prochain..... jps (qui file aux abris)
isabelle a écrit:
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-) isabelle
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
bonjour mon ange
tiens, tu tombes à pic ; j'ai rencontré un ami québécois qui me disait
que dans votre pays, il y avait deux saisons : l'hiver passé et l'hiver
prochain.....
jps (qui file aux abris)
isabelle a écrit:
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne
comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-)
isabelle
bonjour sréphane
je comprends pas trop ton souci : si tu changes la valeur de A1, ton
en-tête ou ton pied de page changera bien lui aussi à chaque impression,
non?
ou bien, je n'ai rien compris, une fois de plus...comme dirait
jacquouille, je dois recevoir ces messages zippés...
jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du
pied de page change à chaque impression alors que dans la macro donnée c'est
placé comme une constante
A plus
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
4079D09B.2087F261@videotron.ca...
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
bonjour mon ange tiens, tu tombes à pic ; j'ai rencontré un ami québécois qui me disait que dans votre pays, il y avait deux saisons : l'hiver passé et l'hiver prochain..... jps (qui file aux abris)
isabelle a écrit:
hé hé, moi je trouve ta compréhention logique mon ange, parcontre je ne comprend pas le raisonnement de Stéphane. on saura bientôt surement ;-) isabelle
bonjour sréphane je comprends pas trop ton souci : si tu changes la valeur de A1, ton en-tête ou ton pied de page changera bien lui aussi à chaque impression, non? ou bien, je n'ai rien compris, une fois de plus...comme dirait jacquouille, je dois recevoir ces messages zippés... jps
Stephane a écrit:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
Clément Marcotte
que dans votre pays, il y avait deux saisons : l'hiver passé et l'hiver
prochain.....
Des fois, j'ai l'impression qu'il est plus dans le vrai que l'on pourrait croire...
Tiens, pour deux autres "vérités québécoises", signées Yvon Deschamps.
"Le vrai québécois veut un Québec indépendant dans un Canada fort et uni"
"Le vrai québécois est un communiste de coeur, un socialiste d'esprit et un capitaliste de poche."
que dans votre pays, il y avait deux saisons : l'hiver passé et
l'hiver
prochain.....
Des fois, j'ai l'impression qu'il est plus dans le vrai que l'on
pourrait croire...
Tiens, pour deux autres "vérités québécoises", signées Yvon Deschamps.
"Le vrai québécois veut un Québec indépendant dans un Canada fort et
uni"
"Le vrai québécois est un communiste de coeur, un socialiste d'esprit
et un capitaliste de poche."
que dans votre pays, il y avait deux saisons : l'hiver passé et l'hiver
prochain.....
Des fois, j'ai l'impression qu'il est plus dans le vrai que l'on pourrait croire...
Tiens, pour deux autres "vérités québécoises", signées Yvon Deschamps.
"Le vrai québécois veut un Québec indépendant dans un Canada fort et uni"
"Le vrai québécois est un communiste de coeur, un socialiste d'esprit et un capitaliste de poche."
Philippe.R
Bonsoir Stéphane,
Si tu ne veux que le contenu de A1, tu peux épurer ainsi :
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader =[A1] End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Stephane" a écrit dans le message de news:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
Bonsoir Stéphane,
Si tu ne veux que le contenu de A1, tu peux épurer ainsi :
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader =[A1]
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Stephane" <no_spam@yahoo.com> a écrit dans le message de news:uR5nu7LIEHA.580@TK2MSFTNGP12.phx.gbl...
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du
pied de page change à chaque impression alors que dans la macro donnée c'est
placé comme une constante
A plus
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
4079D09B.2087F261@videotron.ca...
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et
version inférieur.
isabelle
Bonjour,
Avez-vous ça mais sans macro. Merci
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de
news:407807E9.C2A3BBB@videotron.ca...
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du
classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "zaza" Then _
ActiveSheet.PageSetup.LeftHeader = "La valeur est : " &
Range("A1").Value
End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le
contenu
Si tu ne veux que le contenu de A1, tu peux épurer ainsi :
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader =[A1] End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Stephane" a écrit dans le message de news:
Merci, mais cela fonctionne "trop bien" car je voudrais que le contenu du pied de page change à chaque impression alors que dans la macro donnée c'est placé comme une constante
A plus
"isabelle" a écrit dans le message de news:
non malheureusement ça n'existe pas, en tout cas pas sur xl2002 et version inférieur.
isabelle
Bonjour, Avez-vous ça mais sans macro. Merci
"isabelle" a écrit dans le message de news:
bonjour Stephane,
c'est à copier sur la page code de ThisWorkbook,
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
si tu veux que cette macro ne s'applique qu'à une seule feuille du classeur, il faut ajouter un test.
Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "zaza" Then _ ActiveSheet.PageSetup.LeftHeader = "La valeur est : " & Range("A1").Value End Sub
isabelle
Bonjour,
Est il possible de placer dans l'entête ou le pied de page le contenu
d'une
cellule ?
Si oui comment ?
Merci
Stephane
sabatier
:-)))))) jps
Clément Marcotte a écrit:
que dans votre pays, il y avait deux saisons : l'hiver passé et
l'hiver
prochain.....
Des fois, j'ai l'impression qu'il est plus dans le vrai que l'on pourrait croire...
Tiens, pour deux autres "vérités québécoises", signées Yvon Deschamps.
"Le vrai québécois veut un Québec indépendant dans un Canada fort et uni"
"Le vrai québécois est un communiste de coeur, un socialiste d'esprit et un capitaliste de poche."
:-))))))
jps
Clément Marcotte a écrit:
que dans votre pays, il y avait deux saisons : l'hiver passé et
l'hiver
prochain.....
Des fois, j'ai l'impression qu'il est plus dans le vrai que l'on
pourrait croire...
Tiens, pour deux autres "vérités québécoises", signées Yvon Deschamps.
"Le vrai québécois veut un Québec indépendant dans un Canada fort et
uni"
"Le vrai québécois est un communiste de coeur, un socialiste d'esprit
et un capitaliste de poche."
