Probleme de date

[DLP77]

Bonjour tout le monde!

J'ai créé un userform avec des tetbox et combox et à la fin je sauvegarde les rapports journaliers comme ceci:

ThisWorkbook.SaveCopyAs "C:\........\Année 2012\" & Format(Date, "mm-dd-yyyy").

Jusqu'ici tout va bien. Mon problème, c'est lorsqu'on consulte les rapports qui sont archivés et qu'on les ferme après, les dates changent: par exemple, lorsqu'on consulte un rapport du 01-23-2012 et qu'on le ferme par exemple aujourd'hui, la date de ce rapport va être modifiée et sera la suivante: 02-03-2012.

Quelqu'un peut me dire comment on peut faire pour figer la date?😕

Merci beaucoup

Alex

 

[phlaurent55]

Re : Probleme de date

Bonjour Alex

une idée parmi d'autres:
mettre le mot "Original" dans une cellule cachée au moment de la première sauvegarde

il reste alors à tester cette cellule au moment de la fermeture qui suit une consultation et si le mot "Original" est présent on force la fermeture du fichier sans sauvegarde

à+
Philippe

 

[DLP77]

Re : Probleme de date

Bonjour Philippe,

Merci pour la réponse apporté rapidement. Je vois ce que vous voulez dire, cependant je n'arrive pas à visualiser comment je pourrais forcer la fermeture.

Alex

 

[phlaurent55]

Re : Probleme de date

Re,

avec ceci:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If la-cellule-test = "Original" then
Application.DisplayAlerts = False
Application.Quit
End If
End Sub

le fichier se fermera sans message demandant à faire une sauvegarde dans le cas d'une consultation ultérieure

tu peux mettre le même code dans la procédure Before_Save

à+
Philippe

 

[DLP77]

Re : Probleme de date

Merci beaucoup,

J'étais en train d'essayer un code mais malheureusement ça ne fonctionnait pas.

Je vais appliquer votre solution

Alex

 

[DLP77]

Re : Probleme de date

Je vais devoir attendre demain pour tester le code au boulot.
J'ai un petit problème de compatibilté (Excel 2003 au boulot et 2010 à la maison)

Bonne soirée

Alex

 

[phlaurent55]

Re : Probleme de date

Re,

voir fichier joint
n'oublie pas de protéger le code VB avec mot de passe
pour que le fichier puisse résister aux utilisateurs occasionnels

à+
Philippe

 

[DLP77]

Re : Probleme de date

Merci pour le fichier.

Je viens de rentrer du travail. Je le testerais demain au travail.

Je te tiens au courant quant au résultat.

Merci et bon week-end

Alex

 

[DLP77]

Re : Probleme de date

Bonjour Philippe,

Je ne sais pas si tu auras ce message, en tout cas je tiens à te remercier pour ton aide. La solution que tu m'as apportée fonctionne très bien. Et merci aussi pour le conseil de protéger la sauvegarde par un mot de passe.

A plus.

Alex

 

[phlaurent55]

Re : Probleme de date

Re,

Je ne sais pas si tu auras ce message

message reçu

Bonne fin de journée

à+
Philippe