Demande d'explication sur fichier en lecture seule
Bonjour,
Il s'agit d'une macro qui génère un TCD en créant l'onglet "TCD" à partir des données de la Feuil1
Voici le début de mon code
Code:
1
2
3
4
5
6
7
8
9
10
| Application.DisplayAlerts = False
On Error Resume Next
Sheets("TCD").Delete
On Error GoTo 0
Application.DisplayAlerts = True
ThisWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=[Feuil1!A1].CurrentRegion.Address(, , xlR1C1, True)).CreatePivotTable _
TableDestination:="", TableName:="Mon TCD"
ActiveSheet.Name = "TCD"
etc... |
Lorsque je veux fermer et sauvegarder mon fichier, j'ai un message : "le fichier est en lecture seule, enregistrez le sous un nom différent..." Et des fois lorsque je veux l'ouvrir, le système me dit : fichier verrouillé par un autre utilisateur avec les options : "lecture seule" ou "notifier"
Et lorsque je supprime la ligne Application.DisplayAlerts = True plus aucun message bloquant n'apparait et j'ai seulement le message "Voulez-vous enregistrer...." au moment de fermer le fichier
Je ne comprends pas pourquoi le système me dit que le fichier est en lecture seule (ou verrouillé par un autre) alors qu'il ne l'est pas.
Il me semble que ce problème n'était pas apparu lorsque le fichier était sur mon DD alors que maintenant il est en réseau.
Je croyais que sans la ligne Application.DisplayAlerts = True, je ne pouvais pas avoir le le message "Voulez-vous enregistrer...."
Donc, j'ai l'impression que la ligne Application.DisplayAlerts = True ne sert à rien. Est-ce le cas ?
Merci
