xlReadOnly et retour

wachoo31

XLDnaute Occasionnel

• 16 Juin 2005

• #2

Bonsoir josé, le forum

Grand merci à toi

Comme toujours sur ce forum, rapide et précis

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #3

Re : xlReadOnly et retour

Bonjour à tous,

Meilleurs voeux pour cette nouvelle année.

Peut-être la réponse a été transmise en MP ?

J'ai la même question :

Comment enlever par macro une lecture seule soit le contraire de ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly


Merci à vous,

poipoi

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #4

Re : xlReadOnly et retour

La réponse serait celle-ci peut-être :

ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #5

Re : xlReadOnly et retour

Bonjour,

essaye ceci :

Code:

ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite

bon après midi
@+

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #6

Re : xlReadOnly et retour

Merci Pierrot,

Mais finalement, cela ne marche pas

ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite

Alors que le fichier est bien en lecture seule

kesako ???

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #7

Re : xlReadOnly et retour

Re,

Mais finalement, cela ne marche pas

Cliquez pour agrandir...

cela veut dire quoi ? message d'erreur ou pas le résultat attendu ? Chez moi sous 2003 fonctionne parfaitement... code exécuté dans un module standard, le fichier étant bien sur enregistré sur disuqe dur....

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #8

Re : xlReadOnly et retour

J'ai le message suivant :

Erreur d'éxécution '1004':

La méthode 'ChangeFileAccess' de l'objet '_workbook' a échoué

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #9

Re : xlReadOnly et retour

Re,

et le fichier est bien enregistré sur le DD ? sinon comprends pas, sans plus de détails difficile d'en dire plus....

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #10

Re : xlReadOnly et retour

Oui le fichier est bien enregistré sur le DD

La commande peut-être dans un module ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #11

Re : xlReadOnly et retour

Re,

un exemple ci-joint fonctionnel sous 2003.

 

Pièces jointes

• classeur2.xls

  36.5 KB · Affichages: 64
• classeur2.xls

  36.5 KB · Affichages: 78
• classeur2.xls

  36.5 KB · Affichages: 92

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #12

Re : xlReadOnly et retour

Merci Pierrot,

Voici ce que ton fichier me donne (en PJ) comme réponse lorsque j'appuie sur le bouton "Read/Write"

 

Pièces jointes

• alerte.bmp

  170 KB · Affichages: 105

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #13

Re : xlReadOnly et retour

Re,

si tu as enregistré mon fichier sur ton disque, je ne comprends pas, pas ce sousi chez moi sous 2003....

 

Vote positif 0 Vote négatif

P

poipoi59

XLDnaute Junior

• 17 Janvier 2013

• #14

Re : xlReadOnly et retour

Finalement ton outil marche bien

mais à quoi sert "option explicit" et où le mettre, module, this workbook... ?

Merci

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Janvier 2013

• #15

Re : xlReadOnly et retour

Re,

"option explicit"

Cliquez pour agrandir...

oblige à la déclaration de toutes les variables...

et où le mettre

Cliquez pour agrandir...

sur la première ligne de tous les module (stadard, de feuille,de classe, userform, thisworkbook)

 

Vote positif 0 Vote négatif