Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Lecture seule VBA

Lecture seule VBA

7 réponses
Avatar
daniely
Bonjour,
Est-il possible de mettre un ligne de code VBA afin qu'un=20
fichier s'ouvre directement en lecture seule pour=20
d'=E9viter le msg (=AB Ce fichier est en lecture seule bla=20
bla . =AB ) =E0 l'ouverture du fichier ?
Merci
daniely
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Philippe.R
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le message de
news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin qu'un
fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely
Avatar
non ça marche pas...
j'ai essaye aussi:
ActiveWorkbook.ReadOnly = True
mais msg d'erreur:
"Impossible d'affecter à une propriété en lecture seule"
???


-----Message d'origine-----
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le
message de

news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin qu'un
fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely


.



Avatar
Xav
Bonjour Philippe.R

essaie Application.DisplayAlerts = False avant d'ouvrir le fichier et fait
Application.DisplayAlerts = True après avoir ouvert le fichier

--
@+

Xav
a écrit dans le message de
news:8a0801c4962f$7cfc10e0$
non ça marche pas...
j'ai essaye aussi:
ActiveWorkbook.ReadOnly = True
mais msg d'erreur:
"Impossible d'affecter à une propriété en lecture seule"
???


-----Message d'origine-----
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le
message de

news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin qu'un
fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely


.



Avatar
papou
Bonjour
Il faut utiliser la propriété ReadOnly dans Workbooks.Open
A adapter :
Workbooks.Open Filename:=ThisWorkbook.Path _
& Application.PathSeparator & _
"TESTS08092004.xls", ReadOnly:=True

Cordialement
Pascal

"daniely" a écrit dans le message de
news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin qu'un
fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely
Avatar
daniely
non ça marche pas...
je vais mettre les users en "lécture seule" directement
sur le répertoire en réseau

mais il doit bien y avoir la possibilité en VBA !!!

ciao

-----Message d'origine-----
Bonjour Philippe.R

essaie Application.DisplayAlerts = False avant d'ouvrir
le fichier et fait

Application.DisplayAlerts = True après avoir ouvert le
fichier


--
@+

Xav
a écrit dans le
message de

news:8a0801c4962f$7cfc10e0$
non ça marche pas...
j'ai essaye aussi:
ActiveWorkbook.ReadOnly = True
mais msg d'erreur:
"Impossible d'affecter à une propriété en lecture seule"
???


-----Message d'origine-----
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le
message de

news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin
qu'un


fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely


.




.




Avatar
papou
Bonjour
Tu as vu ce que je propose ?
Cordialement
Pascal
"daniely" a écrit dans le message de
news:889301c49637$8936e3a0$
non ça marche pas...
je vais mettre les users en "lécture seule" directement
sur le répertoire en réseau

mais il doit bien y avoir la possibilité en VBA !!!

ciao

-----Message d'origine-----
Bonjour Philippe.R

essaie Application.DisplayAlerts = False avant d'ouvrir
le fichier et fait

Application.DisplayAlerts = True après avoir ouvert le
fichier


--
@+

Xav
a écrit dans le
message de

news:8a0801c4962f$7cfc10e0$
non ça marche pas...
j'ai essaye aussi:
ActiveWorkbook.ReadOnly = True
mais msg d'erreur:
"Impossible d'affecter à une propriété en lecture seule"
???


-----Message d'origine-----
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le
message de

news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin
qu'un


fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely


.




.




Avatar
papou
Heu pardon je n'avais pas bien lu !
Si le fichier arrive par défaut en lecture seule à l'ouverture,
personnellement je ne vois pas de solution.
(je pensais que tu voulais ouvrir systématiquement en lecture seule)
Cordialement
Pascal

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Tu as vu ce que je propose ?
Cordialement
Pascal
"daniely" a écrit dans le message de
news:889301c49637$8936e3a0$
non ça marche pas...
je vais mettre les users en "lécture seule" directement
sur le répertoire en réseau

mais il doit bien y avoir la possibilité en VBA !!!

ciao

-----Message d'origine-----
Bonjour Philippe.R

essaie Application.DisplayAlerts = False avant d'ouvrir
le fichier et fait

Application.DisplayAlerts = True après avoir ouvert le
fichier


--
@+

Xav
a écrit dans le
message de

news:8a0801c4962f$7cfc10e0$
non ça marche pas...
j'ai essaye aussi:
ActiveWorkbook.ReadOnly = True
mais msg d'erreur:
"Impossible d'affecter à une propriété en lecture seule"
???


-----Message d'origine-----
Bonjour Daniely,
Tu peux essayer :
Application EnableEvents = False
dans la procédure Workbook_Open
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"daniely" a écrit dans le
message de

news:898001c49629$da0eb900$
Bonjour,
Est-il possible de mettre un ligne de code VBA afin
qu'un


fichier s'ouvre directement en lecture seule pour
d'éviter le msg (« Ce fichier est en lecture seule bla
bla . « ) à l'ouverture du fichier ?
Merci
daniely


.




.