Discussion :

[onejock]

Bonjour,

je cherche à mettre en entete de toutes mes pages, le champ "version" que je renseigne via fichier --> propriétés --> onglet personalisation --> ajout d'un champs, etc...
(si ça peut faciliter la tache, la version peut être contenue dans une cellule)

est ce possible de faire ça sans passer par du vba ?

Merci

[ouisansdoute]

Bonjour,

non, a priori ce n'est pas possible de faire cela. peut-être avec Excel 2007 ?

Sous VBA le code est simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub version()
Dim version As String
version = Range("a1")
    With ActiveSheet.PageSetup
        .LeftHeader = version
    End With
End Sub

[SilkyRoad]

bonsoir

Tu peux utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim Cible As String
 
Cible = ThisWorkbook.CustomDocumentProperties("version").Value
 
With ActiveSheet.PageSetup
    .LeftHeader = Cible
End With

http://silkyroad.developpez.com/VBA/...asseurs/#LII-D



bonne soirée
michel

[onejock]

Merci à toi SilkyRoad, je ferme le post....