Mazot Takip Çizelgesi Oluşturma

Bu dosya, iş makineleri ve araçların mazot alımlarını tarih, sürücü ismi ve kilometre bilgisiyle kayıt altına almak için hazırlanmış bir takip çizelgesidir. Kayıtlardan kilometre farkı, toplam mazot ve kilometre başına yakıt tüketimi hesaplanır; plakaya göre rapor alınabilir.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• AKARYAKIT: Ana kayıt sayfasıdır. Başlıkta "GÜVEN İNŞAAT İSKİ ANADOLU YAKIT KONTROL" yazar. 7. satırdaki sütunlar: TARİH, İSİM, ÖNCEKİ KM, FARK KM, TOP.MAZOT, KALAN ve KM. YAKIT. Veriler yaklaşık 1498. satıra kadar uzanır.
• RAPOR: Plaka bilgisinin girildiği, filtrelenen kayıtların listelendiği sayfadır. Sayfadaki düğme çalışma kitabını kaydeder.
• Sayfa1: Araç bazlı özet sayfasıdır. TARİH, ÖNCEKİ KM, FARK KM ve T.KM.YAKIT sütunları vardır. Hidromek, 10 Teker, JCB ve Hitachi 190 gibi araç adları görülür. Sayfada bir doğrulama kuralı ve bir pivot tablo bulunur.

Kullanılan formüller​

• =F8-E8: Kilometre farkını hesaplar.
• =SUM(H8:H8): Satırdaki mazot miktarını toplam mazot sütununa aktarır.
• =IF(G8=0,"0",I8/G8): Kilometre farkı sıfırsa sıfır yazar, değilse mazotu km farkına böler.
• =K8+J1-H8: Önceki kalan değerine göre yeni kalan mazotu hesaplar.

Makrolar​

• Makro1 (Module1): RAPOR sayfasındaki eski kayıtları (A8:G sütunları) temizler. Ardından AKARYAKIT sayfasındaki A7:N168 aralığını, B2 hücresine yazılan plakaya göre AdvancedFilter ile süzüp A7:G7 başlıklarının altına kopyalar. Makro Alt+F8 ile çalıştırılır.
• CommandButton1_Click (RAPOR sayfası): Düğmeye basıldığında çalışma kitabını kaydeder.
• UserForm1: İçindeki olay prosedürleri boştur, herhangi bir işlem yapmaz.

Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem görülmemiştir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. AKARYAKIT sayfasına tarih, isim, kilometre ve mazot bilgilerini satır satır girin.
3. Formüllerin yeni satırlara da uygulandığından emin olun.
4. Rapor için RAPOR sayfasında B2 hücresine plakayı yazın.
5. Makro1'i çalıştırın, o plakaya ait kayıtlar listelenir.
6. İşiniz bitince düğmeyle dosyayı kaydedin.

Filtre aralığı A7:N168 ile sınırlıdır; kayıtlarınız bu satırı aşarsa makro kodundaki aralığı genişletmeniz gerekir.