[VBA] TransferSpreadsheet

Résolu

_goni Messages postés 964 Date d'inscription Statut Membre Dernière intervention -
sean72 - 21 mai 2010 à 12:33

Bonjour,
J’ai un petit souci de développement qui commence vraiment à me sortir par les oreilles. Donc, au lieu de lancer mon ordinateur par la fenêtre du sixième étage, je préfère vous demander votre avis.

Mon code sert à faire un transfert de la feuille ‘produit’ d’un classeur Excel dans un table Access.

Déjà, je vous mets mon code avec la ligne qui pose problème en gras

    Dim Chemin$
    Dim Repertoire As String, Fichier As String
    
    Repertoire = "B:\A\B\FC\APPLI_FC25\Appli annexe IFRS\Excel\"
    Fichier = Dir(Repertoire & "Annexes Passif Provisions et CA" & "*.xls")
    Chemin = Repertoire & Fichier 
    DoCmd.TransferSpreadsheet acImport, 8, _
    "Produits", Chemin, True, "Produit!A1:I10"

Le problème c’est que je tombe sur cette erreur :

Erreur d'exécution 3011 :
Le moteur de base de données Microsoft Jet n'a pas pu trouver l'objet ‘Produit$A1 :I10’. Assurez-vous que l'objet existe et que vous avez correctement saisi son nom et son chemin d'accès.

Maintenant j’ai essayé :

DoCmd.TransferSpreadsheet acImport, 8, _
    "Produits", Chemin, True, "Produit"
‘Il manque les deux premières colonnes de mon fichier Excel dans ma table

DoCmd.TransferSpreadsheet acImport, 8, _
    "Produits", Chemin, True, "A1 :I10"
‘Je travail sur la première feuille de mon fichier Excel et pas sur celle qui s’appel ‘produit’

Ca commence même à attaquer ma santé, j’ai besoin de vous ;)

A voir également:

[VBA] TransferSpreadsheet
Excel compter cellule couleur sans vba - Guide
Incompatibilité de type vba ✓ - Forum VB / VBA
Mkdir vba ✓ - Forum VB / VBA
Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
Vba range avec variable ✓ - Forum VB / VBA

2 réponses

Réponse 1 / 2

sean72

on fait j'penses que ça ne suffirait que tu jete ton ordinateur par la fenêtre mais devrais plutoôt te jeter avec avec lui.

écris moi à sur "le_raud@yahoo.fr" je t'enverais un tuto.

Réponse 2 / 2

ruzakruzak Messages postés 459 Date d'inscription Statut Membre Dernière intervention 247

T'as testé de crée une variable avec ton chemin de fichier et d'utiliser la variable dans ta macro ? Ca m'a déjà permis de contourner ce genre de galère...

_goni Messages postés 964 Date d'inscription Statut Membre Dernière intervention 38

Tu peux être plus précis? Mon chemin est déjà dans une variable.

_goni Messages postés 964 Date d'inscription Statut Membre Dernière intervention 38

quand je mets :

feuille = "Produit!A1:I10"
DoCmd.TransferSpreadsheet acImport, 8, _
    "Produits", Chemin, True, feuille

J'ai la même erreur.

On dirait qu'il interprète mon '!' par un '$'

_goni Messages postés 964 Date d'inscription Statut Membre Dernière intervention 38

J'ai vraiment besoin d'aide s'il vous plait

_goni Messages postés 964 Date d'inscription Statut Membre Dernière intervention 38

En fait, j'ai juste oublié un "s" dans l'expression "Produits!A1:I10"

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

appliquer une pause dans une macro vba excel

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

Votre réponse

Discussions similaires