salut à tous
je voudrais parcourir les données d'une colonne excel et effctuer ces valeurs à une variable string j'ai ajouter un msgbox pour afficher les valeurs obtenues mais la valeur est vide il ne retourne aucune valeur voici mon code :
nom:string;
ouvrir le fichier excel
parcourir des données
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 ExcelApplication1.Connect; MonClasseur:=ExcelApplication1.Workbooks.Open(rep+'\BL2602.xls',False,False, EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,0,0,0);
end;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 MaFeuille:=MonClasseur.Worksheets[1] as _worksheet; comptlig:=1; while (MaFeuille.Cells.Item[comptlig,1].Value<>'') do begin nom:=vartostr(MaFeuille.Cells.Item[comptlig,3].Value); ShowMessage(format('Le nom est :', [nom]));
Partager