Utiliser l'information "Lecture Seule" Résolu/Fermé

Question

Bonjour, 

J'aimerai savoir si il est possible d'utiliser l'information Lecture Seule.
Mon idée, est que depuis un fichier Excel, j'ouvre un autre fichier Excel, ceci à l'aide d'une macro.
Comme le fichier qui doit être ouvert, peut-être utiliser par une autre personne et qu'il me sert à y inscrire des informations, ce fichier doit IMPÉRATIVEMENT ne pas être en lecture seule.
Mon idée est donc d'empêcher l'ouverture de ce fichier, si l'information de lecture seule est indiquer.

Je reste à votre entière disposition et vous remercie d'avance pour vos suggestions.



Configuration: Windows / Chrome 71.0.3578.80

cs_Le Pivert · Answer

Bonjour, 

On peut le fermer après un message d'alerte comme ceci:

A mettre dans ThisWorkbook


Option Explicit
Private Sub Workbook_Open()
If ActiveWorkbook.ReadOnlyRecommended = True Then
    MsgBox "Ce classeur est enregistré en lecture seule et recommandé."
    Application.Quit
End If
End Sub

Utiliser l'information "Lecture Seule"

1 réponse

Discussions similaires