open workbook and save

Pierrot93

XLDnaute Barbatruc

• 28 Octobre 2010

• #2

Re : open workbook and save

Bonjour,

petite remarque au passage :

mais ce qui se passe c'est qu'il m'affiche un message d'erreur au moment du save en me disant que le fichier est en read only

Cliquez pour agrandir...

si c'est vrai, as tu vérifié, à ma connaissance tu ne pourras passer outre, il faudra effectuer éventuellement un "enregistrer sous" plutôt...

A noter, tu peux via vba, vérifier si le classeur actif est en lecture seule comme ceci :

Code:

If ActiveWorkbook.ReadOnly Then MsgBox "Lecture seule..."

bon après midi
@+

 

Vote positif 0 Vote négatif

S

sarrsouraa

XLDnaute Occasionnel

• 28 Octobre 2010

• #3

Re : open workbook and save

salut pierrot merci beaucoup pour ta reponse
il m'affiche bien que le fichier n'est pas en lecture et quand je fais un saveas
Wb.SaveAs (Wb.Path & "/" & Wb.name)
il m'affiche aussi que le fichier est en lecture

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Octobre 2010

• #4

Re : open workbook and save

Re,

oui, ceci me semble normal puisque tu enregistre sous le même nom, alors qu'il est en lecture...

Code:

Wb.SaveAs (Wb.Path & "/" & Wb.name)

il faudrait modifier le nom :

Code:

Wb.SaveAs (Wb.Path & "/" & "SAUV" & Wb.name)

 

Vote positif 0 Vote négatif

S

sarrsouraa

XLDnaute Occasionnel

• 28 Octobre 2010

• #5

Re : open workbook and save

salut pierrot
mais le fichier est en lecture quand j'affiche ton message et surtout j'ai besoin d'enregistrer sous le meme nom ça doit etre le meme fichier

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Octobre 2010

• #6

Re : open workbook and save

Re,

perso, vois pas d'autre solution pour le moment...

 

Vote positif 0 Vote négatif

S

sarrsouraa

XLDnaute Occasionnel

• 28 Octobre 2010

• #7

Re : open workbook and save

merci beaucoup pierrot pour ton aide je vais chercher encore

 

Vote positif 0 Vote négatif