ŞİMDİ() güncel tutmak

[teonet]

Merhaba arkadaşlar, Ramazan Bayramınız Mubarek olsun. Üstatlarıma bir sorum olacak; Hazırladığım bir çok excel çalışmanda şekil amaçlı olsada bilgilendirici tarih ve saat ŞİMDİ() komutunu nasıl güncel tutabilirim. Yani saatin saniyesini nasıl işletebilirim.

Şimdiden bilgilerini paylaşam arkadaşlarıma çok teşekkürler

 

[AS3434]

Sayın teonet
aşağıdaki linki inceleyin.

http://www.excel.web.tr/showthread.php?t=37595&highlight=saat

Saati Userformda değil hücrede isterseniz, inceleyin.

Aşağıdaki dosya yenilenmiştir. 22/12/2008

 

[myefsane]

Bu dosyalar elinde olan var mı?

 

[BG]

Sayın myefsane

Bu dosyalar elinde olan var mı?

istediğiniz dosya böyle bir şeymi?

 

[snx111]

sadece saati gösteren yokmu canlı saat 12:39 gibi saniyesi olmasın ama canlı olsun

 

[Korhan Ayhan]

Selamlar,

Hücre biçimini aşağıdaki şekilde ayarlarsanız istediğiniz görüntüyü alırsınız.

gg.aa.yyyy ss:dd

Ya da;

ss:dd

sadece saati gösteren yokmu canlı saat 12:39 gibi saniyesi olmasın ama canlı olsun

 

[snx111]

olmuyor ???

 

[İhsan Tank]

olmuyor ???

olmayan nedir anlayamadım

 

[snx111]

Selamlar,

Hücre biçimini aşağıdaki şekilde ayarlarsanız istediğiniz görüntüyü alırsınız.

gg.aa.yyyy ss:dd

Ya da;

ss:dd

işte olmayan bu şimdi() yapıp hücre görünümünden dediğini yapıyorum canlı saat olmuyor

 

[usubaykan]

Merhaba;

Sayın Gökhan Polat'ın yazdığı kodun

 Cells(1, 1) = Now()

satırını aşağıdaki gibi değiştirip tekrar deneyiniz.

Cells(1, 1) = Format(Time(), "hh:mm:ss")

 

[snx111]

canlı degilki worksheet selection change dersek sayfayı boş yeri tıklayınca artıyor saniyesi

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

 

[snx111]

saat görünüyor
canlı olmuyor arkadaşım of yaa

 

[Korhan Ayhan]

Selamlar,

Saat bende çalışıyor. Makroların etkin olduğundan emin olun.

 

[huseyin610]

saniyenin de görünmesini istiyorsanız,koddaki A1 hücresinin formatını hh:mm:ss yapınız.

 

[savuntas]

Yukarıda yazılanların hepsini yaptım ancak şirket ana serverden kullanıyoruz bu nedenleme yapamıyorum acaba yardımcı olma ımkanınız olabilirmi

sorun: ıt bilgisayar , güncel saat yapamıyorum

 

[Korhan Ayhan]

Makroları etkinleştirmeniz gerekiyor.

 

[yenilik025]

Selamlar,

HOcam merhabalar;

Private Sub UserForm_Activate()
On Error Resume Next
Do
UserForm3.Label24 = Format(Now, "dd mmmm yyyy dddd hh:mm:ss")
DoEvents
Loop
End Sub


User Form üzerine Label e kodu eklediğimde saat ve tarih çalışıyor ancak;

ALT+F11 açılmasını istediğimde engelliyor. Sanırım aktif olarak çalıştığından mıdır.?

Bunun için ne yapmamız gerekir. saygılar sunarım.

 

[Korhan Ayhan]

Formunuzun kapanış olayına aşağıdaki kodu ekleyin.

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    End
End Sub

 

[dennisf06]

merhaba,

Sayfa1 de A8 hücresinde aktif saati ( saniyesiyle birlikte ) isler vaziyette görebilmem icin hangi kodu kullanmam gerekiyor. malesef calismalari acip bakamiyorum. tessekkürler.