Classeur en lecture seule

[Eric D]

Bonjour à toutes et tous,

Comme le dit le titre, j'aimerais ouvrir un classeur en lecture seule.
j'ai regardé ds l'aide VBA, mais il me parle de configuration...

Avec WorkBookk.Open (mon Classeur) il doit y avoir des paramettres a donner pour que ce soit le cas ?

Merci pour vos conseils.

Eric D

 

[Visiteur]

Bonjour Eric D, le Forum,

Une question, pourquoi : lecture seule.... ?

En attendant, bonne soirée à tous.

....

 

[Eric D]

Bonjour,

je souhaite qu'il soit en lecture seule, parce que uniquement consultatif.

Eric D

 

[chris]

Bonjour
Au moment d'enregistrer le fichier, tu utilises enregistrersous puis tu déroules outils et tu prends options generales.
En mettant un mot de passe pour la modification, le classeur est en lecture seule pour tout ceux qui n'ont pas le mot de passe.

 

[Eric D]

Bonsoir chris,

Merci pour l'info, mais je souhaiterais le faire sous VBA.

Eric D

 

[myDearFriend!]

Bonsoir Eric D, Visiteur, Chris, le Forum.

Si j'ai bien compris...

Workbooks.Open 'C:\Classeur1.xls', ReadOnly:=True

Cordialement.

 

[Eric D]

Bonsoir myDearFriend, le forum,

Je te remercie, encore une fois tu m'enleve une épine du pied.

bonne fin de soirée.

Eric D

 

[Eric D]

Re Bonsoir,

Oups! ce n'est pas tout à fait ce que je souhaite, ce serais plutôt:

ouvrir un classeur en lecture seule, par rapport à une variable booleenne, avec un lien Hypertxte?

Merci pour ton aide.

Eric D

 

[myDearFriend!]

re Eric D,

Pardon ?

Pour ma part, 'par rapport à une variable booleenne', je ne vois pas ce que ça veut dire.
Quant à 'ouvrir un classeur en lecture seule avec un lien Hypertexte', je ne sais pas faire et me demande même si c'est faisable.

Peut-être que d'autres pourront t'apporter une solution...

Cordialement.

 

[Eric D]

Bonjour Didier, jmps, le forum,

Merci de vos remarques. Les solutions les plus simples étant souvent les meilleures, je vais suivre les conseils de jmps.

Utiliser

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = '$X$X' Then

our simuler un lien hypertexte et faire le test du type d'ouverture après. A être trop sur le vif, on en oublie parfois les idées les plus simples...

Merci encore.

Eric D

 

[_Thierry]

=> DEMO Open ReadOnly par Boolean sur Hypelink

Bonjour Eric_D, Re José, bonjour Didier, le Forum


Voici encore un Barbatruc KiA2laSuiteDansLézID !!!

Ceci en respectant à la lettre les désiratas de notre ami Eric !

Je vous laisse découvrir...

Bon Dimanche, pluvieux ici
@+Thierry [file name=XLD-Hyperlink-Open_ReadOnly_20050410131436.zip size=17371]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/XLD-Hyperlink-Open_ReadOnly_20050410131436.zip[/file]

Message édité par: _Thierry, à: 10/04/2005 13:19