VBA En-tête de page

Arpette

XLDnaute Impliqué
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

XLDnaute Barbatruc
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
 

Statistiques des forums

Discussions
312 345
Messages
2 087 477
Membres
103 553
dernier inscrit
jhnm