Problème pour ouvrir un fichier Excel avec la fonction CreateObject

Question

Bonjour à tous,
Je fais une petite interface graphique sous vb avec des boutons censés m'ouvrir un classeur Excel et une feuille précise.
J'ai donc tapper ceci pour un bouton :

Private Sub Command1_Click(Index As Integer)

Dim appExcel As Excel.Application
Dim wbExcel As Excel.Workbook 
Dim wsExcel As Excel.Worksheet 

Set appExcel = CreateObject("Excel.Application")
Set wbExcel = appExcel.Workbooks.Open("C:\Documents and Settings\GTLX7024\Desktop\TDBB\liaison\TDB_liaison.xls")
Set wsExcel = wbExcel.Worksheets(1)

End Sub

Lors de la compilation et l'execution , quand j'appui sur le boutonclick 1, un message d'erreur apparait (Erreur 70 permission refusée). Au débogage il me surligne cette ligne : Set appExcel = CreateObject("Excel.Application")
J'ai pourtant bien rajouter la référence vers excel dans projet. Pouvez vous m'aider ? Ou est le pb ? Merci bcp!

cs_Jack · Answer

Salut
Si tu définis proprement tes variables en faisant référence à Excel, pourquoi vouloir utiliser CreateObject (utilisé en déclaration tardive) ?
Ceci suffit :
Set appExcel = New Excel.Application
Ceci est expliqué par l'exemple dans l'aide de VB6

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Luigi13013 · Answer

salut, l'aide n'est pas consultable, j'utilise une version portable de vb et le service MSDN n'est pas installé. J'ai également essayé avec la ligne de code que tu me conseil, mais malheureusement il ya toujours un pb au niveau de cette ligne... je ne comprend pas

ucfoutu · Answer

Salut,
Travailler sans l'aide en ligne (MSDN) équivaut à tenter de faire du gymkana avec une bicyclette sans guidon.
Même les plus avancés d'entre nous ont constamment besoin de consulter cette aide !
Je ne crois par ailleurs pas que la vocation de ce forum soit de se substituer systématiquement à l'aide en ligne, (et encore moins de rapporter simplement ce qu'elle expose... ce serait un comble).


____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée"  en bas d'une solution adéquate est

Luigi13013 · Answer

Salut,
Le soucis c'est que je dois faire ca au boulot mais que je ne peux pas installer de logiciels sur le dd, donc j'ai prit une version portable du logiciel sur dd externe mais je ne peux consulter l'aide. Et malgres des recherches sur le net effectuées avant de poser la question ici, je n'est pas trouver de solution. Donc je me suis permit de venir poster ici mon soucis!

Luigi13013 · Answer

Petit up ?

Luigi13013 · Answer

Ne serait ce pas un pb de droit d'acces ? Vut que je le fais au travail, peut etre que je ne peux ouvrir Excel via un autre programme ? comme si il y avait une restriction au niveau des droits admin...quelquechose comme ca.

Problème pour ouvrir un fichier Excel avec la fonction CreateObject

6 réponses

Votre réponse

Discussions similaires