Bonjour,
je voudrais remplir un fichier excel avec cette méthode :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
   Dim DataArray(1 To 100, 1 To 3) As Variant
   Dim r As Integer
   For r = 1 To 100
      DataArray(r, 1) = "ORD" & Format(r, "0000")
      DataArray(r, 2) = Rnd() * 1000
      DataArray(r, 3) = DataArray(r, 2) * 0.7
   Next
 
   Set oSheet = oBook.Worksheets(1)
 
   oSheet.Range("A2").Resize(100, 3).Value = DataArray
J'utilise cette méthode car j'ai un grand nombre de données a mettre d'en l'excel. Mais j'ai un problème car dans l’exemple si dessous il utilise un tableau ( DataArray), alors que moi j'utilise un liste de structure.
Mon problème est comment je peut faire pour inséré dans la range défini ma liste de structure ?

Merci de votre aide