bonjour le forum
voila ma question dans un usf j'ai un listview ou les colonnes sont trop grand peu pas voir le tableau dans sa totalité
se que je recherche comment diminuer ses colonnes svp
merci pour votre aide
Code VB.NET : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26 With ListBox1 .ColumnCount = UBound(Tableau, 2) 'En option (à adapter) ' .Top = 20 .Width = 80 * UBound(Tableau, 2) DoEvents .List() = Tableau End With For i = 1 To UBound(Tableau, 2) Set Lbl = Me.Controls.Add("Forms.Label.1") With Lbl .Left = ListBox1.Left + ((i - 1) * 80) ''ListBox1.Left + 7 + ((i - 1) * 80) .Top = ListBox1.Top - 10 .Width = 80 .Height = 10 .Caption = Plage.Cells(1, i) .BackColor = RGB(255, 255, 255) ''RGB(224, 224, 224) .Font.Bold = True .BorderColor = RGB(0, 0, 0) .BorderStyle = 1 End With Next i End Sub
Partager