VBA En-tête de page

Arpette · 5 Mars 2012

Bonsoir à toutes et à tous,
j'ai une macro avec une mise en page qui met un en-tête à gauche la valeur d'une cellule.
Je souhaite y rajouter une 2ème valeur de cellule, mais en dessous. Voici mon code, mais je ne sais pas aller à la ligne.
Merci de votre aide.
@+

Code:

 With ActiveSheet.PageSetup
        
        VEntete = ActiveSheet.Cells(4, 3).Value
        VEntete1 = ActiveSheet.Cells(5, 3).Value
       .LeftHeader = "&""BOOK ANTIQUA,Gras italique""&21" & VEntete & _
        "&""BOOK ANTIQUA,Gras italique""&15" & VEntete1
            
    End With

Cousinhub · 5 Mars 2012

Re : VBA En-tête de page

Bonsoir,

Essaie en rajoutant chr(10) entre les en-têtes, style :

Code:

With ActiveSheet.PageSetup
       
        VEntete = ActiveSheet.Cells(4, 3).Value
        VEntete1 = ActiveSheet.Cells(5, 3).Value
       .LeftHeader = "&""BOOK ANTIQUA,Gras italique""&21" & VEntete & Chr(10) & _
        "&""BOOK ANTIQUA,Gras italique""&15" & VEntete1
           
    End With

Arpette · 5 Mars 2012

Re : VBA En-tête de page

Bonsoir bhbh, merci c'est nickel.
@+

VBA En-tête de page

Arpette

XLDnaute Impliqué

Cousinhub

XLDnaute Barbatruc

Arpette

XLDnaute Impliqué

Discussions similaires