Datagrid

gon_ak Messages postés 197 Date d'inscription mardi 28 février 2006 Statut Membre Dernière intervention 17 novembre 2006 - 24 août 2006 à 16:41
gon_ak Messages postés 197 Date d'inscription mardi 28 février 2006 Statut Membre Dernière intervention 17 novembre 2006 - 29 août 2006 à 12:04
Hello!!

Apparemment ma question précédente ne vous a pas trop inspiré. Je comprend tout à fait moi non plus j'ai pas trouvé grand chose.
Je souhaite donc utiliser une autre méthode. Je voudrais exporter les données de mon Datagrid vers Excel. Le problème c'est  que sur le site je n'ai pas trouvé mon bonheur.
En effet il y a enormément de code source pour exporter les datagrid vers Excel mais en dot.net ou asp.net et c'est pas ce que je cherche.

Est-ce-que quelqu'un aurait la gentillesse de m'aider SVP.
Je compte sur votre aide.
Merci d'avance.

6 réponses

cs_aziz36 Messages postés 36 Date d'inscription jeudi 27 juillet 2006 Statut Membre Dernière intervention 26 septembre 2006
25 août 2006 à 13:25
salut


tu peux parcourir ton datagrid, et  achaque fois tu recupere L'objet et tu le copie en excel:

dim i as integer
dim Myxl as workbook  "objet excel
set myxl=getobject ("c:\.........PAth")
feuille=1


for i=1 to DataGrid.ApproxCount
   myxl.worksheet(feuille).range("A" & i).value=DataGrid.columns(0) .value
"L'objet de la ligne i, colonne 0  sera transferer ds la colonne A ligne i d'excel


 next
0
gon_ak Messages postés 197 Date d'inscription mardi 28 février 2006 Statut Membre Dernière intervention 17 novembre 2006
28 août 2006 à 08:40
Salut Aziz36

Quand tu fais "set myxl=getobject ("c:\.........PAth")" c'est pour ouvrir ta base de donnée, non?
Et si j'ai plusieurs colonnes à copier, je reprends "myxl.worksheet(feuille).range("A" & i).value=DataGrid.columns(0) .value" et je mets B, C, D... l'un derrière l'autre?
0
cs_aziz36 Messages postés 36 Date d'inscription jeudi 27 juillet 2006 Statut Membre Dernière intervention 26 septembre 2006
28 août 2006 à 09:22
slt
oui, set myxl=getobject ("c:\.........Path") , c'est pour donner le l'emplacement de ton application excel.
Et pour copier d'autres colonnes tu remplasses le nom de la colonne  B,C,.... 
et tu remplasses aussi la colonne de la recuperation du datagrid c'est à dire 
  DataGrid.columns(1),  DataGrid.columns(2).....

@+ aziz
0
gon_ak Messages postés 197 Date d'inscription mardi 28 février 2006 Statut Membre Dernière intervention 17 novembre 2006
28 août 2006 à 09:55
je viens d'écrire ce que tu m'as recommandé. Alors j'ai écris ceci:

dim i as integer
dim Myxl as Excel.Workbook "objet excel
set myxl=getobject ("c:\Mes documents\BDD")
feuille=1

for i=1 to DataGrid.ApproxCount
myxl.worksheet(feuille).range("A" & i).value=DataGrid.columns(0) .value

Mais il me mets une erreur au niveau du "Set": il demande un nom de fichier
et il me met une erreur au niveau du myxl: problème d'indice.

Peux-tu m'expliquer STP, Merci.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
cs_aziz36 Messages postés 36 Date d'inscription jeudi 27 juillet 2006 Statut Membre Dernière intervention 26 septembre 2006
29 août 2006 à 09:05
slt , déjà, ton chemin est certainement faux, si ta feuille(Nom_feuille.xls) se trouve sur Mes documents alors c'est "c:\Documents and settings\Mes documents\BDD\Nom_feuille.xls"    faudra que tu fasse attention sur le chemin d'acces

aussi, tu n'as  pas ecrit Next à la fin de la boucle

Essai encore
0
gon_ak Messages postés 197 Date d'inscription mardi 28 février 2006 Statut Membre Dernière intervention 17 novembre 2006
29 août 2006 à 12:04
Merci encore pour ton aide mais j'ai opté pour le Recordset, plus simple!
A++
0
Rejoignez-nous