İleri Excel Raporlama - Sinan Dilaver

Aşağıda Select-Case ve If-ElseIf yapılarını kullanılışına ilişkin örnek bir prosedür mevcuttur.  Prosedürde, Karne Notuna karşılık Karne Derecesi, Select-Case ve If-ElseIf yapıları kullanılarak buldurulmaktadır.  Karne Notu, Excel hücresinden alınmakta ve ayrıca kullanıcıya sorulmaktadır.  Karne Notuna karşılık Karne Derecesi buldurulmaktadır.  Örnekte Select-Case ve If-ElseIf yapıları kullanılmıştır.  Hücreden alınan Karne Notuna karşılık olan Karne Derecesi yine bir hücreye atanmaktadır.  Kullanıcıdan öğrenilen Karne Notuna karşılık olan Karne Derecesi de mesaj kutusuyla görüntülenmektedir.  Prosedür ve ile ilgili görüntüler aşağıda verilmiştir.  -------------------------------------------------------------------------------------------------------------------------- Public Sub KarneDerecesi()  KarneNotu = InputBox("Karne Notu:")      'Kullanıcıya Karne Notu soruluyor.     Select Case KarneNotu    'Karne N...

Bir For-Next döngüsü içinde If kullanarak, bir kolonda koşula uyanlara karşılık gelen satırlardan diğer kolondaki değerleri bir değişken üzerine toplamak üzere bir istek olduğunu varsayalım.  Bu amaçla hazırladığım programı, aşağıda gerekli açıklamalar ile birlikte bulabilirsiniz.  ------------------------------------------------------------------------------------------------------------------------- Sub KosulluToplam()   Olcut = Range("D13")    'Range("D13") hücresindeki bilgiyi Olcut değişkenine ata.   Min = 2   Max = Cells(Rows.Count, "A").End(xlUp).Row    'A kolonunun son satırını ilgili fonksiyonu kullanarak buldur.    Toplam = 0    'Toplam değişkeni, başlangıç değeri olarak sıfırlanıyor.     For i = Min To Max     'i indis değerini minimum değerden maksimum değere kadar artırarak Next satırına kadarki işlemleri yap.      If Range("A" & i) = Olcut Then     'Range("A" ...

Excel Macro kullanarak bir Borç Alacak Girişi ekranı oluşturacağız.  Bu ekranı bir menüden çağıracağız.  Bu menü, Excel sayfasındaki dikdörtgen şekle Makro Ata seçeneğiyle atanan prosedürle görüntüleyeceğiz.  Borç Alacak Girişi ekranından Excel satırlarına yüklenen bilgilerden her bir Ad Soyad'a ilişkin borç ve alacaklar ayrı ayrı toplanacak. Bu borç alacak dengesinden bir Mizan oluşturacağız.   Bu işlemler ile ilgili ekran görüntüleri ve ilgili Macro program kodları aşağıda verilmiştir. Bu kodları kopyalayıp değişiklik yaparak kullanabilirsiniz.  Aşağıda önce Macro program kodlarını ve sonra ekran görüntülerini bulabilirsiniz.  ------------------------------------------------------------------------------------------------------------------------- Excel'deki Dikdörtgen Şekle 'Makro Ata' Seçeneğiyle Atanan Public Prosedür Public Sub EkraniGoster()  frmAnaMenu.Show End Sub ----------------------------------------------------------------------------...

Macro kullanarak Excel'de süsleme yapmak için aşağıda örnek kodlama verilmiştir. Bu örneği bilgisayarınızda Macro yazma sayfasına kopyalayıp deneyebilir, değerleri ihtiyacınıza göre değiştirebilirsiniz. Açıklamaları tekli tırnak kullanılarak (tekli tırnaktan sonra) yazılmıştır.  Programı Excel'de oluşturduktan sonra Excel sayfasındayken bir dikdörtgen oluşturun, istediğiniz gibi renklendirin. Dikdörtgenin üzerine Süslemeler  gibi bir etiket yazın. Bu dikdörtgen seçiliyken farenin sağ düğme menüsünden Makro Ata seçeneğini kullanarak bu Macro programının ismini seçin.  Dikdörtgen bir düğme haline gelmiştir. Bu düğmeye basarak programda belirtilen süslemeleri yapın. Daha sonra, "=" işaretlerinin sağındaki değerleri istediğiniz gibi değiştirerek denemeler yapabilirsiniz.  ------------------------------------------------------------------------------------------------------------------  Public Sub Suslemeler()  Range("A1:H1").Select  'A1:H1 aralığını, yani ...

Excel Macro'da temel Tutar hesaplamaları aşağıdaki örneklerde açıklamalarla verilmiştir. Aşağıdaki tabloda henüz bir hesaplama yapılmamıştır.  Aşağıda görüntüde hesaplamalar ile ilgili program satırları verilmiştir. Bu Macro sayfasına Excel programında Alt-F11'a basılarak ulaşılır.  Bu görüntüden sonraki satırlarda görüntüdeki program satırları açıklamalar ile birlikte ve sizlerin kopya alacağı şekilde verilmiştir.  --------------------------------------------------------------------------------------------------------------------- Public Sub TutarHesaplamalari() 'Tutar Hesabı 'Her bir hücre Range("...") olarak kullanılmıştır.  'C2, D2 için açıklama: C2 ve D2 hücrelerindeki değerler çarpılmış ve E2 hücresine atanmıştır.     Range("E2") = Range("C2") * Range("D2")    Range("E3") = Range("C3") * Range("D3")    Range("E4") = Range("C4") * Range("D4")    Range("E5...

Public Sub CarpimTablosu()  For r = 1 To 9   For c = 1 To 9    Cells(r, c) = r * c   Next c  Next r End Sub Bir döngü örneği olarak, çarpım tablosu hazırlayan bir prosedür yazacağız. Çarpım tablosunda satır numarası ile sütun numarasını çarptıracağız. Yukarıda bu amaçla yazdığımız prosedür bloğunu görmekteyiz.  En temel döngü For-Next döngüsüdür. For-Next döngüsü, For başlangıç satırı ile Next bitiş satırı arasına yazılan işlem satırlarından oluşmaktadır. For-Next döngüsü For satırında belirtilen değişkeni, belirtilen başlangıç değerinden itibaren belirtilen bitiş değerine kadar otomatik olarak artırır. Bu artırma, bir artım değeri belirtilmemişse birer birer olur. Artırmadaki başlangıç değeri eşit işareti ile ' to ' terimi arasındaki sayıdır. Bitiş değeri ise ' to ' teriminden sonraki sayı olmaktadır.  Örneğimizdeki r değişkeni, satır numarasına ve c değişkeni ise sütun numarasına karşılık gelmektedir. Bu değişkenlerin değerleri iç içe For-N...

Bir hücredeki değere göre bir aralıkta koşullu biçimlendirme için, önce aralığı seçin.  Giriş  sekmesindeki  Koşullu Biçimlendirme düğmesiyle Yeni Biçimlendirme Kuralı ekranındaki sonuncu seçenek olan Biçimlendirilecek hücreleri belirlemek için formül kullan  seçeneğini seçin.  Aşağıdaki formül alanına  =$A1=$D$1 formülünü girin.  Formülü yazarken " = " işaretiyle başlıyoruz. Ardından "Eğer" veya "If" yazmadan koşul tümcesini yazıyoruz. Koşul tümcesinde, aralığın başlangıç hücresini kontrol edeceğimiz hücre ile karşılaştırıyoruz. Aralığın başlangıcı olan hücrenin adresini yazarken kolon adını sabitliyoruz ve satır numarasını sabitlemiyoruz. Karşılaştıracağımız hücrenin adresini yazarken hücreyi sabitliyoruz.  Ardından gerekli Biçimlendirme seçimi - aşağıdaki görüntüdeki gibi - yapılınca istediğimiz koşullu biçimlendirme oluşmuş olur.  Bundan sonra, D1 hücresindeki değeri değiştirdikçe, aralıktaki bu değere uygun hücreler, tanımlandığı gibi bi...