Enregistrer excel sous VBA sans lecture seule
Résolu
Maud1681
Messages postés
14
Date d'inscription
Statut
Membre
Dernière intervention
-
Maud1681 Messages postés 14 Date d'inscription Statut Membre Dernière intervention -
Maud1681 Messages postés 14 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Voici le code que j'utilise pour enregistrer mon fichier sous VBA :
ActiveSheet.SaveAs Filename:= _
"\\xxx\xx\x\y\tralala\" & "test-" & Range("J5") & "_" & Range("C7") & "_" & Format(Now, "dd-mm-yyyy") & FileExtStr, FileFormat:=FileFormatNum,
ThisWorkbook.Close SaveChanges:=False
Le fichier s'enregistre bien avec l'extension que je souhaite (=xlsm) mais il se met en lecture seule...
Savez-vous l'élément que je dois rajouter pour supprimer cette propriété ?
Vous remerciant par avance,
Voici le code que j'utilise pour enregistrer mon fichier sous VBA :
ActiveSheet.SaveAs Filename:= _
"\\xxx\xx\x\y\tralala\" & "test-" & Range("J5") & "_" & Range("C7") & "_" & Format(Now, "dd-mm-yyyy") & FileExtStr, FileFormat:=FileFormatNum,
ThisWorkbook.Close SaveChanges:=False
Le fichier s'enregistre bien avec l'extension que je souhaite (=xlsm) mais il se met en lecture seule...
Savez-vous l'élément que je dois rajouter pour supprimer cette propriété ?
Vous remerciant par avance,
2 réponses
-
Bonjour,
au fait, format enregistrement
52---->xlOpenXMLWorkbookMacroEnabled
tout sur les format d'enregistrement:
https://docs.microsoft.com/fr-fr/office/vba/api/excel.xlfileformat?redirectedfrom=MSDN
Alors chez moi, pas de lecture seul a la suite d'enregistrement
Méthode Workbook.SaveAs (Excel): a voir readonlyrecommended
https://docs.microsoft.com/fr-fr/office/vba/api/excel.workbook.saveas?redirectedfrom=MSDN -
en fait, ça passe en lecture seule quand j'envoie le fichier par mail... j'ai trouvé que c'était une sécurité du système donc non modifiable... du coup, l'utilisateur doit enregistrer la version modifiée sur son bureau.
Dans tous les cas, merci pour ton aide précieuse !
bon we !