Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 07-02-2007, 22:06   #1
ahmett46
 
Giriş: 01/02/2007
Mesaj: 516
Excel Vers. ve Dili:
excel2003
Varsayılan Sayfaya saat yerleştirme

slm arkadaşlar excel sayfasına saat yerleştirmek istiyorum. Ne yapmalıyım.
ahmett46 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 07-02-2007, 22:16   #2
Fuat Şirin
 
Fuat Şirin kullanıcısının avatarı
 
Giriş: 20/12/2006
Şehir: İSTANBUL
Mesaj: 937
Excel Vers. ve Dili:
türkçe
Varsayılan kodu eklersen saat çıkar

Dim stopit As Boolean 'on top of module!

Sub startclock() 'assign start button
stopit = False
clock
End Sub

Sub clock()
If stopit = True Then Exit Sub
ActiveWorkbook.Worksheets(1).Cells(1, 1).Value = _
Format(Now, "hh:mm:ss")
Application.OnTime (Now + TimeSerial(0, 0, 1)), "clock"
End Sub

Sub stopclock() 'assign stop button
stopit = True
End Sub
__________________
[B]Sadece Karşıdan Beklemek Paylaşım Değildir...
Sende Öğrendiğini Bize Öğret...
Bir gün Karşında Biri Olmayabilir...[/B]
[B][COLOR="Red"]Fuat Şirin[/COLOR][/B]
Fuat Şirin Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-02-2007, 01:17   #3
ahmett46
 
Giriş: 01/02/2007
Mesaj: 516
Excel Vers. ve Dili:
excel2003
Varsayılan saat

teşekkürler parlemenn
ahmett46 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-02-2007, 08:59   #4
emrexcel123
 
emrexcel123 kullanıcısının avatarı
 
Giriş: 15/01/2007
Mesaj: 791
Excel Vers. ve Dili:
2003 excel visual basic
Varsayılan aktif saat

eğer aktif istersen şu makroyu dene arkadaşım
sub clock ( )
do
doevents
[a1] = format(now,"hh:mm:ss")
loop
end sub
__________________
[B][U]Forum Kuralları :[/U]
1- Her zaman nazik bir hitap tarzı kullanın.

2- Birisi sorunuzu anlamazsa hoşgörülü olun ve gerekirse soruş şeklinizi gözden geçirin.

3- Birisinin cevabı sizin için yeterli açıklıkta değilse, cevaplayan kişinin sizin bilgi seviyenizi bilmediğini unutmayın ve kibarca konuyu açmasını isteyin.

4- Aynı soruyu birden fazla bölümde sormayın. Bu forumda mesaj kirliliğine yol açmakta ve mesajlardan birisi forum yönetimi tarafından silinmektedir.[/B]
emrexcel123 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 14-11-2007, 19:01   #5
chevmet
 
chevmet kullanıcısının avatarı
 
Giriş: 09/11/2006
Mesaj: 172
Excel Vers. ve Dili:
excel 2003
Varsayılan

teşekkürler
chevmet Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-07-2009, 15:53   #6
erkanmut
 
Giriş: 25/12/2006
Mesaj: 3
Excel Vers. ve Dili:
2003 türkçe
Varsayılan

arkadaşlar güzel emeğinize sağlıkta kodu eklermisin demişsiniz de nereye nasıl ekleme yapacağız yardımcı olabilir misiniz. şimdiden teşekkürler
erkanmut Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-07-2009, 17:20   #7
aspuzu21
 
Giriş: 12/01/2009
Şehir: afyon
Mesaj: 73
Excel Vers. ve Dili:
2003-2007
Varsayılan

örnek dosyaya ekledim.Bende acemiyim bu işlerde ama.Ustalarım beni mazur görsünler.Onlardan öğrendiklerimle modüle kodu ekledim.İncelersen faydası olur.saygılar
Eklenmiş Dosyalar
Dosya Türü: xls saat.xls (25.0 KB, 637 Görüntülenme)

Bu mesaj en son " 09-07-2009 " tarihinde saat 17:26 itibariyle aspuzu21 tarafından düzenlenmiştir....
aspuzu21 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-07-2009, 17:21   #8
erkanmut
 
Giriş: 25/12/2006
Mesaj: 3
Excel Vers. ve Dili:
2003 türkçe
Varsayılan teşekkür ederim.

Alıntı:
aspuzu21 tarafından gönderildi Mesajı Görüntüle
örnek dosyaya ekledim.Bende acemiyim bu işlerde ama.Ustalarım beni mazur görsünler.Onlardan öğrendiklerimle modüle kodu ekledim.İncelersen faydası olur.saygılar
emeğine sağlık, işlerimin yoğunluğundan yeni gördüm.ektedeki dosyayı indirdim baktım yalnız ekran kararıyor excel kapanıp tekrar açılıyor. onu çözerimde yalnız dediğim gibi oraya saat yerleştirmeyi nasıl yapıyorsunuz yani sutunda saatın devamlı çalışmasını nasıl sağlıyorsun. onu öğrenmek istiyordum. acemiyim diyorsun ama gördüğün gibi ben daha acemiyim. tekrar teşekkür ediyorum.
erkanmut Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-07-2009, 17:55   #9
izcik
 
Giriş: 18/05/2009
Şehir: İstanbul
Mesaj: 664
Excel Vers. ve Dili:
Excel 2002 Türkçe
Varsayılan

Alıntı:
Fuat Şirin tarafından gönderildi Mesajı Görüntüle
Dim stopit As Boolean 'on top of module!

Sub startclock() 'assign start button
stopit = False
clock
End Sub

Sub clock()
If stopit = True Then Exit Sub
ActiveWorkbook.Worksheets(1).Cells(1, 1).Value = _
Format(Now, "hh:mm:ss")
Application.OnTime (Now + TimeSerial(0, 0, 1)), "clock"
End Sub

Sub stopclock() 'assign stop button
stopit = True
End Sub



Tahmin ettiğim kadarıyla bu kodlarda saati başlatan ve durduran düğmeler var.
Rica etsem dosya haline gietrebilir misiniz. Ben uğraştım yapamadım.
izcik Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-07-2009, 21:15   #10
Orion1
Uzman
 
Orion1 kullanıcısının avatarı
 
Giriş: 01/03/2005
Mesaj: 19,498
Excel Vers. ve Dili:
Win7 Home Basic TR 64 Bit Ofis-2010-TR 32 Bit
Varsayılan

Alıntı:
izcik tarafından gönderildi Mesajı Görüntüle
Tahmin ettiğim kadarıyla bu kodlarda saati başlatan ve durduran düğmeler var.
Rica etsem dosya haline gietrebilir misiniz. Ben uğraştım yapamadım.
Buyurun dosya.
Ben bir şey yapmadım.Arkadaşın verdiği kodları modüle koydum sadece.
Eklenmiş Dosyalar
Dosya Türü: xls Digital saat_59.xls (24.5 KB, 472 Görüntülenme)
__________________
evrengizlen@hotmail.com

KOD ANLATILMAZ,YAZILIR!
Bir sümer atasözü;
Madem biliyorsun neden öğretmiyorsun.Boşa vakit geçirdin neye yaradı.
Orion1 Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 17:04


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Hurda - Torna - Çorlu Web Tasarım - Tarot Falı - Fenerbahçe Haberleri - Trakya Haberleri - investing - Hurda - Kozmetik Ürünler - Excel Eğitimi - Lingerie - Dyeing Machine - Çorlu Temizlik- Hazır Site- SEO- Çorlu Burun Estetiği- Karton Bardak- Çorlu Pimapenci- İstanbul Avukat- Çorlu Kekemelik- Edirne Su Arıtma- Çorlu Perde Yıkama- Marmara Ereğlisi Hotel- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Kamera- Çorlu Fiber- Çorlu Araç Takip-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden