Certaines compagnies utilisent des fichiers Excel par le biais de réseaux intranet pour tout leur personnel d’avoir accès à certaines informations et des rapports automatiques. Habituellement, cela signifie que ce type de fichier doit être unsavable par le personnel afin de préserver un certain degré de précision et de format.

Fichier Excel irrécupérable

 

Sans modifier le menu de l’application de souscrire à l’option d’enregistrement, un fichier peut être protégé d’économie accidentelle en utilisant du code VBA à l’intérieur pour empêcher l’exécution de l’enregistrer ou enregistrer sous commandes. Tout ce que vous devez faire est d’insérer le code VBA suivant dans la section ThisWorkbook dans l’Explorateur de projet :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, CANCEL As Boolean)
    
    A = MsgBox ("Impossible d’enregistrer ce fichier !!!", vbOKOnly)
    Application.DisplayAlerts = False
    Application.ActiveWorkbook.Close False

End Sub

Ce code fonctionne en alertant l’utilisateur qui veut sauver le fichier en lui disant qu’il s’agit d’un type irrécupérable du fichier Excel et puis fermez le fichier afin de le protéger.

Limitation de la solution irrécupérable

Fichier Excel irrécupérable par cette méthode ne garantit pas le succès que le code VBA peut être suspendu de l’exécution, utilisez la touches Ctrl + Pause (pause) et en mode pause, toutes les fonctions d’applications Excel fonctionnent y compris Save.

Une solution plus viable consiste à définir le fichier comme ReadOnly sur le serveur et de cette façon personne ne peut le mettre à jour.

Profitez !

S’il vous plaît laisser un beuglement de commentaire, donc je peux comprendre si l’article a été utile ou je dois le mettre à jour ou d’offrir plus de détails.

Enregistrer

Enregistrer

 

Write a Reply or Comment

Your email address will not be published.

Ce site utilise Akismet pour réduire les indésirables. En savoir plus sur comment les données de vos commentaires sont utilisées.