Discussion :

[tleboukaka]

Slt à tous

J’ai essayé quelques code que j’ai trouvé sur google,
Des codes qui date de Delphi 6/7 et Excel 97

Mais en tapant quelques lignes de codes,
Je me rends compte que je ne peux pas évoluer parce que
Il y a une ligne déjà saisie que le compilateur n’accepte pas.

Voici une partie de mon code

NB : sur mon PC, j’ai Excel 2013 et Delphi 10 Seattle
…

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
USES
…, ComObj, OleServer, Excel2010 ;
.
.
.
VAR
ExcelApp : oleVariant ;
bm: TBookmark;
ExcelWbs, ExcelClasseur, ExcelFeuille: OleVariant;
  col, rang: Integer;
 memoAir: TMemo;
 
Procedure OuvreExcelClick(Sender: TObject);
Begin
   ExcelApp := CreateOleObject('Excel.Application');
  ExcelApp .visible := True ;		// cette ligne ne passe pas, ça signale Erreur
End ;

Quelqu’un peut-il m’aider à
EXPORTER UN DBGRID DELPHI XE10 VERS EXCEL (Excel 2013, ou Excel 2010, ou Excel 2007)

Merci c’avance

[Charly910]

Bonjour,

dans la FAQ c'est : ExcelApp : Variant ; et non : ExcelApp : oleVariant ;

mais c'est peut être la même chose ?

A+
Charly

[tleboukaka]

merci pour ta réponse
mais je l'avais aussi essayé
c'est la mm chose

j'attends tjrs de l'aide

Mr6

[Papy214]

Si c'est pour une dbgrid, c'est que l'export vers excel doit créer un tableau ??
Dans ce cas, pourquoi ne pas utiliser plutôt ADO ?

[tourlourou]

Quel message d'erreur ? A la compilation ou à l'exécution ?

[anapurna]

salut

déjà la méthode ouvreecxel me parais suspect ... c'est un événement d'une forme ?
ensuite pour exporter ton dbgrid dans Excel il faut passer par le dataset attaché a ce dbgrid

le code que tu nous a fournis ne fait qu'ouvrir ecxel et rien d'autre

[SergioMaster]

Bonjour,

déjà si le code est bien retransmis correctement , il y a un espace ligne 16 entre ExcelApp et .Visible chose que le compilateur doit moyennement accepter

[tleboukaka]

bjr à ts
merci pour vos réactions
la chose marche
dans le sens où la compilation ne pose aucun pb
j'avais peur et je me disais que celà ne fonctionnerai pas quand
quand dans l'IDe, je voyais le Visible était surligné en rouge

Merci encore
A+