OVH Cloud OVH Cloud

une petite question de traçage.....

4 réponses
Avatar
Michel
Bonsoir à toutes et tous,

(avant toute chose, j'ai bien digéré et sans
offusquer mon entourage en rotant :-) ok jps :-Z
)

Une petite question svp.
j'ai un classeur xl (excel 97) sur serveur dans
un répertoire spécifique dont certaines personnes
ont accès total.
Ce que je recherche, c'est, dés que quelqu'un
charge ce classeur (avant je crée un fichier log
que je nomme audit.txt ou log dans le même
répertoire), le nom de la personne qui charge le
classeur (une ouverture de session individuelle
est obligatoire pour lancer W98 sur chaque poste
considéré) apparaisse dans ce fichier ainsi que
la date et l?heure d?accès et fermeture, sous la
forme suivante :

date - nom - heure ouverture -heure de fermeture
du fichier

et que le fichier s'alimente automatiquement en
ajout. Pour la suppression je m'en charge
manuellement le cas échéant.
Pour résumer, je voudrai tracer les accès pour
faire corriger les erreurs des uns ou des autres
par la personne elle-même en cause. (apprenti
n?est pas maître, et je suis dans le lot)

Merci de votre contribution pour élucider cette
question, qui pour vous, en VBA ne sera que de la
révision, je pense, à lire les réponses que vous
donnez et que je ne comprends pas toujours?(ce
n?est rien de le dire :o) )

Bonne soirée

--
Amicalement
Michel . P

4 réponses

Avatar
...Patrick
Salut Michel,
un début déjà:
dans le module ThisWorkbook

Private Sub Workbook_Open()
Dim Lastr
Sheets("mouchard").Activate
Lastr = Range("A65000").End(xlUp).Row
Cells(Lastr + 1, 1).Value = Date
Cells(Lastr + 1, 2).Value = Time
Cells(Lastr + 1, 3).Value = Application.UserName
Sheets(1).Activate
End Sub

Il faut nommer une de tes feuilles "mouchard" et dans ses propriétes la
mettre en xlverryhidden
Si les utilisateurs ne connaissent pas VBA, ils ognoreront l'existence de
cette feuille.
On peut largement améliorer bien sur :-)
Patrick

"Michel" a écrit dans le message de
news:
Bonsoir à toutes et tous,

(avant toute chose, j'ai bien digéré et sans
offusquer mon entourage en rotant :-) ok jps :-Z
)

Une petite question svp.
j'ai un classeur xl (excel 97) sur serveur dans
un répertoire spécifique dont certaines personnes
ont accès total.
Ce que je recherche, c'est, dés que quelqu'un
charge ce classeur (avant je crée un fichier log
que je nomme audit.txt ou log dans le même
répertoire), le nom de la personne qui charge le
classeur (une ouverture de session individuelle
est obligatoire pour lancer W98 sur chaque poste
considéré) apparaisse dans ce fichier ainsi que
la date et l?heure d?accès et fermeture, sous la
forme suivante :

date - nom - heure ouverture -heure de fermeture
du fichier

et que le fichier s'alimente automatiquement en
ajout. Pour la suppression je m'en charge
manuellement le cas échéant.
Pour résumer, je voudrai tracer les accès pour
faire corriger les erreurs des uns ou des autres
par la personne elle-même en cause. (apprenti
n?est pas maître, et je suis dans le lot)

Merci de votre contribution pour élucider cette
question, qui pour vous, en VBA ne sera que de la
révision, je pense, à lire les réponses que vous
donnez et que je ne comprends pas toujours?(ce
n?est rien de le dire :o) )

Bonne soirée

--
Amicalement
Michel . P



Avatar
Michel
...Patrick a émis l'idée suivante :
Salut Michel,
un début déjà:
dans le module ThisWorkbook

Private Sub Workbook_Open()
Dim Lastr
Sheets("mouchard").Activate
Lastr = Range("A65000").End(xlUp).Row
Cells(Lastr + 1, 1).Value = Date
Cells(Lastr + 1, 2).Value = Time
Cells(Lastr + 1, 3).Value = Application.UserName
Sheets(1).Activate
End Sub

Il faut nommer une de tes feuilles "mouchard" et dans
ses propriétes la mettre en xlverryhidden
Si les utilisateurs ne connaissent pas VBA, ils
ognoreront l'existence de cette feuille.
On peut largement améliorer bien sur :-)
Patrick

"Michel" a écrit
dans le message de
news:
Bonsoir à toutes et tous,

(avant toute chose, j'ai bien digéré et sans
offusquer mon entourage en rotant :-) ok jps :-Z
)

Une petite question svp.
j'ai un classeur xl (excel 97) sur serveur dans
un répertoire spécifique dont certaines personnes
ont accès total.
Ce que je recherche, c'est, dés que quelqu'un
charge ce classeur (avant je crée un fichier log
que je nomme audit.txt ou log dans le même
répertoire), le nom de la personne qui charge le
classeur (une ouverture de session individuelle
est obligatoire pour lancer W98 sur chaque poste
considéré) apparaisse dans ce fichier ainsi que
la date et l?heure d?accès et fermeture, sous la
forme suivante :

date - nom - heure ouverture -heure de fermeture
du fichier

et que le fichier s'alimente automatiquement en
ajout. Pour la suppression je m'en charge
manuellement le cas échéant.
Pour résumer, je voudrai tracer les accès pour
faire corriger les erreurs des uns ou des autres
par la personne elle-même en cause. (apprenti
n?est pas maître, et je suis dans le lot)

Merci de votre contribution pour élucider cette
question, qui pour vous, en VBA ne sera que de la
révision, je pense, à lire les réponses que vous
donnez et que je ne comprends pas toujours?(ce
n?est rien de le dire :o) )

Bonne soirée

--
Amicalement
Michel . P



Ok merci, je teste dés demain et je tiens au
courant.
bonne soirée

--
Amicalement
Michel . P


Avatar
...Patrick
mais si tu veux donner ta réponse en haut de conversation et pas en bas
comme ici quoi :-)) , merci


"Michel" a écrit dans le message de
news:
...Patrick a émis l'idée suivante :
Salut Michel,
un début déjà:
dans le module ThisWorkbook

Private Sub Workbook_Open()
Dim Lastr
Sheets("mouchard").Activate
Lastr = Range("A65000").End(xlUp).Row
Cells(Lastr + 1, 1).Value = Date
Cells(Lastr + 1, 2).Value = Time
Cells(Lastr + 1, 3).Value = Application.UserName
Sheets(1).Activate
End Sub

Il faut nommer une de tes feuilles "mouchard" et dans
ses propriétes la mettre en xlverryhidden
Si les utilisateurs ne connaissent pas VBA, ils
ognoreront l'existence de cette feuille.
On peut largement améliorer bien sur :-)
Patrick

"Michel" a écrit
dans le message de
news:
Bonsoir à toutes et tous,

(avant toute chose, j'ai bien digéré et sans
offusquer mon entourage en rotant :-) ok jps :-Z
)

Une petite question svp.
j'ai un classeur xl (excel 97) sur serveur dans
un répertoire spécifique dont certaines personnes
ont accès total.
Ce que je recherche, c'est, dés que quelqu'un
charge ce classeur (avant je crée un fichier log
que je nomme audit.txt ou log dans le même
répertoire), le nom de la personne qui charge le
classeur (une ouverture de session individuelle
est obligatoire pour lancer W98 sur chaque poste
considéré) apparaisse dans ce fichier ainsi que
la date et l?heure d?accès et fermeture, sous la
forme suivante :

date - nom - heure ouverture -heure de fermeture
du fichier

et que le fichier s'alimente automatiquement en
ajout. Pour la suppression je m'en charge
manuellement le cas échéant.
Pour résumer, je voudrai tracer les accès pour
faire corriger les erreurs des uns ou des autres
par la personne elle-même en cause. (apprenti
n?est pas maître, et je suis dans le lot)

Merci de votre contribution pour élucider cette
question, qui pour vous, en VBA ne sera que de la
révision, je pense, à lire les réponses que vous
donnez et que je ne comprends pas toujours?(ce
n?est rien de le dire :o) )

Bonne soirée

--
Amicalement
Michel . P



Ok merci, je teste dés demain et je tiens au
courant.
bonne soirée

--
Amicalement
Michel . P





Avatar
Michel
...Patrick avait énoncé :
Salut Michel,
un début déjà:
dans le module ThisWorkbook

Private Sub Workbook_Open()
Dim Lastr
Sheets("mouchard").Activate
Lastr = Range("A65000").End(xlUp).Row
Cells(Lastr + 1, 1).Value = Date
Cells(Lastr + 1, 2).Value = Time
Cells(Lastr + 1, 3).Value = Application.UserName
Sheets(1).Activate
End Sub

Il faut nommer une de tes feuilles "mouchard" et dans
ses propriétes la mettre en xlverryhidden
Si les utilisateurs ne connaissent pas VBA, ils
ognoreront l'existence de cette feuille.
On peut largement améliorer bien sur :-)
Patrick

"Michel" a écrit
dans le message de
news:
Bonsoir à toutes et tous,

(avant toute chose, j'ai bien digéré et sans
offusquer mon entourage en rotant :-) ok jps :-Z
)

Une petite question svp.
j'ai un classeur xl (excel 97) sur serveur dans
un répertoire spécifique dont certaines personnes
ont accès total.
Ce que je recherche, c'est, dés que quelqu'un
charge ce classeur (avant je crée un fichier log
que je nomme audit.txt ou log dans le même
répertoire), le nom de la personne qui charge le
classeur (une ouverture de session individuelle
est obligatoire pour lancer W98 sur chaque poste
considéré) apparaisse dans ce fichier ainsi que
la date et l?heure d?accès et fermeture, sous la
forme suivante :

date - nom - heure ouverture -heure de fermeture
du fichier

et que le fichier s'alimente automatiquement en
ajout. Pour la suppression je m'en charge
manuellement le cas échéant.
Pour résumer, je voudrai tracer les accès pour
faire corriger les erreurs des uns ou des autres
par la personne elle-même en cause. (apprenti
n?est pas maître, et je suis dans le lot)

Merci de votre contribution pour élucider cette
question, qui pour vous, en VBA ne sera que de la
révision, je pense, à lire les réponses que vous
donnez et que je ne comprends pas toujours?(ce
n?est rien de le dire :o) )

Bonne soirée

--
Amicalement
Michel . P



bien pris, je crois
ton code vba fonctionne à merveille (je le teste
sur ma machine)
je lui apporte quelques modifs (modestes) format
de l'heure français, ajout d'une colonne pour
précisions
...C'est en sciant que léoanard devint scie...
:-?

--
Amicalement
Michel . P