OVH Cloud OVH Cloud

VB6 et Excel97

1 réponse
Avatar
JeanP
Bonjour,
J'ai un prog. VB6 qui ouvre un fichier texte dans Excel97.
Sur mon PC le programme fonctionne bien.(Excel est installé)
Lorsque j'installe le prog sur un autre PC(celui-ci n'ayant pas Excel97
installé)
j'ai le msg"err exec. 429 Le composant activex ne peut créer l'objet".
et ce lors de l'instruction "Set APPExcel =
CreateObject("Excel.Application")"

Aurais-je oublié une dll ou autre chose.... lors de l'installation ?
D'avance merci.
Jean

Voici une copie de la source de mon programme.
Option Explicit
Dim APPExcel As Excel.Application
Dim WBExcel As Excel.Workbook
Dim WSExcel As Excel.Worksheet

Private Sub CMDOuvrir_Click()
--> err 429
Set APPExcel = CreateObject("Excel.Application")
APPExcel.Workbooks.OpenText FileName:="C:\TempJean\Saop.txt",
Origin:=xlWindows, _
DataType:=xlDelimited, Tab:=False,
Semicolon:=True, Comma:=False
Set WBExcel = APPExcel.ActiveWorkbook
Set WSExcel = WBExcel.Worksheets(1)
APPExcel.ReferenceStyle = xlA1
APPExcel.Visible = True
WBExcel.SaveAs FileName:="C:\TempJean\SaopJean.xls", FileFormat:=xlExcel4
End Sub

Private Sub CMDFermer_Click()
WBExcel.Close
APPExcel.Quit
Set WSExcel = Nothing
Set WBExcel = Nothing
Set APPExcel = Nothing
Unload FTstExcel
Set FTstExcel = Nothing
End Sub

1 réponse

Avatar
Zoury
Salut Jean! :O)

Nope. L'utilisation de l'automation exige que le client est Office (ou le
logiciel spécifique) d'installé sur son poste. Les dlls d'Office ne sont pas
distribuable avec un programme VB.

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous