Kronometre

Excel VBA kodlamaları ile yapılmış örnek dosyaları burdan izleyebilir ve paylaşabilirsiniz.

Kronometre

İleti#1)  Murat OSMA » 30 May 2011 08:57

Dosya ek'tedir... --)(
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Murat OSMA
Site Forum Yöneticisi
 
Adı Soyadı:Murat OSMA
Kayıt: 04 Arl 2008 22:34
Konum: İstanbul
Meslek: Excel & VBA Eğitmeni
Yaş: 36
İleti: 14412
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bağcılar - İSTANBUL

Cevap: Kronometre

İleti#2)  skat » 30 May 2011 09:38

Murat Bey maşallah yine formdasınız.Çok güzel Ellerinizie sağlık.
Kullanıcı avatarı
skat
Siteye Alışmış
 
Adı Soyadı:SITKI YAĞCI
Kayıt: 15 Haz 2008 00:17
Konum: ereğli
Meslek: I. Kademe Vardiya amiri/Yönetici
Yaş: 46
İleti: 231
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Kdz.Ereğli

Cevap: Kronometre

İleti#3)  ugrtmzyrk » 21 Ağu 2011 17:42

Murat OSMA yazdı:Dosya ek'tedir... --)(



güzel bir çalışma olmuş. bi sorum olacak, burada ölçülen her bir zamanı farklı bir hücreye yazdırabilir miyiz? şöyle söyliyim, zaman etüdü yapılabilir bir hale getirilebilir mi, her bir ölçüm iş akışında farklı bir hücreye yazdırılabilir mi?
Kullanıcı avatarı
ugrtmzyrk
İsimsiz Üye
 
Adı Soyadı:uur tmz
Kayıt: 21 Ağu 2011 17:26
İleti: 1
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Kronometre

İleti#4)  ReBi » 18 May 2012 13:40

teşekkürler Murat bey.
Kullanıcı avatarı
ReBi
Siteye Alışmış
 
Adı Soyadı:Özkan Sabancı
Kayıt: 05 Kas 2008 10:37
Konum: İstanbul
Meslek: Üretim Planlama Sorumlusu
Yaş: 35
İleti: 134
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Kronometre

İleti#5)  bizekalan » 18 May 2012 20:27

Murat hocam harikasınız. Sizleri izlemek hakikaten güzel.
Kullanıcı avatarı
bizekalan
Siteye Alışmış
 
Adı Soyadı:Yılmaz KAYA
Kayıt: 27 Nis 2012 10:42
Konum: Isparta
Meslek: Şantiyeci
Yaş: 41
İleti: 114
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Isparta

Cevap: Kronometre

İleti#6)  Murat OSMA » 18 May 2012 23:05

Teşekkürler Yılmaz Bey. [evet]

Hoşça kalın !!!
Kullanıcı avatarı
Murat OSMA
Site Forum Yöneticisi
 
Adı Soyadı:Murat OSMA
Kayıt: 04 Arl 2008 22:34
Konum: İstanbul
Meslek: Excel & VBA Eğitmeni
Yaş: 36
İleti: 14412
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bağcılar - İSTANBUL

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Kronometre

İleti#7)  alican60 » 03 Haz 2012 15:00

[TESEKKÜR]
Kullanıcı avatarı
alican60
Siteye Alışmış
 
Adı Soyadı:ali can
Kayıt: 14 Ağu 2011 11:18
Konum: Tokat
Meslek: İnşaat Teknikeri
Yaş: 41
İleti: 393
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Eskişehir

Cevap: Kronometre

İleti#8)  Murat OSMA » 03 Haz 2012 16:26

Eksik olmayın...

İyi günler. --)(
Kullanıcı avatarı
Murat OSMA
Site Forum Yöneticisi
 
Adı Soyadı:Murat OSMA
Kayıt: 04 Arl 2008 22:34
Konum: İstanbul
Meslek: Excel & VBA Eğitmeni
Yaş: 36
İleti: 14412
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bağcılar - İSTANBUL

Cevap: Kronometre

İleti#9)  sleeper » 31 May 2014 01:49

Murat hocam, bu kronometreyi kendi çalışmama uyarladım ve sorunsuz çalışıyor. Ellerine sağlık.

Peki belirlediğimiz bir süre sonunda kronometrenin durup süre bitti uyarısı vermesi mümkün mü acaba?

Mümkünse son 10 saniye kala yanıp sönmesini de yapabilirsek süper olurdu. :)
Kullanıcı avatarı
sleeper
Yeni Başlamış
 
Adı Soyadı:ali karataş
Kayıt: 04 Kas 2013 16:28
Konum: istanbul
Meslek: memur
Yaş: 36
İleti: 63
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Kronometre

İleti#10)  Enes Recep BAĞ » 31 May 2014 11:18

Başlat düğmesinin kodlarını aşağıdaki gibi değiştirip dener misiniz?

Kod: Tümünü seç
Private Sub CommandButton1_Click()
Dim erb
erb 
InputBox("Formatınız bu şekilde olmalı--> 00:00:00.00""Www.ExcelVba.Net""00:00:00.00")
Durrrrr False
Etime0 
Timer() - Sonzaman
Me
.Repaint
 
Do Until Durrrrr
    Etime 
Int((Timer() - Etime0) * 100) / 100
        
If Etime Sonzaman Then
        Sonzaman 
Etime
        ElapsedTimeLbl
.Caption Format(Etime 86400"hh:mm:ss.") & Format(Etime 100 Mod 100"00")
        
DoEvents
        End 
If
    If 
ElapsedTimeLbl.Caption erb Then MsgBox ("Süre bitti"), vbInformation"Www.ExcelVba.Net": Exit Sub
    Loop
End Sub
Kullanıcı avatarı
Enes Recep BAĞ
Forum Moderatörü
 
Adı Soyadı:Enes Recep BAĞ
Kayıt: 30 Ağu 2010 15:39
Konum: 0 549 808 82 66
Meslek: Bilgi işlem
Yaş: 38
İleti: 8285
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: BURSA

Cevap: Kronometre

İleti#11)  lozenge » 10 Tem 2020 13:07

Teşekkürler
Kullanıcı avatarı
lozenge
İsimsiz Üye
 
Adı Soyadı:boşş boşş1
Kayıt: 04 Eyl 2013 20:30
İleti: 1
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: konya


Forum Örnek Dosyalar

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe