Discussion :

[Invité]

Bonjour!
Qqn sait comment vérifier si un classeur a été ouvert en lecture seule (si un autre utilisateur travaille dessus par exemple)
Merci!

[ouskel'n'or]

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+

[MrYoYo]

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+

[MrYoYo]

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.

[ouskel'n'or]

Chez moi aussi !
merci Monsieur YoYo... mais pourquoi faire simple quand on peut compliquer...

[Invité]

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!

[Invité]

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!