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

Résolu

Floki72450 Messages postés 34 Date d'inscription Statut Membre Dernière intervention -
Floki72450 Messages postés 34 Date d'inscription Statut Membre Dernière intervention - 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

A voir également:

Excel en-tête référence cellule
Excel cellule couleur si condition texte - Guide
Liste déroulante excel - Guide
Proteger cellule excel - Guide
Excel si cellule contient partie texte ✓ - Forum Excel
Aller à la ligne dans une cellule excel - Guide

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

Floki72450 Messages postés 34 Date d'inscription Statut Membre Dernière intervention

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

Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention 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+

Floki72450 Messages postés 34 Date d'inscription Statut Membre Dernière intervention

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

Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention 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+

Floki72450 Messages postés 34 Date d'inscription Statut Membre Dernière intervention

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

Discussions similaires

import contact gmail : fichier csv

VBA : Copier valeur de cellules dans une autre feuilles

Pied de page Excel

Lancer une macro excel en fonction de la valeur d'une cellule

Effacer le contenu d'une cellule

chercher une valeur dans une colonne précise

Votre réponse

Discussions similaires