Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Copier la valeur de 2 Combobox dans l'en-tête de pages

  • Initiateur de la discussion Initiateur de la discussion aubelix
  • 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 !

aubelix

XLDnaute Impliqué
Bonjour à tous les amis du Forum. 🙂

Je reviens vers vous pour sollicite une fois de plus votre aide.
Avec l'aide de Bebere, via 2 Combobox et une listView, j'extrais
des données répondant à ces critères. Mon problème est le suivant:

Comment modifier automatiquement à chaque copie des données
dans la feuille extractions l'en-tête de pages exemple :

"EXTRACTIONS VALIDITE du ComboBoxDébut au ComboBoxFin"

en remplaçant ComboBoxDébut par la valeur de la date choisie
en remplaçant ComboBoxFin par la valeur de la date choisie
Voir en aperçu l'exemple du fichier joint.

Par avance Merci pour votre aide.
Cordialement.
 

Pièces jointes

Re : Copier la valeur de 2 Combobox dans l'en-tête de pages

Salut aubélix, le Forum

Peut être comme cela

Code:
Private Sub CommandButton6_Click()
    Unload Me
     Sheets("Extractions").Select
    Range("A1").Select
    ActiveSheet.PageSetup.CenterHeader = "&""Arial,Gras""&16" & "EXTRACTIONS VALIDITE du " & ComboBoxDebut & " au " & ComboBoxFin

   ActiveWindow.SelectedSheets.PrintPreview
End Sub

Bonne Journée
 
Re Bonjour à tous les amis du Forum. 🙂

Une question de code:
Comment écrire le code si on double click sur la listview VIDE
sans aucune donnée et de ne rien faire.

pour ne pas avoir à afficher ce message si la listview est vide aucune action.


Select Case MsgBox(" Voulez-vous remplacer les anciennes recherches" _
& vbCrLf & " par les nouvelles données ?" _
, vbYesNo Or vbCritical Or vbDefaultButton2, "Attention !")


Par avance merci pour votre aide.
Cordialement.
 
- 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

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…