Hücrede yapılan işlemin saati..

[Murat III]

Personel giriş çıkış kontrol çizelgesi...

Ortak paylaşımda olan bir excel dosyasında paylaşımcılar ilgili hücreye giriş veya çıkış yazdıklarında, yan hücrede bu işlemin saatinin görüntülenmesi.

Bu nasıl yapılabilir ?

Bir de diğer bir hücrede söz konusu işlemin ağ üzerindeki hangi bilgisayardan (bilgisayar adı) yapıldığının görüntülenmesi.

 

[BG]

sayın MURAT III

asagidaki linki inceleyiniz,

http://www.excel.web.tr/showthread.php?t=52324

 

[Murat III]

Yönlendirme için teşekkür ederim. Başlangıç olarak işe yarayacak gibi görünüyor.

 

[Murat III]

Brain arkadaşımızın linki işimi görmüyor. hücre değiştirilme veyâ dosyanın kaydedilme saati yan hücrede çıkmalı, bir de işlemi yapan bilgisayar adı (kayıtlı windows kullanıcı adı değil) görünmeli.

 

[hamitcan]

dosyanın kaydedilme saati yan hücrede çıkmalı, bir de işlemi yapan bilgisayar adı (kayıtlı windows kullanıcı adı değil) görünmeli.

Not: Sayın Zeki Gürsoy' un kodundan faydalandım. Ayrıca hangi hücreye yazmak istediğinizi siz belirleyin.

Sub Comp_Domain_User()
'Dim Wsh As WshNetwork
Dim a As String, b As String, c As String

Set Wsh = CreateObject("WScript.Network")
'Set Wsh = New WshNetwork
 
'Bilgisayar Adı
a = Wsh.ComputerName
 
'Domain Adı
b = Wsh.UserDomain
 
'Kullanıcı Adı
c = Wsh.UserName

'Son kayıt tarihi
d = ActiveWorkbook.BuiltinDocumentProperties.Item("Last Save Time")


MsgBox "Bilgisayar Adı :  " & a & Chr(10) & _
   "Domain    Adı :  " & b & Chr(10) & _
   "Kullanıcı   Adı  : " & c & Chr(10) & _
   "Son Kayıt Tarihi :" & d
End Sub