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 :

[Excel] Vérifier si un classeur est en lecture seule


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Homme Profil pro
    Supply Chain Manager
    Inscrit en
    Octobre 2002
    Messages
    33
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Suisse

    Informations professionnelles :
    Activité : Supply Chain Manager

    Informations forums :
    Inscription : Octobre 2002
    Messages : 33
    Points : 40
    Points
    40
    Par défaut [Excel] Vérifier si un classeur est en lecture seule
    Bonjour!
    Qqn sait comment vérifier si un classeur a été ouvert en lecture seule (si un autre utilisateur travaille dessus par exemple)
    Merci!

  2. #2
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Regarde à Notify dans l'aide et à Open (Méthode)
    Extrait de l'aide :
    expression.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMRU)
    Notify Argument de type Variant facultatif. Si le fichier ne peut pas être ouvert en mode lecture-écriture, cet argument a la valeur True pour ajouter le fichier à la liste de notifications de fichier. Microsoft Excel ouvre le fichier en lecture seule, interroge la liste de notifications de fichier et avertit l'utilisateur quand le fichier devient disponible. Si cet argument a la valeur False
    ou n'est pas spécifié, aucune notification n'est obligatoire et toute tentative d'ouverture d'un fichier non disponible échoue.
    Tu testes pour nous et tu nous dis...

    A+

  3. #3
    Nouveau membre du Club
    Inscrit en
    Juillet 2005
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2005
    Messages : 23
    Points : 28
    Points
    28
    Par défaut
    Salut,

    je l'ai fait récemment avec le code suivant:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    If Workbooks("tonfichier.xls").ReadOnly = True Then
          MsgBox ("attention le fichier est en lecture seule")
        Else
          ....
        End If
    essais, chez moi ça fonctionne.

    A+

  4. #4
    Nouveau membre du Club
    Inscrit en
    Juillet 2005
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2005
    Messages : 23
    Points : 28
    Points
    28
    Par défaut
    J'ai oublié de préciser qu'au préalable, j'ouvre le fichier avec le code suivant
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Workbooks.Open "chemin d'accés\tonfichier.xls"
    et c'est à partir de ce moment que tu peux mettre le code précédent.

  5. #5
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Chez moi aussi !
    merci Monsieur YoYo... mais pourquoi faire simple quand on peut compliquer...

  6. #6
    Membre du Club
    Homme Profil pro
    Supply Chain Manager
    Inscrit en
    Octobre 2002
    Messages
    33
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Suisse

    Informations professionnelles :
    Activité : Supply Chain Manager

    Informations forums :
    Inscription : Octobre 2002
    Messages : 33
    Points : 40
    Points
    40
    Par défaut
    Merci! J'essaie la première technique (Notify) et si ça ne marche pas je passe à la 2ème.
    En tout cas je vous tient au courant!
    A tout à l'heure!

  7. #7
    Membre du Club
    Homme Profil pro
    Supply Chain Manager
    Inscrit en
    Octobre 2002
    Messages
    33
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Suisse

    Informations professionnelles :
    Activité : Supply Chain Manager

    Informations forums :
    Inscription : Octobre 2002
    Messages : 33
    Points : 40
    Points
    40
    Par défaut
    Malheureusement la méthode "Notify" ne m'envoie pas de message d'erreur si j'essaie d'ouvrir un classeur en lecture seule, mais uniquement lorsque le classeur est "libéré" par l'autre utilisateur...

    Mais la 2ème méthode marche bien.

    Merci à vous deux!

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

Discussions similaires

  1. [XL-2007] Ouvrir un classeur qui est en lecture seule
    Par EmmanuelleC dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 21/08/2009, 13h44
  2. [XL-2002] Vérifier si un classeur est ouvert
    Par Ptikir dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 30/04/2009, 10h32
  3. Comment savoir si un fichier/répertoire est en lecture seule
    Par Guigui_ dans le forum Général Python
    Réponses: 3
    Dernier message: 29/12/2004, 16h05
  4. [Excel] Commentavoir si un classeur est déjà ouvert ?
    Par Henkyl dans le forum API, COM et SDKs
    Réponses: 6
    Dernier message: 14/05/2004, 11h27
  5. Réponses: 5
    Dernier message: 28/10/2003, 15h01

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