Sipariş Formu Örneği, tek sayfalık makrolu bir sipariş/teklif formu şablonudur. Kalem satırlarındaki tutarlar, KDV ve genel toplam hesaplanır; toplam, kullanıcı tanımlı yaziyacevir fonksiyonuyla Türk Lirası ve Kuruş olarak yazıya çevrilebilir.
Dosyanın içeriği
- siparis: B1:J59 aralığında yer alan form sayfasıdır. Üst bölümde "SİPARİŞ/TEKLİF FORMU" başlığı, tarih/saat alanı, firma ve adres alanları, vergi dairesi ve vergi no bilgileri bulunur.
- Kalem tablosu S.No, ADET, İSK% ve TUTAR sütunlarından oluşur; kalem satırları 14. ile 53. satırlar arasındadır.
- Tablonun altında ara toplam, KDV ve genel toplam satırları yer alır.
Kullanılan formüller
- NOW: H1 hücresinde güncel tarih ve saati verir.
- Satır tutarı, adet ile birim fiyatın çarpımıyla hesaplanır (14. satır için):
=D14*G14 - J14 hücresinde tutardan I14 hücresindeki değer çıkarılır (iskonto sütunuyla ilgili hesap).
- SUM: H54 hücresinde H14:H53 aralığındaki tutarları toplar.
- H57 hücresinde KDV, H56 değerinin yüzde 18'i olarak hesaplanır; H58 hücresinde H56 ile H57 toplanır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.- Workbook_Open: Dosya açıldığında uyarı sesi verir ve yazdırma için CTRL+Y tuşlarının kullanılacağını, G53 hücresine bilgi girildiğinde çıktının otomatik alınacağını bildiren bir mesaj gösterir.
- Worksheet_Change ve Deneme: G53 hücresinde değişiklik olduğunda etkin sayfa yazıcıdan 1 kopya olarak yazdırılır. Deneme makrosu CTRL+Y kısayoluna atanmıştır.
- Workbook_BeforeClose: Dosya kapatılırken kaydetme sorusu sorulmaz; yapılan değişiklikler kaydedilmeden kapanır.
- Workbook_SheetActivate: Excel pencere başlığına etkin sayfanın adını yazar.
- yaziyacevir (Module1): Sayıyı, kuruş dahil, Türk Lirası ve Kuruş olarak yazıya çevirir. En fazla 15 haneli sayılar için çalışır.
Nasıl kullanılır
- Dosyayı açıp makroları etkinleştirin.
- Firma, adres, vergi dairesi ve vergi no alanlarını doldurun.
- Kalem satırlarına adet ve fiyat bilgilerini girin; tutarlar, toplam ve KDV otomatik hesaplanır.
- Toplamı yazıyla göstermek için bir hücreye yaziyacevir fonksiyonunu toplam hücresine başvurarak yazın.
- Çıktı için CTRL+Y tuşlarını kullanın; G53 hücresine giriş yapıldığında form kendiliğinden yazdırılır.