• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Saat yazma formatı

Katılım
23 Şubat 2007
Mesajlar
1,212
Excel Vers. ve Dili
Excel2003
Değerli dostlar Saat olarak verileri girerken 12:30 iki nokta üst üste yazmak her seferinde zaman alıcı oluyor. Ben 1230 şeklinde yazsam yazılan 12:30 şekline dönüşse... Böyle bir ayarlama yapılabilirmi?
 
İlgili alanı seçip bu kodu uygulayın.

Sub Makro1()
Selection.NumberFormat = "00"":""00"
End Sub
 
Bu biçimlendirme ile sadece görüntüyü kurtarırsınız. Hesaplama yapmanız gerekirse yanlış sonuç alırsınız
 
excel dersanesinde tarih ve saat fonksiyonlarının detaylı analizi var, orada askeri saat sistemini değiştirme bölümünde formülleri uygulayabilirsiniz.

bir kolonda normal rakam yazarsınız yanındaki kolonda da onu saate çevirirsiniz, bi yöntem bu olabilir
 
Sn Yesertener ben zaman hesabı yaptım çıkarmada sorun yok.
 
1250-1059=191 (Görünüm olarak 01:91)
12:50-10:59=01:51

Artık siz karar veriniz
 
1250-1059=191 (Görünüm olarak 01:91)
12:50-10:59=01:51

Artık siz karar veriniz

Haklısınız ben yanılmışım. Ancak verdiğiniz adreste de istediğim türden bir cevap bulamadım.İstediğim şunu yapabilmekti. Çalışma saatlerini girince işyerimizde standart uyguladığımız tanımlı 3 vardiyadan hangisinde çalışılyorsa ona göre saat hesabını yevmiyeye dönüştürerek yapabilmekti.
 
Sayın kelkitli,

Örnek bir dosya ekleyiniz hep beraber çözümünü bulalım, ne dersiniz?
 
Sayın kelkitli,

Aynı tanım iki değişik şekilde yapılmış, kafam pek bir güzel karıştı ama yorum yaparak (ki yanlış ta yapmış olabilirim) birşeyler yapmaya çalıştım.

Ekteki dosyayı inceliyiniz. Eksiklikler varsa hep beraber gidermeye çalışırız.
 
Sn.Necdet_Yesertener Teşekkür ederim. Eline emeğine sağlık. Kusura bakmayın saatle ilgili kısmı forumdaki istemden dolayı ayrıca yazmamıştım yorumunuz doğru ancak size eziyet oldu. Fazla mesai hesabı güzel,çalışma saatleri güzel. Vardiya hesaplamada şunu yapamadım.
=eğer(işe başlama=05:00 ten sonra07:00 den önce ise;1);
=eğer(işe başlama=09:00 dan sonra13:00 den önce ise;2);
=eğer(işe başlama=13:00 ten sonra16:00 dan önce ise;1);değilse "İncele"
yani bu iki saat aralığını belirtemedim.
 
Son düzenleme:
mesai başlama saati 13:00 ise durum ne olacak? ben orda dikkat ederseniz 12:59 u seçtim, bocaladığım yerden biri orasıydı
 
mesai başlama saati 13:00 ise durum ne olacak? ben orda dikkat ederseniz 12:59 u seçtim, bocaladığım yerden biri orasıydı

Sn.Necdet_Yesertener, durum şöyle:
Sabah 05:00 den önce işyerine gitme imkânı pek yok. Vardiya başlangıcı 06:00 ancak ayda 3 kez 1 saat geç kalabilir. 12:00 Vardiyasında olanlar saat 09:00 da işe gelse de kabul edilir. 1 saat gecikirse durumu incelenir büyük ihtimal 1 saat gecikmesini kullanıyordur. Saat 15:te vardiyaya gelenler de erken gelirse kabul edilir. Ancak erken gelişlerde fazla mesai verilmez. O yüzden 15:00 vadiyası saat 13:00 den sonra olmak kaydı ile saat 16:00 yı geçmemek şartı ile 13:01 den itibaren olabilir.
 
Sayın kelkitli o zaman gönderdiğim dosyada Sayfa2 de Saatler olarak adlandırdığım alanda A4 ü 13:00, A5 i de 15;01 yaparsanız hangi vardiyada olduğunu bulacaktır.

Vardiya hesaplamasında başka sorun var mı?
 
Değerli dostlar,
Sn.Necdet_Yesertener'in katkısıyla hazırladığım dosyayı forumdaki arkadaşların ihtiyacı olanları kulanması açısından ekte sundum. Teferruatlı bir şey olmasa da ben paylaştım. Katkı sağlayan arkadaşlar daha bir şeyler ekleyip sunabilirler. Sn Yeserten'e İmzasında ki sloganını doğrulayan tutumundan dolayı tekrar teşekkür ederim.
 
arkadaslar

Sub Makro1()
Selection.NumberFormat = "00"":""00"
End Sub
kod görüntüle ile bu işlemi yaptım fakat sayfaya dört rakam yazdığımda arasına : koymuyor.
benim isteğim kısaca çalışma sayfasına 4 rakam yazdığımda arasına : iki nokta üstüste koymasıç
 
Geri
Üst