Bonjour a tous , j'ai cree un tableau de maniere statique,mais j aurai bien pu le faire dynamiquement, et je voudrais exporter les valeurs du tableau dans chacune des cellules sur Excel .
Je n ai pu jusqu'a aujourdhui, qu' ecrire sur une cellule cellule par ce code

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
procedure TForm1.Button1Click(Sender: TObject); 
var 
  i:integer; 
begin 
vMSExcel:=CreateOleObject('Excel.Application'); 
vMSExcel.Visible:=true; 
vXLWorkbooks:=vMSExcel.workbooks; 
vXLWorkbook:=vXLWorkbooks.Add; 
 
//******Acceder à la feuille 
aSheetName:='Feuil1'; 
vWorksheet:=vXLWorkbook.WorkSheets[aSheetName]; 
 
//********modifier la valeur d'une cellule 
aRange:='A1'; 
vCell:=vWorksheet.Range[aRange]; 
aValue:=5; 
vCell.Value:=aValue; 
 
end; 
procedure TForm1.Button2Click(Sender: TObject); 
begin 
vMSExcel.Quit; 
vMSExcel:=unassigned; 
end;
Le tableau est de dimension 2 et lorsque je fait le test j obtiens aucune valeurs desirees