[VBA] incompatibilité de type (importation de excel vers access)Résolu

Question

Bonjour,

Je cherche &#224; importer des donn&#233;es de excel vers access et je bloque sur un message d'erreur : incompatibilit&#233; de type.
Dans mon formulaire je demande &#224; l'utilisateur de rentrer le chemin d'acc&#232;s dans un champ nom.
Puis dans mon programme VBA j'ai :
        Dim xl As Excel.Areas
        Set xl = CreateObject("Excel.Application") 
        xl.Visible = True 
        xl.UserControl = True
        xl.Workbooks.Open Filename:="nom"
J'ai essay&#233; avec la syntaxe :
xl.Workbooks.Open Filename:=nom
xl.Workbooks.Open Filename:="'" & nom & "'"

Mais &#224; chaque fois j'ai cette m&#234;me erreur : incompatibilit&#233; de type.

Du coup je sui bien emb&#234;t&#233; pour poursuivre mon importation de donn&#233;es

Merci pour vos solutions,
Seb.

cs_CanisLupus · Answer

Salut,

Si nom est le nom du champ de saisie, la bonne syntaxe est bien :
xl.Workbooks.Open Filename:=nom

Par contre, il faut que nom contienne le chemin complet du fichier &#224; ouvrir et que ce soit bien un .xls.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

cokinoumasterflash · Answer

Salut,
Non je comrpends pas, j'ai bien mis la syntaxe que tu m'as donn&#233;. Mon fichier est bien un fichier excel. Dans mon champs de saisie nom je met le chemin complet et il me met toujours cette incompatibilit&#233; de type.....
Je ne comprends pas pourquoi.

Merci,
Seb

cokinoumasterflash · Answer

finalement j'ai r&#233;ussi &#224; corriger le pb je crois

Mon code est au final : 

        Dim xl As Excel.Application

        Set xl = CreateObject("Excel.Application")

        xl.Workbooks.Open Filename:=nom

        xl.Visible = True 

        xl.UserControl = True

Merci pour l'aide

Bonne journ&#233;e

@+

Seb.

[VBA] incompatibilité de type (importation de excel vers access)

3 réponses

Discussions similaires