Discussion :

[Blaiz58]

Bonjour à tous,

Je cherche à savoir s'il est possible de déclarer un tableau public dans un Userform ? afin que je puisse le réutiliser dans les modules ?
J'ai bien essayé avec Public tableau(10) as single mais cela mais met en erreur

Voila mon code ci dessous :

Code :

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
 
Public tab_contracts(1 To 20) As Single
 
Private Sub ComboBox2_Change()
ListBox1.Clear
Dim i As Integer
nb_points = 0
a = 0
With Feuil3
.Range("T1:T20").ClearContents
    For i = 2 To .Range("C1000").End(xlUp).Row
        If ComboBox2.Value = .Cells(i, 2) Then
            ListBox1.AddItem .Cells(i, 3)
            nb_points = nb_points + 1
            Erase tab_points
 
            a = a + 1
 
            tab_points(a) = "*" & .Cells(i, 3) & "*"
            .Cells(a, 20) = tab_contracts(a)
 
        End If
    Next i
End With
End Sub

Merci !

[Invité]

bonjour,
non mais en revanche tu peux le déclarer dans la partie déclarative d'un module (tous en haut du module) et l'utiliser dans ton UsForm!

[Blaiz58]

J'avais trouvé une autre solution en faisant exécuter le tableau dans le module mais bon j'avoue cela alourdie le code.

Ta méthode marche impeccable ! Merci