Proje Şantiye Maliyet Takip ve Yönetimi Programı

Bu dosya, bir proje ya da şantiyenin maliyetlerini form ekranları üzerinden kaydetmek, iş grubuna ve rayiç grubuna göre listelemek ve dağılımı grafiklerle izlemek için hazırlanmış makrolu bir Excel çalışmasıdır.



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

Dosyanın içeriği​

• giris: Kullanım uyarılarının yer aldığı açılış sayfası. İşlemlerin sayfalar üzerinde değil, programdaki formlar üzerinden yapılması gerektiği belirtilir.
• ANASAYFA: İş grubu (A-Kaba İmalat, C-Mekanik Tesisat, D-Elektrik Tesisat, E-Çevre Düz. Altyapı, F-Genel Gider), rayiç grubu (Malzeme, Mak. Ekipman, Paket, Genel Gider) ve firma/taşeron listeleri.
• projebilgi: İşveren adı, proje şantiye adı, yüklenici firma, keşif bedeli, işe başlama ve bitiş tarihleri.
• giderler: Gider kayıtları; S.N, rayiç grubu, tanımı, birim fiyat, tutarı, belge no ve açıklama sütunları.
• giderlersorgu, giderler1: Sorgu ve iş grubu listesi için yardımcı sayfalar.
• godeme, godemesorgu: Ödeme kayıtları (tutar, tarih, firma/taşeron, belge no).
• grafik1, grafik2: İş grubu ve rayiç grubu dağılım tabloları ile üç grafik.
• Özette ayrıca 16 sayfa daha olduğu belirtilmiştir; bunlardan "kaba" ve "mekanik" sayfalarını makro kodunda görüyoruz.

Kullanılan formüller​

• =SUM(B2:B7) ve =SUM(B2:B6): İş grubu ve rayiç grubu toplamlarını hesaplar.
• =B2/$B$8 ve =B2/$B$7: Her grubun toplam içindeki yüzde payını bulur. Henüz kayıt girilmediği için bu hücreler #DIV/0! hatası gösterir; veri girildikçe düzelir.

Makrolar​

Makrolar çok sayıda UserForm üzerinde çalışır. Dosya açılırken Module1 içindeki Auto_Open çalışır.

• Ana menü (UserForm1): Diğer formları açar; kaydetme, yedek alma, hesap makinesini açma ve programdan çıkış işlemlerini yapar. Formun X ile kapatılması engellenmiştir.
• Gider girişi (UserForm9): İş grubu, rayiç grubu, rayiç no, birim fiyat, miktar, firma, belge no ve tarihi alır. Boş alan kontrolü yapar, rayiç no ile rayiç grubu uyuşmazsa uyarır. Kaydı giderler sayfasına ekler, tutarı birim fiyat ile miktardan hesaplar ve toplam tutarı gösterir.
• Rapor formları (UserForm4, 6 ve benzerleri): giderler sayfasından ilgili iş grubuna ait satırları (örneğin A-KABA İMALAT, C-MEKANİK TESİSAT) ayrı sayfaya aktarır ve ListView içinde toplamıyla listeler.
• UserForm11 ve UserForm12: UpdateChart yordamıyla grafik ekranlarını günceller.
• Diğer formlar: Ödeme, sorgu ve düzenleme işlemleri için kullanılır.

Güvenlik açısından: Yedek alma, dosyanın kopyasını SaveCopyAs ile kaydeder. Hesap makinesi düğmesi Windows'un calc.exe programını başlatır. Çıkış düğmesi Excel'i kapatır. Dosya silme ya da dışarıya bağlantı kuran bir kod görülmemiştir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. projebilgi sayfasına proje bilgilerini girin.
3. Ana menü formundan gider giriş formunu açın, alanları doldurup Kaydet düğmesine basın.
4. Ödemeleri ilgili ödeme formundan girin.
5. İş grubu raporlarını ve grafikleri ilgili formlardan açın.
6. Çıkarken menüdeki düğmeyle kaydedip çıkın; gerekirse önce yedek alın.

Yararlanılması temennisiyle.