• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

registratie gebruikers Excel

Status
Niet open voor verdere reacties.
S

surena

Gebruiker
Lid geworden
7 dec 2008
Berichten
9
Daar ik binnen enkele weken wil genieten van de Kerstvakantie moet ik mijn excel file uit handen geven aan collega's. Om achteraf allerlei discussies te vermijden ben ik op zoek naar volgende:

- wie heeft er deze file geopend
- datum en tijdstip van openen en sluiten file
- weggeschreven in een logbestand

Mijn vermoeden is groot dat dit in VBA moet gegoten worden.

Graag jullie hulp daar mijn kennis niet zo ver rijkt.

Alvast bedankt :)
 
Bedankt voor snelle feedback maar lukt me nog niet precies.

Heb volgende code genomen:

PHP: 
Public Sub DisplayLastLogInformation()
Const LogFileName As String = "C:\FOLDERNAME\TEXTFILE.LOG"
Dim FileNum As Integer, tLine As String
    FileNum = FreeFile ' next file number
    Open LogFileName For Input Access Read Shared As #f ' open the file for reading
    Do While Not EOF(FileNum)
        Line Input #FileNum, tLine ' read a line from the text file
    Loop ' until the last line is read
    Close #FileNum ' close the file
    MsgBox tLine, vbInformation, "Last log information:"
End Sub

Maar deze doet niets bij openen of afsluiten.
Enig idee of ik andere codes ook moet meenemen ?

Thanks !
 
surena zei:
Maar deze doet niets bij openen of afsluiten.
Enig idee of ik andere codes ook moet meenemen ?
Klik om te vergroten...

Lees dan verder op die pagina, het staat er vlak (:() onder:

The macro above can be used from other macros like this:

Code: 
Private Sub Workbook_Open()
    LogInformation ThisWorkbook.Name & " opened by " & _ 
        Application.UserName & " " & Format(Date, "yyyy-mm-dd hh:mm")
End Sub
Klik om te vergroten...
 
In bijgevoegd bestand wordt het werkblad Logfile aangemaakt (voor zover dat nog niet gebeurd was).
In dat werkblad verschijnen de namen, logintijd en eindtijd van degene die het bestand hebben geopend.
Het werkblad is beveiligd zodat onverlaten de gegevens niet kunnen verwijderen.
(Zoals de waard is, vertrouwt hij zijn gasten :p)

Met vriendelijke groet,


Roncancio
 

Bijlagen

Bedankt voor de zeer nuttige info en voorbeeld.

VBA werkt maar krijg in logfile geen data te zien. Toch veranderd steeds tijdstip van de logfile.
Heb lege xls file toegevoegd met de VBA codes.
Wat doe ik hier verkeerd ??? :o
 

Bijlagen

Ik weet niet welke versie je gebruikte maar mijn bestand is iets anders.
Ik heb het bestand aangepast.

Je moet een verwijzing maken naar Microsoft Scripting Runtime.

Dit doe je als volgt:
- Ga naar EXTRA - MACRO - VISUAL BASIC EDITOR. (óf ALT-F11)
- Ga naar EXTRA - VERWIJZINGEN
- Vink Microsoft Scripting Runtime aan.
- Klik op OK.
Zonder bovenstaande handelingen zal de code niet werken.

Met vriendelijke groet,


Roncancio
 

Bijlagen

Many thanks !!!! .... hij doet het.

Enkel login date & time geeft hij niet weer, wel de user.
Ik gebruik Excel 2003 engels versie.
 
surena zei:
Many thanks !!!! .... hij doet het.

Enkel login date & time geeft hij niet weer, wel de user.
Ik gebruik Excel 2003 engels versie.
Klik om te vergroten...

Bij mij werkt het wel.:confused:
Dat het een Engelse versie betreft, maakt niet uit. Wat zie je verschijnen?
Even voor de volledigheid.
In de A-kolom staat de gebruiker.
In de B-kolom de tijd dat men het bestand opent.
In de C-kolom de tijd dat men het bestand afsluit.
Kolommen A en B zouden zichtbaar moeten zijn bij het openen van het bestand.

Met vriendelijke groet,


Roncancio
 
Sorry dat ik zoveel van je tijd wegneem :o

In kolom A krijg ik enkel mijn userid te zien.
Kolom B en C zijn totaal leeg. Dat was ook zo in het voorbeeld dat je stuurde.
Daar zag ik enkel 'Ron' staan als gebruiker.

Krijg wel bij het openen van jou file een runtime error '53' en bij sluiten runtime error '1004'.
 
Ron,

Ik kom er niet uit :o

Moet ik in LogFileName As String het path naar men document leggen zoals vb.
"C:\test\GERECHTSREKENINGEN8.XLS\" ?
Heb in men xls file een sheet aangemaakt noemende Logfile.

Begrijp niet goed wat ik hier moet ingeven.

Alvast bedankt
 
surena zei:
Ron,

Ik kom er niet uit :o

Moet ik in LogFileName As String het path naar men document leggen zoals vb.
"C:\test\GERECHTSREKENINGEN8.XLS\" ?
Heb in men xls file een sheet aangemaakt noemende Logfile.

Begrijp niet goed wat ik hier moet ingeven.

Alvast bedankt
Klik om te vergroten...

Volgens mij lopen er een paar dingen door elkaar.:p
In mijn code wordt er namelijk niet gerept over LogFileName!:shocked:

Mijn verzoek is om te kijken naar mijn reactie #7 voor 2 redenen.

1.
Hierin staat beschreven hoe je een verwijzing moet maken naar Microsoft Scripting Runtime.
Deze verwijzing heb je nodig voor het correct werken van het programma.

2.
Hierin staat het programma dat je kan openen en dat de gebruiker, logintijd en afsluittijd van het bestand weergeeft.

Ik maak ook gebruik van Excel 2003 en ik heb weliswaar de Nederlandse versie maar dat maakt niet uit.

Bij mij werkt dit allen en ik neem aan bij jou ook.
Als dat niet zo is of je hebt nog vragen dan hoor ik dat graag.

Met vriendelijke groet,


Roncancio
 
surena zei:
Ron,

De jouwe doet het zoals het moet zijn. Kan enkel niet de code zien die jij gebruikt (protected :o).
De Microsoft Scripting Runtime is nu ook aangevinkt.
Teneinde raad weet ik echt niet meer welke code ik moet gebruiken uit dit voorbeeld: http://www.exceltip.com/st/Log_files_using_VBA_in_Microsoft_Excel/467.html

Sorry voor het ongemak.
Klik om te vergroten...

Surena,

Ik ben blij dat het bij jou ook werkt.:p:thumb:

Het enige wachtwoord dat ik gebruikt heb in het bestand (zowel voor het werkblad als voor de code) is: helpmij.
De site van je voorbeeld maakt een txtbestand aan met de loggegevens.
Het principe blijft hetzelfde.
Het is aan jou wat je het prettigste vindt werken.

Dus simpel gezegd: je hebt de code van je voorbeeld niet nodig maar als je de code in het bestand wilt toepassen en toevoegen, dan zal ik het bestand aanpassen.

Ik hoop dat het een beetje duidelijk is.
Als er nog vragen zijn, dan hoor ik het wel.

Met vriendelijke groet,


Roncancio
 
Ron,

Eindelijk is het gelukt en werkt gewoon perfect.
Sorry voor late reactie maar was enkele weken voor job weg.

Prettige feestdagen :-)
 
surena zei:
Ron,

Eindelijk is het gelukt en werkt gewoon perfect.
Sorry voor late reactie maar was enkele weken voor job weg.

Prettige feestdagen :-)
Klik om te vergroten...

Bedankt voor de terugkoppeling.
Het belangrijkste is dat het programma naar wens werkte.
Jij ook prettige feestdagen toegewenst.

Met vriendelijke groet,


Roncancio
 
Toch nog een vraagje, Als ik de logfile hernoem gaat het mis. Er is een werkbladnaam logfile en het bestand heet logfile. Waar en wie is wat in de vba code?






Roncancio zei:
Bedankt voor de terugkoppeling.
Het belangrijkste is dat het programma naar wens werkte.
Jij ook prettige feestdagen toegewenst.

Met vriendelijke groet,


Roncancio
Klik om te vergroten...
 
Topic is van 2008, niet meer relevant dus. En graag een eigen vraag maken a.u.b. Het is niet netjes om in een ander zijn of haar vraag jouw probleem aan de orde te stellen. Bovendien is het verwarrend voor de helpers.
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan