Insérer contenu d'une cellule dans pied de page [Résolu/Fermé]

Signaler
Messages postés
34
Date d'inscription
vendredi 17 octobre 2014
Statut
Membre
Dernière intervention
23 février 2016
-
Messages postés
34
Date d'inscription
vendredi 17 octobre 2014
Statut
Membre
Dernière intervention
23 février 2016
-
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

2 réponses

Bonjour

Modification de ta macro

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

A+
Maurice
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
34
Date d'inscription
vendredi 17 octobre 2014
Statut
Membre
Dernière intervention
23 février 2016

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
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
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+
Messages postés
34
Date d'inscription
vendredi 17 octobre 2014
Statut
Membre
Dernière intervention
23 février 2016

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 ! :)
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
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+
Messages postés
34
Date d'inscription
vendredi 17 octobre 2014
Statut
Membre
Dernière intervention
23 février 2016

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 + :)