BOnjour sylvain, le forum
ton code utilise une boucle (for each f ...) pour travailler sur chaque feuilles de ton classeur, il te suffit de ne plus faire la boucle :
Sub PiedPagePerso()
With ActiveSheet.PageSetup
.LeftFooter = 'Nom éleveur : ' & Worksheets('menu').Cells(34, 7).Value
.CenterFooter = ''
.RightFooter = 'Simulation ' '& Worksheets('menu').Cells(15, 15).Value
End With
End Sub
En espérant t'avoir aidé
salut