XL 2016 sélectionner par les check box les colonnes a afficher dans un listbox

fanch55

XLDnaute Barbatruc

• 18 Juillet 2022

• #2

Bonjour,
Le classeur est inachevé et non fonctionnel ... 🤔

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 18 Juillet 2022

• #3

Merci pour ta reponse franch55.
voyons un peu avec celui ci

 

Pièces jointes

• ListBox.xlsm

  82.2 KB · Affichages: 3

Vote positif 0 Vote négatif

fanch55

XLDnaute Barbatruc

• 18 Juillet 2022

• #4

Pas d'userform calendrier mais on peut s'en passer.

VB:

Sub filtre()
    Dim Tbl(), Total As Long
    début = CDate(Me.TextBox1)
    fin = CDate(Me.TextBox2)
    colDate = 1
    NbCol = 1000
    N = 0
    For i = 1 To 10000
      If Int(A(i, colDate)) >= début And Int(TblBD(i, colDate)) <= fin Then
        N = N + 1: ReDim Preserve Tbl(1 To NbCol + 1, 1 To N)
        For k = 1 To NbCol:  Tbl(k, N) = TblBD(i, k):  Next k
       End If
       Next i

Variables A et TblBd, à quoi correspondent-elles ???

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 19 Juillet 2022

• #5

Bonjour le forum.Bonjour franch55. j'ai simplement simplifié le tableau. j'ai simplement besoin, peu importe la méthode, de réaliser cet exercice; c'est a dire SELECTIONNER LES COLONNES A AFFICHER DANS UN LISTBOX AFIN D'IMPRIMER. merci encore.

 

Vote positif 0 Vote négatif

fanch55

XLDnaute Barbatruc

• 20 Juillet 2022

• #6

Je n'ai peut-être pas tout compris le classeur,
mais pour la demande ci-dessous :

MAN à dit:

SELECTIONNER LES COLONNES A AFFICHER DANS UN LISTBOX AFIN D'IMPRIMER

Cliquez pour agrandir...

Le classeur ci-joint devrait fonctionner .
La macro à exécuter est à lancer avec les touches Ctrl+p

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 21 Juillet 2022

• #7

Bonjour et merci franch55. malheureusement, pas de classeur joint.

fanch55 à dit:

Je n'ai peut-être pas tout compris le classeur,
mais pour la demande ci-dessous :

Le classeur ci-joint devrait fonctionner .
La macro à exécuter est à lancer avec les touches Ctrl+p

Cliquez pour agrandir...

je suis impatient. merci encore.

 

Vote positif 0 Vote négatif

fanch55

XLDnaute Barbatruc

• 21 Juillet 2022

• #8

Oublié le classeur, 🥴
🤭

 

Pièces jointes

• ListBox.xlsm

  88.9 KB · Affichages: 7

Vote positif 0 Vote négatif

Solution

M

MAN

XLDnaute Occasionnel

• 21 Juillet 2022

• #9

MERCI BAUCOUP franch55. je suis comblé. ça me va a merveille

 

Vote positif 0 Vote négatif