impossible de creer fichier excel, erreur 429...

Question

bonjour,
je narrive pas a creer un nouveau fichier excel, a lexecutiion jai erreur 429, lactivex ne peu pas creer lobjet...
je nai pas excel sur mon pc, jai donc demander a un pote de menvoyer excel.exe (puiske apparement c ca qui sert de reference)
je lai ajout&#233; et active dans "les references"
la ligne de reference a excel apparai bien dans le fichier .vbp de mon projet
il sagit de excel 11.0
ou est lerreur?? est ce quil fau avoir la totalite de excel pour que ca fonctionne?? ou alors est ce que excel.exe doit etre accompagn&#233; dun autre fichier? lekel?? merci !!

voici mon code:

Dim excelapp As Excel.Application
Dim excelbook As Excel.Workbook
Dim excelsheet As Excel.Worksheet


Set excelapp = CreateObject("Excel.Application")
excelapp.Workbooks.Add
Set excelsheet = excelapp.ActiveWorkbook.ActiveSheet


For i = 1 To form.ListView.ListItems.Count
excelsheet.Range("A" & i) = form.ListView.ListItems(i)
excelsheet.Range("B" & i) = form.ListView.ListItems(i).SubItems(1)
excelsheet.Range("C" & i) = form.ListView.ListItems(i).SubItems(2)
Next i


excelapp.SaveAs (App.Path & "\pret.xls")
excelbook.Close
excelapp.Quit


Set excelsheet = Nothing
Set excelbook = Nothing
Set excelapp = Nothing

jpleroisse · Answer

Bonjour,

Excel doit &#234;tre install&#233; sur le PC.



jpleroisse

tototar · Answer

excel entier?? mai je nai que open office! veu pas dexcel moi!
ya pas un ocx ou un composan pour remplacer excel?????
excel.exe ne suffit pas tout seul?????
dans les docs , ils disent que la ref dont vb a besoin c excel.exe rien dautre.
donc c chelou.
mon code est bon ????c pour creer un nouveau fichier en fait.

jpleroisse · Answer

Re,

Ton code est bon pour cr&#233;er un nouveau classeur, mais rien &#224; faire, il faut qu'excel soit install&#233;.



jpleroisse

cs_JMO · Answer

Bonsoir,
Je viens de tester cette possibilit&#233;.
Enreg du file en .csv

Dim fso, fichier
Set fso = CreateObject("Scripting.FileSystemObject")
Set fichier = fso.CreateTextFile("d:\fichier text.csv", True)
fichier.WriteLine("Test d'&#233;criture dans un fichier")
fichier.Close
Set fso = Nothing

tototar · Answer

ouais mai je voudrais du xls. tout ceux qui utilise visual basic possedent aussi excel??? c dingue kan meme!!

cs_JMO · Answer

re,
Excel ouvre les files .csv

Dim fso, fichier
Set fso = CreateObject("Scripting.FileSystemObject")
Set fichier = fso.CreateTextFile("d:\fichier text.csv", True)
fichier.WriteLine("Test d'&#233;criture dans un fichier pour excel !!!")
fichier.Close
Set fso = Nothing

jpleroisse · Answer

Bonsoir,

jmo, s'il n'a pas Excel install&#233; cel&#224; n'est pas possible d'ouvrir un fichier qu'il soit csv ou xls



jpleroisse

jpleroisse · Answer

Re,

Excuse je ne voulais pas &#233;crire si grand, je me suis gour&#233; dans les caract&#232;res.



jpleroisse

tototar · Answer

mais si je peu les ouvrir jai open office!! mais apparmeent il faut aussi avoir excel pour ke ca marche!! or je vois pas lintret davoir open office et le pack office de crosoft!

cs_JMO · Answer

Bonsoir,
La question &#233;tait:
Je n'ai pas excel sur mon pc.
Je n'arrive pas a enregistrer un fichier avec l'extension .xls

Je ne vois pas l'utilit&#233; de cr&#233;er et de vouloir ouvrir un fichier dans 
un format dont on a pas l'appli. Si ce n'est pour l'emettre &#224;
d'autres users.

tototar · Answer

JMO ta pas lair de bien comprendre: jai open office!!!!!
donc je peu ouvrir des fichier .xls!
ya pas que excel et microsoft office dans la vie!! renseigne toi un peu !!

cs_CanisLupus · Answer

Salut, pour manipuler des objets Excel dans un prog vb, il faut la r&#233;f&#233;rence "Microsoft Excel x.x Object Library" reposant sur le fichier EXCELxx.OLB et non pas sur excel.exe.
Ce fichier est install&#233; habituellement avec Excel dans "c:\Program files\Microsoft Office\Officexx".
Mais, je doute (bien que n'ayant pas essay&#233;) que cela suffise.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

tototar · Answer

ah! pourtant javai mat&#233; sur le net ce quil fallai comme composant c t marqu&#233; partout excel.exe
je v essaye de recuperer le .olb et je v tester ....

PCPT · Answer

salut,

umm... sinon, de m&#233;moire, il y a des API ou des proc&#233;dures r&#233;serv&#233;e pour O3.

j'ai d&#233;j&#224; lu &#231;&#224; sur OpenOffice.Org, &#231;&#224; me semblait plut&#244;t bien fait.
maintenant, de l&#224; &#224; savoir si &#231;&#224; fonctionne aussi par la suite pour
l'utilisateur qui n'a que excel (donc ton oppos&#233;), je ne sais pas....



ps : et si c'est juste la librairie (olb) d'excel, il y a sans doute
des contraintes de licence... (&#224; prendre pour ce que &#231;&#224; vaut^^)

PCPT   [AFCK]

cs_CanisLupus · Answer

pcpt a raison, il y a des prob de licence.
Mais, au juste, tu es oblig&#233; de g&#233;rer des fichiers excel ?
Entre nous, piloter excel &#224; partir de vb6 c'est trop lent. Es-tu vraiment oblig&#233; de produire tes r&#233;sultats sous forme de tableaux excel ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

tototar · Answer

oblig&#233; non, mais je prefererais, meme si c long, de tte facon, yora pas enormement delement dans ma listview donc je pense pas que ce sera si long que ca. et je prefererai vraiment exporter en fichier .xls cest quand meme mieu, jveu dire ceu qui on excel ou O3 ou nimporte kel tableur pourron le lire, ok ya les csv mais jaime pas. jai pas encore essaye de recuperer les .olb je vou tien au courant...

Impossible de creer fichier excel, erreur 429...

16 réponses

Discussions similaires