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

Macros et VBA Excel Discussion :

Méthode Workbooks.Open erreur 1004 non géré en natif [XL-2013]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre expérimenté
    Homme Profil pro
    Developpeur
    Inscrit en
    Février 2013
    Messages
    180
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Developpeur

    Informations forums :
    Inscription : Février 2013
    Messages : 180
    Par défaut Méthode Workbooks.Open erreur 1004 non géré en natif
    Bonjour,

    j'ai parcouru vite fait le web sans trouver la réponse attendue.
    Dans mon code, j'utilise la propriété Workbooks.Open "ficName".
    Celle-ci marche très bien le fichier a été crée le classeur appelant.

    Maintenant, mon problème est quand le fichier est déjà ouvert, un message natif d'Excel me prévient qu'il est déjà ouvert, parfait, je n'ai pas besoin de le coder.
    Si je réponds oui, il me ferme mon fichier sans enregistrer et me le ré ouvre
    Si je réponds non, et c'est là le problème, il passe en mode erreur 1004

    Ma question est donc, Excel peut-il activer tous seul un fichier déjà ouvert ? Grâce à un paramètre ou autre ?
    (j'ai déjà parcouru la MSDN)

    Avant que vous me proposiez des solutions dérivées, j'ai déjà résolu le problème en testant si le fichier est déjà ouvert
    Mais il serait intéressant qu'Excel puis le gérer tous seul.

    Cordialement,

  2. #2
    Membre Expert
    Profil pro
    Inscrit en
    Juin 2009
    Messages
    652
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juin 2009
    Messages : 652
    Par défaut
    Bonjour,

    Peut être avec une gestion d'erreur comme dans le code suivant
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Sub aa()
    On Error Resume Next
    Workbooks.Open ("c:\ClasseurTruc.xlsm") 'à adapter
    If Err.Number = 1004 Then
      'éventuel traitement
      Err.Clear
    End If
    On Error GoTo 0
     
    '...suite
    End Sub

  3. #3
    Expert éminent
    Avatar de Marc-L
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Avril 2013
    Messages
    9 468
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Avril 2013
    Messages : 9 468
    Par défaut

    Bonjour, bonjour !

    Citation Envoyé par ranzoken Voir le message
    j'ai parcouru vite fait le web sans trouver la réponse attendue.
    Dans mon code, j'utilise la propriété Workbooks.Open "ficName". Celle-ci marche très bien le fichier a été crée le classeur appelant.
    Oui c'est évident, vite fait, à la vitesse de l'éclair ‼ Et cette instruction ne crée pas du tout un classeur !

    Sinon voir par exemple cette discussion

    _____________________________________________________________________________________________________

    Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …

    _____________________________________________________________________________________________________
    Je suis Charlie, Bardo, Sousse

  4. #4
    Membre expérimenté
    Homme Profil pro
    Developpeur
    Inscrit en
    Février 2013
    Messages
    180
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Developpeur

    Informations forums :
    Inscription : Février 2013
    Messages : 180
    Par défaut
    Bonjour,

    Merci pour vos réponse, je souhaitais simplement avoir un avis d'un tiers, et c'est chose faite =)
    sur ces bonne parole je clos le sujet.

    Cordialement,

  5. #5
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 374
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 374
    Billets dans le blog
    8
    Par défaut re
    Avant que vous me proposiez des solutions dérivées, j'ai déjà résolu le problème en testant si le fichier est déjà ouvert
    Mais il serait intéressant qu'Excel puis le gérer tous seul.
    tu a repondu toi meme a la question

    cependant il existe plusieur methode pour ouvrir 10 fois le meme classeur

    la 1 ere et la plus simple finalement c'est de créer un object exel.application a chaque fois

    2 eme ouvrir une copie du fichier

    mais dans ton cas me parait il, le probleme est la presence ou pas du classeur donc le test si deja ouvert ou non reste la meilleur solution
    a bon entendeur
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

  6. #6
    Membre expérimenté
    Homme Profil pro
    Developpeur
    Inscrit en
    Février 2013
    Messages
    180
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Developpeur

    Informations forums :
    Inscription : Février 2013
    Messages : 180
    Par défaut
    oui javais déjà répondu à mon propre poste, mais comme je n'ai que très peu d'expérience dans le vba je souhaitais avoir des retour sur le sujet.
    ça me semble quand même bizarre, qu'un message qui s'ouvre nativement puisse levé une exception suivant ton choix.

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

Discussions similaires

  1. Erreur 1004 non comprise
    Par Tikalins dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 09/07/2015, 15h24
  2. [VBA] Boucler sur la méthode Workbooks.Open plante Excel
    Par juliusmarat dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 26/09/2014, 17h39
  3. [AC-2003] Erreur 1004 non bloquée en mode débogage
    Par Beub' dans le forum VBA Access
    Réponses: 1
    Dernier message: 07/11/2013, 22h53
  4. [XL-2003] Erreur 1004 - sur Workbook OPEN
    Par graphikris dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 05/01/2013, 09h11
  5. Workbooks.Open : Erreur "Argument ou appel de procédure incorrect"
    Par Kropernic dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 31/07/2008, 09h49

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