Excel EĞERSAY (COUNTIF) Komutu veya Fonksiyonu

Bir koşula bağlı olarak sayma işlemi yapmak istediğinizde bu formülü kullanabilirsiniz.

=EĞERSAY(D:D;L3)

D:D alanı koşulunuzu arattığınız bölgeyi tanımlar. Biz YERLİ imalat türüne ait firma sayılarını bulmak istiyoruz bu yüzden D sütununu seçiyoruz.

L3 alanı koşulunuzu belirttiğiniz alandır. YERLİ türünü aradığımız için L3 hücresini seçiyoruz isterseniz L3 yerine tırnak içinde “YERLİ” de yazabilirsiniz.

Bu formülü yazdığınızda YERLİ kelimesi kaç kere tekrarlanıyorsa size sayısını verir yani kaç tane kuruluşun YERLİ kategorisine ait olduğunu.

Excelde Fonksiyon Yazma (Makro)

Merhaba arkadaşlar.
Bu yazıda excel içinde nasıl fonksiyon yazacağımızı anlatacağım. Excel zaten kendi içinde birçok fonksiyona sahip ama istersek biz de bunlara ilave olarak yazabiliyoruz.

Öncelikle kod yazılan kısma resimdeki gibi bir yordam açıyoruz. Burada sadece SPLIT1 bölümü ve parantezin içi sizin değiştirebileceğiniz bölümdür, diğerleri standart. Parantezin içi seçeceğiniz hücreyi temsil eder. O alanı boş bırakırsanız fonksiyona excel hücrelerinden veri alamazsınız. Bu işlemlerden sonra içeriği ne yapmak istiyorsanız ona göre dolduracaksınız. Ben hücre değerini belli bir ayıraca göre parçalayıp onun ilk parçasını aldıracağım.

Bu kodları kısaca anlatacağım. Önce string bir dizi olan parca() değişkenimizi tanımlıyoruz. Sonra bunu Split komutu yardımıyla parçalanan hücre değerlerine eşitliyoruz. Parçalama (/) karakterine göre yapılıyor. Siz istediğiniz karakteri yazabilirsiniz. En son adım fonksiyon ismini bir değere eşitlemek. Bunu yapmazsanız fonksiyon yazdığınız hücreye değer gelmez. parca(0) ifadesi parçalanmış hücre değerinin ilk parçası anlamına gelir parca(1) olursa ikinci parça anlaşılır. Burada parçalanan hücre değeri iki parçaya ayrılmıyor ve siz parca(1) değerini almaya çalışıyorsanız, fonksiyon yazdığınız hücrede #DEĞER! diye bir yazı gelir.

Böylece excel içinde olmayan bir fonksiyonu yazmış olduk. Bu fonksiyonu excel eklentisi olarak kaydedip başka kullanıcılara da yükleyebilirsiniz.

Sormak istediğiniz birşey olursa messad@yandex.ru adresine e-posta atabilirsiniz, elimden geldiğince yardımcı olmaya çalışırım.

Çalışma sayfasını buradan indirebilirsiniz. Hepinize kolay gelsin

Excel Makro Temel

Merhaba arkadaşlar.
Bu yazıda size farklı ve çok yararlı bir programlamadan bahsedeceğim. Excel üzerinde herkes az çok bir şeyler yapmıştır. İşlem yapılan veriler ne kadar az olursa işiniz o kadar kolay olur. Ama veriler arttıkça sıkıntınız da artar. Bu sıkıntıları azaltmak için en büyük yardımcınız makrodur. Bu yazıda makro kaydetme, geliştirici kısmını yani kod kısmını görmeyi anlatacağım. Öncelikle excel çalışma sayfamızı açıyoruz. Ben Office 2010 ingilizce kullanıyorum.

İlk açılışta muhtemelen buna benzer bir görüntü oluşur. Bu ekranda çalışacağımız kısım görünmemekte. Görünür hale getirmek için sol üst köşedeki "File" tuşuna tıklıyoruz.

Yandaki görüntü çıkacak karşınıza, buradan da "Options"-Türkçe sürümünde muhtemelen seçenekler olarak geçer-seçeneğine tıklıyoruz  Gelen ekran  aşağıdaki gibidir.

Buradan "Costumize Ribbon" sekmesine gelip "Developer" yani geliştirici kutusunu seçili hale getirip tamam diyoruz. Bu işlemden sonra excelin üst kısmında bulunan veri, formüller ve diğer seçeneklerin olduğu sekme gurubuna geliştirici sekmesi de eklenecek ve bu işlemimizi tamamlamış olacağız.

Bu sekmeden kod bölgesine geçiş yapacağız ve makro kodlarıyla tekrarlayan işleri kendimiz yerine kodlara yaptıracağız.

Geliştirici sekmesinden Visual Basic tuşuna bastığımızda veya (Alt + F11) yaptığımızda açılan kod penceremiz bu şekildedir.

Bu bölgede işlem yapabilmemiz için modül yüklememiz gerekiyor resimdeki gibi boş alana sağ tıklayıp modül ekledikten sonra kod yazmaya hazır hale geliyoruz.

Modül kısmına küçük bir makro yazıyoruz. Burada parantez açarak şunu belirtmeliyim makroda iki farklı yordam ile kod yazabilirsiniz. Biri Sub yordamı diğeri ise Function dır. Sub yordamı makro yordamıdır bu yordamlar exe gibi çalışır ama Function farklıdır adından da anlaşılacağı gibi fonksiyondur. Excelde bulunan TOPLA, ORTALAMA gibi bir kullanıcı tanımlı fonksiyondur. Kullanımı da aynen diğer fonksiyonlar gibi olur. Şimdi yazdığımız makroyu çalıştıralım.

Geliştirici sekmesindeki Makrolar tuşuna basıp çalıştırmak istediğiniz makroyu seçip çalıştır tuşuna basıyoruz ve işlem tamamlanıyor.

Kolay gelsin.

Textbox 'a Sadece Sayı Veya Harf Girme , Sadece Seçtirme

Merhaba dostlar.

Bugün sizlerle textbox nesnesinde sadece sayı veya sadece harf girilmesine izin veren veya sadece seçilmesine izin veren kodları paylaşacağım. Resimlerle daha iyi anlaşılacağını umuyorum.

Şekildeki gibi önce biçimlendirmek istediğimiz textbox nesnesini seçiyoruz sonra "Properties" penceresine geçiyoruz.

Bu pencerede kırmızı daire içinde olan "Events" sekmesine tıklıyoruz ve karşımıza nesne ile ilgili olayların sıralandığı bir pencere çıkıyor. Bu pencereden "KeyPress" seçeneğinin yanındaki resimde işaret edilen boş kutuya çift tıklıyoruz ve karşımıza bir yordam (Sub) çıkıyor.

Bu yordama girilen kodlar klavyeden tuşa her bastığımızda çalıştırılır ve eğer kod izin verirse nesneye yazdırılır. Şimdi sadece harf girilmesine izin verecek kodu yazalım.

If Not (Char.IsLetter(e.KeyChar) = True) And e.KeyChar <> ChrW(Keys.Back) And e.KeyChar <> ChrW(Keys.Space) Then

    e.Handled = True

 End If

Burada "e.KeyChar <> ChrW(Keys.Back)" ve "e.KeyChar <> ChrW(Keys.Space)" komutları ile silme(Keys.Back) ve boşluk(Keys.Space) tuşlarına da izin veriliyor isterseniz bunları çıkartıp sadece harf girişine izin vermeniz de mümkün. Bu nesneye sadece küçük ya da sadece büyük harf yazılmasını istiyorsanız "Properties" penceresinden "Character Casing" bölümünden upper veya lower seçeneklerini kullanabilirsiniz.

Sadece sayı girilmesine izin verecek kod ise şöyle:

If Not (Char.IsNumber(e.KeyChar) = True) And e.KeyChar <> ChrW(Keys.Back) Then

            e.Handled = True

End If

Burada da sadece sayı girilmesine ve silme tuşunun kullanılmasına izin veren kodu görüyoruz.

Sadece seçilmesine izin verecek kod ise şöyle:

If e.KeyChar <> ChrW(Keys.Select) Then

            e.Handled = True

End If

Örneği indirmek için tıklayınız.

Hepinize kolay gelsin.