Bu dosya, sipariş ve teklif düzenlemek için hazırlanmış makrolu bir Excel şablonudur. Satır bazında tutar, iskonto, KDV ve genel toplam hesaplanır; toplam tutar yaziyacevir adlı kullanıcı tanımlı fonksiyonla yazıya çevrilir. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- siparis: B1:J59 aralığındaki tek sayfadır. Üstte "SİPARİŞ/TEKLİF FORMU" başlığı, tarih/saat alanı, firma ve adres bilgileri, M.V.D. ve vergi numarası alanları bulunur.
- Kalem tablosu S.No, ADET, İSK% ve TUTAR sütunlarından oluşur; kalemler 14. ile 53. satırlar arasına girilir.
- Tablonun altında toplam, KDV ve genel toplam satırları yer alır.
Kullanılan formüller
- NOW: H1 hücresinde formun tarih ve saatini verir.
- H14 hücresinde adet ile birim fiyatın çarpımı alınır; formül aşağı satırlarda devam eder:
=D14*G14 - J14 hücresinde tutardan iskonto düşülerek net tutar bulunur:
=H14-I14 - H54 hücresinde SUM ile H14:H53 aralığı toplanır.
- H57 hücresinde H56 değerinin %18'i KDV olarak hesaplanır, H58 hücresinde H56 ile KDV toplanarak genel toplam bulunur.
Makrolar
- Workbook_Open: Dosya açıldığında sesli uyarı verir ve yazdırma için CTRL+Y kısayolunun kullanılacağını, G53 hücresine bilgi girildiğinde çıktının otomatik alınacağını belirten bir mesaj gösterir.
- Worksheet_Change ve Deneme: G53 hücresi değiştiğinde etkin sayfa varsayılan yazıcıdan 1 kopya yazdırılır. Deneme makrosu CTRL+Y kısayoluna atanmıştır.
- Workbook_SheetActivate: Excel pencere başlığına etkin sayfanın adını yazar.
- Workbook_BeforeClose: Dosya kapatılırken kaydetme sorusu sorulmaz; yapılan değişiklikler kaydedilmeden kapanır.
- yaziyacevir (Module1): Verilen tutarı lira ve kuruş olarak yazıya çevirir ("... Türk Lirası, ... Kuruş"). En fazla 15 haneli sayılar için çalışır; aşılırsa uyarı verir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Firma, adres, M.V.D. ve vergi numarası alanlarını doldurun.
- Kalemleri 14. satırdan başlayarak adet, birim fiyat ve iskonto bilgileriyle girin.
- Toplam tutarın yazıyla görünmesi için ilgili hücrede yaziyacevir fonksiyonunu toplam hücresine başvurarak kullanın.
- Yazdırmak için CTRL+Y tuşlarına basın. G53 hücresine veri girildiğinde de çıktı otomatik alınır; istenmiyorsa Worksheet_Change makrosu devre dışı bırakılır.