Microsoft 365 Transfert de listbox

cp4

XLDnaute Barbatruc

• 25 Avril 2020

• #2

Bonjour Barnard,

J'ai ouvert ton fichier. Il se trouve qu'il comporte une collection de formulaire et pas un seul ne contient 2 pages. A moins que je n'ai pas compris. De quel formulaire s'agit-il?

A+

 

Dernière édition: 25 Avril 2020

Vote positif 0 Vote négatif

B

barnard

XLDnaute Nouveau

• 25 Avril 2020

• #3

Bjr,
il s'agit du formulaire Ajout_commande
sur la page 2 Detail Commande

Cordialement

 

Pièces jointes

• ACHAT.xlsm

  118 KB · Affichages: 8

Vote positif 0 Vote négatif

cp4

XLDnaute Barbatruc

• 25 Avril 2020

• #4

Il te manque le nombre de colonnes présentement ta listbox à 1 colonne par défaut.
Il faut ajuster le nombre soit dans les propriétés, soit dans l'initialisation du formulaire.

VB:

Private Sub UserForm_Initialize()
  Set f = Sheets("Table Catégorie")
  Set Rng = f.Range("G2:H" & f.[A65000].End(xlUp).Row)
  Me.Ctype.ColumnCount = 2
  Me.Ctype.ColumnWidths = "100;60"
  Me.Ctype.List = Rng.Value
    Me.ListBox1.ColumnCount = 10 'à ajuster à tes besoins'
End Sub

 

Vote positif 0 Vote négatif

B

barnard

XLDnaute Nouveau

• 26 Avril 2020

• #5

Merci,

 

Vote positif 0 Vote négatif