numarator sayac olusturmak

[kakara]

merhabalar ustadlarım bır numarator olusturmaya calısıyorum belırlı sartlarla artması gerekıyor. detaylı bılgıyı paylastıgım dosyanın ıcıne yazdım ılgınız ıcın sımdıden tesekkur ederım.

 

[yanginci34]

Denermisiniz.

 

[byfika]

Merhabalar,
Anladığım kadarıyla böyle bir şey istiyorsunuz. Dosyayı deneyiniz...

 

[kakara]

@yanginci34 ustadım calısmanızı calıstıramadım 64 bit işletim sistemi, x64 tabanlı işlemci excel 2016 ustadım bununla alakalı olabılır mı ?

 

[kakara]

@byfika ustadım ılgınız ıcın tesekkurler @yanginci34 ustadın yaptıgı calısma ısımı tam cozecek fakat sanırım benım excel surumumden dolayı bende calısmadı malesef

 

[byfika]

Merhabalar,
End sub dan önce alttaki kodu ilave edip denermisiniz?

If Target.Value <> "" Then Cells(Target.Row, "e").Value = CreateObject("WScript.Network").UserName

Ayrıca :
If Target.Value <> "" Then Cells(Target.Row, "d").Value =Date
yerine alttaki satırı yazarsanız tarih saat dakika saniyede ilave olacaktır.
If Target.Value <> "" Then Cells(Target.Row, "d").Value = Format(Now, "dd.mm.yyyy hh:mm:ss")

 

[kakara]

@byfika ustadım ılgınız ıcın tesekkur ederım calısıyor.