IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Gestion d' Excel avec Access


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de BRUNO71
    Homme Profil pro
    Retraité
    Inscrit en
    Janvier 2007
    Messages
    507
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Saône et Loire (Bourgogne)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 507
    Par défaut Gestion d' Excel avec Access
    Bonjour,

    A l'aide de la faq Access j'ai réalisé ce code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
     
     
    Dim MyExcel As String
    Dim XlExcel As Excel.Application
    Dim XlBook As Excel.Workbook
    Dim XlSheet As Excel.Worksheet
    MyExcel = "C:\AA\ Etude.xls"
    Set XlExcel = CreateObject("Excel.Application")
    Set XlBook = GetObject(MyExcel)
    XlExcel.Visible = True
    XlBook.Windows(1).Visible = True
    Set XlSheet = XlBook.Worksheets(1)
    XlSheet.Range("nom") = Me!client
    XlSheet.Range("adresse") = Me!adresse
    XlSheet.Range("commune") = Me!Liste_communes
    XlSheet.Range("tel") = Me!tel
    Set XlExcel = Nothing
    Set XlBook = Nothing
    Set XlSheet = Nothing
    J'aimerai savoir pourquoi le fichier excel ouvert est bloqué ?
    Je ne peux pas actionner une quelconques cellules !
    N'y même enregistrer sous !
    Alors que ( NOTHING ) esl là pour libérer ?
    Je souhaiterai le fermé et l'enregistrer sous le nom de la cellule :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    XlSheet.Range("nom") = Me!client
    Est-ce possible et comment ?

    Merci de votre aide.

    Bien cordialement à vous tous.

    Bruno.

  2. #2
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Novembre 2006
    Messages
    154
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Novembre 2006
    Messages : 154
    Par défaut
    Bonsoir...

    Je ne sais pas pourquoi ton fichier est "bloqué", mais déjà, tu n'as pas d'instruction qui le sauvegarde, ni qui le ferme ensuite,et tu libères les instances...C'est peut être la le problème..Nothing ne ferme pas le fichier Excel crée, il libère simplement le

    Rajoute donc a ton code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    xlBook.SaveAs Me!Client
    puisque MyExcel semble être une variable qui contient le chemin et le nom du fichier....puis
    pour le fermer...
    Ensuite tu peux mettre tes Xlbook is nothing...

    Bon courage.
    Didier71

  3. #3
    Membre éclairé Avatar de BRUNO71
    Homme Profil pro
    Retraité
    Inscrit en
    Janvier 2007
    Messages
    507
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Saône et Loire (Bourgogne)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 507
    Par défaut Gestion d' Excel avec Access
    Bonjour Didier71,

    Merci beaucoup

    Bien cordialement.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VBA]Utiliser les fonctions Excel avec Access
    Par PsykotropyK dans le forum VBA Access
    Réponses: 8
    Dernier message: 18/04/2007, 13h58
  2. Gestion de magasin avec access
    Par oujdinaute dans le forum Access
    Réponses: 2
    Dernier message: 12/12/2006, 17h22
  3. [vba excel & access] ouvrir feuille excel avec access
    Par ash_rmy dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/09/2006, 08h59
  4. Comment mettre en relation Excel avec Access ?
    Par rimrim dans le forum Access
    Réponses: 2
    Dernier message: 20/07/2006, 14h22
  5. Comment lancer un fichier Excel avec Access ??
    Par merlubreizh dans le forum Access
    Réponses: 5
    Dernier message: 12/09/2005, 14h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo