Bonjour,
dans this workbook j'ai declare ce code
With Sh.PageSetup
.LeftHeader = xxxxxxxxxx
.RightFooter = "Montant à régler " & Sheets("Base
Données").Range("C3").Value & " ¤"
.CenterFooter = Sheets("Base Données").Range("AI1").Value
.LeftFooter = Sheets("Base Données").Range("C2").Value
End With
je voudrais mettre une police differente a chaque instruction (left,
right ...)
la methode que j'ai appliquée est globale
et si j'applique a chaque ligne ce code :
.LeftHeader = ""&""Arial,Gras""&11" & Sheets("Base
Données").Range("AI1").Value ca bugue
merci de me renseigner
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
Daniel.C
Bonjour. Aie le réflexe "enregistreur". Avec l'enregistreur de macro, j'ai obtenu : .LeftHeader = "&""Britannic Bold,Normal""&10TonTexte ICI" Cordialement. Daniel "andre" a écrit dans le message de news:
Bonjour, dans this workbook j'ai declare ce code With Sh.PageSetup .LeftHeader = xxxxxxxxxx .RightFooter = "Montant à régler " & Sheets("Base Données").Range("C3").Value & " ¤" .CenterFooter = Sheets("Base Données").Range("AI1").Value .LeftFooter = Sheets("Base Données").Range("C2").Value End With je voudrais mettre une police differente a chaque instruction (left, right ...) la methode que j'ai appliquée est globale et si j'applique a chaque ligne ce code : .LeftHeader = ""&""Arial,Gras""&11" & Sheets("Base Données").Range("AI1").Value ca bugue merci de me renseigner
-- andre
Bonjour.
Aie le réflexe "enregistreur".
Avec l'enregistreur de macro, j'ai obtenu :
.LeftHeader = "&""Britannic Bold,Normal""&10TonTexte ICI"
Cordialement.
Daniel
"andre" <andre260@cegetel.net> a écrit dans le message de news:
mn.73b97d84194a0465.90030@cegetel.net...
Bonjour,
dans this workbook j'ai declare ce code
With Sh.PageSetup
.LeftHeader = xxxxxxxxxx
.RightFooter = "Montant à régler " & Sheets("Base
Données").Range("C3").Value & " ¤"
.CenterFooter = Sheets("Base Données").Range("AI1").Value
.LeftFooter = Sheets("Base Données").Range("C2").Value
End With
je voudrais mettre une police differente a chaque instruction (left, right
...)
la methode que j'ai appliquée est globale
et si j'applique a chaque ligne ce code :
.LeftHeader = ""&""Arial,Gras""&11" & Sheets("Base
Données").Range("AI1").Value ca bugue
merci de me renseigner
Bonjour. Aie le réflexe "enregistreur". Avec l'enregistreur de macro, j'ai obtenu : .LeftHeader = "&""Britannic Bold,Normal""&10TonTexte ICI" Cordialement. Daniel "andre" a écrit dans le message de news:
Bonjour, dans this workbook j'ai declare ce code With Sh.PageSetup .LeftHeader = xxxxxxxxxx .RightFooter = "Montant à régler " & Sheets("Base Données").Range("C3").Value & " ¤" .CenterFooter = Sheets("Base Données").Range("AI1").Value .LeftFooter = Sheets("Base Données").Range("C2").Value End With je voudrais mettre une police differente a chaque instruction (left, right ...) la methode que j'ai appliquée est globale et si j'applique a chaque ligne ce code : .LeftHeader = ""&""Arial,Gras""&11" & Sheets("Base Données").Range("AI1").Value ca bugue merci de me renseigner
-- andre
andre
andre vous demande
Bonjour. Aie le réflexe "enregistreur". Avec l'enregistreur de macro, j'ai obtenu : .LeftHeader = TonTexte ICI" Cordialement. Daniel "andre" a écrit dans le message de news:
oui daniel bonjour
je l'ai pris l'enregistreur mais ca bugue car derriere : "&""Britannic Bold,Normal""&10 j'ai ceci : Sheets("Base Données").Range("AI1").Value
-- andre
andre vous demande
Bonjour.
Aie le réflexe "enregistreur".
Avec l'enregistreur de macro, j'ai obtenu :
.LeftHeader = TonTexte ICI"
Cordialement.
Daniel
"andre" <andre260@cegetel.net> a écrit dans le message de news:
mn.73b97d84194a0465.90030@cegetel.net...
oui daniel bonjour
je l'ai pris l'enregistreur
mais ca bugue
car derriere : "&""Britannic Bold,Normal""&10 j'ai ceci :
Sheets("Base Données").Range("AI1").Value
Bonjour. Aie le réflexe "enregistreur". Avec l'enregistreur de macro, j'ai obtenu : .LeftHeader = TonTexte ICI" Cordialement. Daniel "andre" a écrit dans le message de news:
oui daniel bonjour
je l'ai pris l'enregistreur mais ca bugue car derriere : "&""Britannic Bold,Normal""&10 j'ai ceci : Sheets("Base Données").Range("AI1").Value
-- andre
andre
andre vous dit toutes les lignes qui font appel a une feuille ou a une cellule buguent par contre les autres c'est Ok
-- andre
andre vous dit
toutes les lignes qui font appel a une feuille ou a une cellule
buguent
par contre les autres c'est Ok
andre vous dit toutes les lignes qui font appel a une feuille ou a une cellule buguent par contre les autres c'est Ok
-- andre
Daniel.C
.LeftHeader = "&""Britannic Bold,Normal""&10" & Sheets("Feuil2").[A2] passe comme une lettre à la poste. Daniel "andre" a écrit dans le message de news:
andre vous dit toutes les lignes qui font appel a une feuille ou a une cellule buguent par contre les autres c'est Ok
-- andre
.LeftHeader = "&""Britannic Bold,Normal""&10" & Sheets("Feuil2").[A2]
passe comme une lettre à la poste.
Daniel
"andre" <andre260@cegetel.net> a écrit dans le message de news:
mn.74267d84fc321dd8.90030@cegetel.net...
andre vous dit
toutes les lignes qui font appel a une feuille ou a une cellule
buguent
par contre les autres c'est Ok
.LeftHeader = "&""Britannic Bold,Normal""&10" & Sheets("Feuil2").[A2] passe comme une lettre à la poste. Daniel "andre" a écrit dans le message de news:
andre vous dit toutes les lignes qui font appel a une feuille ou a une cellule buguent par contre les autres c'est Ok