Bonjour gadget
la procedure ci joint , à inserer au niveau du classeur , permet d'afficher en pied de page le chemin d'acces complet d'un fichier
Private Sub Workbook_Open()
Dim val
val = ActiveWorkbook.FullName
With ActiveSheet.PageSetup
.LeftFooter = val
End With
End Sub
cela fonctionne sous excel97
Dans cet exemple de macro , l’adresse exacte du fichier s'affiche dans la section de gauche du pied de page ( LeftFooter )
Pour la section centrale , utilise : CenterFooter
Pour la section de droite , utilise : RightFooter
bonne journée
Michel