Insérer contenu d'une cellule dans pied de page

Résolu

Floki72450 Messages postés 45 Statut Membre -
Floki72450 Messages postés 45 Statut Membre - 17 oct. 2014 à 17:36

Bonjour,

Voila, j'ai un fichier avec deux cases titres en haut du document :
en C1 : NOM DU CHANTIER
en C3 : ADRESSE DU CHANTIER

et j'aimerai que le contenu des deux cellules soit insérer dans mon pied de page, mais tout deux à gauche, et l'un sur l'autre, de cette façon :

NOM DU CHANTIER
ADRESSE DU CHANTIER

j'ai déjà fait ce code VBA :

Sub UpdateFooter()
ActiveSheet.PageSetup.LeftFooter = Range("C1").Value
ActiveSheet.PageSetup.CenterFooter = Range("C3").Value
End Sub

Mais cela met le nom a gauche et l'adresse au centre, comment superposer ces deux contenus ?

Par avance, merci a vous tous

Cordialement

Afficher la suite

2 réponses

Réponse 1 / 2
Maurice

Bonjour

Modification de ta macro

Sub UpdateFooter()
ActiveSheet.PageSetup.LeftFooter = Range("C1").Value & vbLf & Range("C3").Value
End Sub

A+
Maurice
1
1. Floki72450 Messages postés 45 Statut Membre
  
  Merci pour ta réponse, si je comprend bien Range veut dire ligne et vbLf précise de changer de ligne ?
  Et si je souhaites maintenant surligner, ou double surligné une des valeur, C1 ou C3, comment puis-je faire ?
  
  Merci encore
  
  0
Réponse 2 / 2
Gyrus Messages postés 3360 Statut Membre 526
Bonjour,

Utilise le code de mise en forme.
Soulignement simple "&U"
Soulignement double : "&E"

Exemple pour un soulignement simple :
```
Sub UpdateFooter()
    ActiveSheet.PageSetup.LeftFooter = "&U" & Range("C1").Value & vbLf & Range("C3").Value
End Sub
```
A+
0
1. Floki72450 Messages postés 45 Statut Membre
  
  Merci beaucoup, c'est beaucoup plus présentable.
  Est-il possible que les macros s'exécutent automatiquement a l'ouverture d'un fichier ?
  Je m'explique :
  J'ai créer un fichier de base ou il y a écrit :
  
  NOM DU CHANTIER et
  DRESSE DU CHANTIER,
  
  comme expliquer au dessus, mais lorsque je commence une nouvelle étude de chantier, j'enregistre sous pour ne pas modifier mon fichier de base, et ensuite je change le contenu des deux cellules, en y mettant par exemple
  
  CONSTRUCTION D'UNE MAISON et
  A LE MANS (Sarthe)
  
  et j'aimerai ne pas avoir a aller exécuter la macro pour que mon pied de page change en conséquence des changements effectués, est ce possible ? Peut elle être paramétrer pour s'actualiser régulièrement, ou a un moment précis comme ouverture de fichier, aperçu avant impression ou autre ?
  Sinon je le ferais manuellement mais bon, si je ne m'en rends pas compte tout de suite et que j'ai imprimer avec le mauvais pied de page, pas actualisé cela peut être gênant... gaspillage de papier...
  
  Merci beaucoup de votre aide ! :)
  
  0
2. Gyrus Messages postés 3360 Statut Membre 526
  
  Voici une solution qui utilise la procédure évènementielle "Change" de la feuille.
  Lorsque les cellules C1 ou C3 sont modifiées, le pied de page est automatiquement corrigé avec les nouvelles valeurs.
  https://www.cjoint.com/c/DJrqQE1gfSZ
  
  A+
  
  0
3. Floki72450 Messages postés 45 Statut Membre
  
  Un grand MERCI !
  
  Plus besoin de lancer la macro, elle se modifie a chaque changement effectuer sur les cellules souhaitées, exactement ce que je voulais, en plein dans le mile, merci beaucoup :)
  
  Pour ceux que cela intéressent, voici le fichier dont je parle depuis le début :
  https://www.cjoint.com/c/DJrrLM3B5RI
  
  Merci beaucoup,
  
  A + :)
  
  0

Insérer contenu d'une cellule dans pied de page

2 réponses

Discussions similaires

Newsletters