Sujet Précédent Sujet Suivant

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
A voir également:

2 réponses

Réponse 1 / 2

Bonjour

Modification de ta macro

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

A+
Maurice
1
Merci
Merci

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

CCM 65492 internautes nous ont dit merci ce mois-ci

Signaler
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
Réponse 2 / 2
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+
Signaler
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 ! :)
Signaler
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+
Signaler
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 + :)
Posez votre question