Utiliser l'information "Lecture Seule"

Résolu
Philou9906 -  
 Philou9906 -
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

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
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

0
Philou9906
 
Bonjour,
Merci pour votre réponse. Je la lis tardivement et vous suis donc encore plus reconnaissant pour ce que vous m'avez indiquer.
Avec mes remerciements
0