Çözüldü Silinmiş veya Hatalı Saatler İçin Uyarı Verme

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

hakki83

Site Üyesi
Excel Versiyonu
Excel 2016
Excel Sürümü
32 Bit
Excel Dili
Türkçe
Merhabalar

Örnek dosyada, değerli hocamız Ömer Baran hocamızın, tarihler için oluşturduğu çok güzel bir kod vardır.

Aynı şekilde hocalarımız tarafından saatler için de bir kod oluşturulabilirse çok sevinirim.

Önemli husus şudur:

Tarihlerin bir standardı vardı.
Yani
01.01.2022'de başlayıp,
1'er gün arayla devam ediyordu.

Fakat
Saatlerde maalesef bir standart yoktur:
Yani
başlangıç saatinin,
iki saat arasındaki zaman aralığının, ve
bitiş saatinin bir standardı yoktur.

Değişkendir, Yani:

08:00'da başlayıp, 15'er dakika aralıklarla, 18:00'da da bitebilir.
10:00'da başlayıp, 10'ar dakika aralıklarla, 17:30'da da bitebilir.
Bu kullanan kişiye göre değişecektir.

Tek standart; başlangıç saatinin B2'den itibaren başlamış olduğudur.

Bundan dolayı, Excelden yapması istenilen görev için oluşturulan kodlarda;

başlangıç saati, bitiş saati ve zaman aralığının girilmesi gereken yerlerin, ya da bunlardan en az bir/belki iki tanesinin yerinin belli olması gerekiyor diye düşünüyorum.

Düşüncelerimi ifade etmeye çalıştım. Takdir değerli hocalarımızındır.

Teşekkürler
 

Ekli dosyalar

Ben isteğinizi maalesef tam olarak anlayamadım.

İsteğiniz kod çalıştırıldığında;
-- ilk olarak süreye ilişkin dakika anlamındaki ritim için bir soru sorulsa (diyelim kullanıcı 7 yazdı),
-- B1 hariç B sütunundan başlayarak sağa doğru tüm sütunlarda olmak üzere 2'nci satırdan aşağıda kalan tüm veriler silinip,
-- C1'den başlayarak sağa doğru solundaki saate, kullanıcıya sorulan sorunun cevabı olan sayı kadar dakika eklenerek saatlerin yazılması mı?
Yoksa tarih silinmesiyle ilgili durumun yakalanması gibi, saatlerden silinen olup olmadığını mı yakalamak istiyorsunuz?
 
Yoksa tarih silinmesiyle ilgili durumun yakalanması gibi, saatlerden silinen olup olmadığını mı yakalamak istiyorsunuz?



Evet Ömer hocam.

Tam olarak istediğim, tıpkı tarih kodunda olduğu gibi saatlerde de silinen olup olmadığının yakalanmasını istiyorum.

Başlangıç / bitiş saatini ve dakika aralıklarını sadece ben belirliyorum.
Bir başkasının bu verilerle (tarihlerle, saatlerle) ilgili değişiklik yapma ihtimali yok.

Sadece yanlışlıkla silebilir,
veya
Normal iç kısımdaki hücreye veri yazmak isterken, yanlışlıkla birinci satıra veri yazabilir.
ve dolayısıyla dosya bozulabilir.

Tıpkı eksilen tarihteki kodunuzun aynısı için saatler için de olursa çok güzel olur.

.......
İlk mesajımda yazdığım gibi hocam,
başlangıç saatinin,
zaman aralıklarının ve
bitiş saatinin (yani hangi sütunda biteceğinin)
bir standardı yoktur.
.......

Yine anlaşılmayan bir şey olursa severek anlatmaya hazırım
 
Örnek doğru/yanlış/eksik veri girişleri yaptıktan sonra
VBA ekranı üzerinden elle şu kodu çalıştırıp deneyin bakalım.

VBA:
You must log in to view content
(17 satır)
 
Çözüm
Değerli hocam sizin bütün kodlarınız mükemmeldir.

Excel konusundaki ustalığınıza hayran olan yüzlerce üyeden sadece birisiyim. :)

Hocam maalesef bilgisayar başından ayrıldım. Birkaç saat sonra tekrar geçeceğim.
Geçince hemen rahatça denemeler yapacağım.

Bir de hocam saat kısmını şöyle bir-iki cümleyle tekrar özetleyeyim.

Yeni kodlar B1’deki saate bakacak.
Bir de aradaki saat farkına ve son saate bakacak.
Silinmiş veya değişmiş hatalı bir saat hücresi varsa, tespit edecek.
Sadece budur hocam.

Tekrar emeklerinize sağlık. Teşekkürler. :)
 
O zaman; ayrı kod olarak deneme işini bir kenara bırakıp,
Activate koduna ekleme yönteminden (eklediğiniz son örnek belgedeki durum) devam edelim.

-- Eklenen kısımdaki ritim = InputBox...... kısmını ritim = 15 olarak değiştirin,
-- Eklenen kısımdaki GoTo 10 kısmını GoTo 20 olarak, daha alttaki 10: kısmını da 20: olarak değiştirin.
Bu değişiklikler yeterlidir,
 
Ömer hocam emeklerinize sağlık, şahane olmuş.

Sadece hocam, bir önceki saati gösteriyor.

İki tane GoTo 10 vardı, bunları GoTo 20 yaptım.
Alttaki 10'u da 20 yaptım.

Hücre adresleri doğru, sadece olması gereken saatten bir önceki hücrenin saatini gösteriyor.
 

Ekli dosyalar

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Konuyu başlatan
Site Üyesi
Katılım
Konu Bilgi
Durum
Çözüldü 
Forum
Excel Makro Soruları
Başlangıç tarihi
Son yanıt tarihi
Cevaplar
11
Üst