Discussion :

[gtapes]

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

[gtapes]

Bonjour,
le code que que je vous montre viens du site https://support.microsoft.com/fr-fr/...m-visual-basic

le code ce situe après le titre : Utiliser Automation pour transférer un tableau de données vers une plage dans une feuille de calcul

Pouvez vous m'aider a pouvoir exporter mes données via cette méthode mais en utilisant une liste de structure.
C'est le seul point qu'il me reste a faire pour finir ce projet que je dois terminer pour Vendredi.

merci