modification de l'entete selon utilisateur

  • Initiateur de la discussion Initiateur de la discussion mln86
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

mln86

Guest
bonjour,
je travaille en ce moment sur un fichier de récupération de données sous excel. Il est presque fini. J'ai juste un problème concernant les entêtes.
Voila je voudrais que par exemple une msgbox appraisse et pose ces deux questions ouvertes
appareil contrôlé?: blablabla
nom du controleur?: blablabla
et que la question et la réponse 1 correspondent a la valeur de l'entête à gauche
et que la question et la réponse 2 correspondent a la valeur de l'entête à droite

mais franchement je sais même pas par où commencer.
merci d'avance de votre aide
 
Re : modification de l'entete selon utilisateur

Bonjour, et bienvenue sur XLD 🙂

mais franchement je sais même pas par où commencer.
Si vous commenciez par joindre un court extrait de votre fichier Excel avec le résultat souhaité ?
Cela nous permettrait d'en connaitre l'organisation, et de tester des propositions adaptées avant de vous les proposer.


Edit : Bonjour, Jean-Claude 🙂
Je n'avais pas compris qu'il s'agissait des en-têtes lors de l'impression 🙁
 
Dernière édition:
Re : modification de l'entete selon utilisateur

Bonjour à tous,
Bienvenue sur XLD,

Peut-être avec ceci :
VB:
Option Explicit


Private Sub Workbook_BeforePrint(Cancel As Boolean)
    ActiveSheet.PageSetup.LeftHeader = InputBox("Appareil concerné", "Appareil")
    ActiveSheet.PageSetup.RightHeader = InputBox("Nom du Contrôleur", "Contrôleur")
    ActiveWindow.SelectedSheets.PrintPreview
End Sub

A + à tous

Edition : Salut mon bon Patrick...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

L
Réponses
12
Affichages
1 K
LeSaintKebab
L
J
Réponses
5
Affichages
5 K
J
N
Réponses
5
Affichages
3 K
Nicocotte125
N
P
  • Question Question
Réponses
1
Affichages
3 K
Patrosso
P
S
Réponses
14
Affichages
3 K
saphya
S
Retour