Export d'une requête en xls

crampe666 Messages postés 2 Date d'inscription jeudi 5 août 2004 Statut Membre Dernière intervention 21 janvier 2005 - 20 janv. 2005 à 16:05
crampe666 Messages postés 2 Date d'inscription jeudi 5 août 2004 Statut Membre Dernière intervention 21 janvier 2005 - 21 janv. 2005 à 15:54

Salut à tous,
Je cherche (et même j'arrive) à exporter les résultats d'une requête dans un fichier excel.
Voici mon bout de code :
select mon_champ from ma_table into cursor lCur
select lCur
EXPORT TO "toto.xls" TYPE XL5
Mon problème est que dans le fichier excel obtenu, le titre de ma colonne est "mon_champ", alors que j'aimerai que ça soit "un nom super beau pour le titre de ma colonne".
Comment puis-je faire ? Des indices ?
Merci d'avance de votre aide.

A voir également:

1 réponse

Réponse 1 / 1

crampe666 Messages postés 2 Date d'inscription jeudi 5 août 2004 Statut Membre Dernière intervention 21 janvier 2005
21 janv. 2005 à 15:54

J'ai fini par trouver la réponse. Pour ceux que ça intéresse :
il faut utiliser l'automation
oExcel = CREATEOBJECT("Excel.Application")
oExcel.Workbooks.Open(CURDIR()+"Toto.xls")
oExcel.visible = .F.
oExcel.sheets("feuil1")
oExcel.ActiveSheet.Cells(1,1).Value = "Un Nom de colonne super !"
oExcel.ActiveWorkbook.Save()
oExcel.Quit
release oExcel

Discussions similaires

générer le diagramme des classes à partir du diagramme des cas d'utilisation

#define et chaine

Module de classe ou classe de module ?

Excel VBA - Proprièté "Visible" pour "Worksheet"

Exporter en csv

Votre réponse

Discussions similaires