collection d'objet

PBL · 29 Janvier 2008

Bonjour,

Je n'arrive pas à savoir comment déclarer mes fichiers (j'en ai 9 ouvert en permanence) comme membre d'une collection public que j'ai créée.
En plus il faudrait que ces fichiers soient eux-aussi en public.
Quelqu'un peut-il m'aider?

pierrejean · 29 Janvier 2008

Re : collection d'objet

bonjour PBL

tester quelque chose du genre:

Code:

Public coll As Collection
__________________________
Sub remplirlacollection()
Dim n As Integer
For n = 1 To Workbooks.Count
  coll.Add Workbooks(n).Name
Next n
End Sub

Utilisation:par exemple 

Dim wb1 As Workbook
Dim wb2 As Workbook
Set wb1 = Workbooks(coll(1))
Set wb2 = Workbooks(coll(2))

collection d'objet

PBL

Guest

pierrejean

XLDnaute Barbatruc

Discussions similaires

collection d'objet

PBL

Guest

pierrejean

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency