Excelde kendi formülünüzü oluşturma

Bazen Excel’in kendi formülleri işinizi görmez. Karmaşık bir işlemi ya da süreci kendi algoritmanızla tanımlayıp formülize edersiniz. Ya da iç içe excel formülleri yerine temiz bir makro yazıp dışarıdan formül olarak bunu çağırmak istersiniz. Bu durumda şu linkten yazdığım kodlarla kendi formülünüzü oluşturabilirsiniz.

Reklamlar

Microsoft Excel 2010 ile Histogram Çizme

Tahmin ettiğinizin aksine histogramı excel’de çizmek herzaman kolay değildir. Sürümden sürüme bazı problemler çıkabilmektedir. İşte kesin çözüm (Excel 2010 için):

Excel’inizde “Çözücü” ya da İngilizce olararak kullanıyorsanız “Solver” eklentisi(add-on) kurulu olmalıdır.  Bunun için şu adresten nasıl kurulacağını öğrenebilirsiniz. Daha sonra excel dosyası  içinden Veri> Veri çözümleyicisi’ni seçim oradan açılan pencere’den Histogram‘ı seçin. 

Kolay gelsin

Excel VBA ile web sunucusuna HTTP protokolü üzerinden data yollamak (post etmek)

Çok spesifik durumlar dahilinde Excel dosyanız içindeki bir veriyi makro yordamı ile web sunucusuna yollamak isterseniz aşağıdaki makro işinizi görecektir. Makro çalıştırıldığında data sunucuya yollanmakta ve cevap ekrana mesaj olarak yansıtılmaktadır.

https://gist.github.com/e377de41ce7f6ea94ba3.js

Google App Script ile e-tablo (spreadsheet) ile entegre zengin form oluşturma

Google App ile excel tablolarının Google dökümanlardaki muadili olan Google e-tablolara entegre formlar yazabiliriz:
Aşağıdaki gibi:

Bunu oluşturabilmek için Araçlar> Komut dosyası yöneticisini kullanıyoruz.

Aşağıdaki gibi kodlarımızı yazıyoruz:

Kodlarımızı yazdıktan sonra üçgene basarak form_goster fonksiyonumuzu çalıştırınca ilk resimdek form çıkıyor. Bu forma girilen veri form_isle fonksiyonu ile A1 hücresine yazdırılacak.

Açıklamalı kodlarımız aşağıda:

function form_goster() {

  //Uygulama oluştur

  var app=UiApp.createApplication();

  app.setTitle(“Suat Google Apps Form”);

  //panel oluştur

  var panel=app.createVerticalPanel();

  //texbox oluştur

  var tf=app.createTextBox();

  //Ekle butonu oluştur

  var bt=app.createButton(“Ekle”);

  //oluşturulan texbota isim ata

  tf.setName(“ad”).setId(“ad”);

  

  //bu elemanları panele yerlestir

  panel.add(tf);

  panel.add(bt);

  

  //form submit edilince yapilacak islem

  var formtetik=app.createServerHandler(“form_isle”);

  //tetigi butona atadik

  bt.addClickHandler(formtetik);

  //is bitince panele don.

  formtetik.addCallbackElement(panel);

  

  //paneli de uygulamaya yerlerstir

  app.add(panel);

  

  //uygulamayi goster

  var doc=SpreadsheetApp.getActive();

  doc.show(app);

  

}

function form_isle(e){

  //calisan uygulamay ele al

  var app=UiApp.getActiveApplication();

  //formdan gelen veriyi cek

  var formdan_gelen_ad=e.parameter.ad;

  //bu veriyi ne yapalim. alip A1’e yazdiralim

  var sheet=SpreadsheetApp.getActiveSpreadsheet();

  sheet.getRange(“A1”).setValue(formdan_gelen_ad);

}

Google App Script ile tablo manipülasyonu

Google App Script ile aşağıda yazdığım fonksiyonlarla A sütununda sıralanmış parasal tutarların risk değerleri için 1 ila 5 arası değerleme yapılıp B sütununa otomatik olarak yazdırılır.

İşte script:

function risk_test(tutar){
  var x=tutar;
  var risk=0;
  if ((x>10000) && (x
    risk=1;
  }
  else if ((x>100000) && (x
    risk=2;
  }
  else if ((x>500000) && (x
    risk=3;
  }
  else if ((x>1000000) && (x
    risk=4;
  }
  else if (x>2000000){
    risk=5;
  }
  else
  {
  risk=0;
  }
  return risk;
}




function risk_hesabi_yap_suat_atan_abi(){
  var ss=SpreadsheetApp.getActiveSpreadsheet();
  var sheet=ss.getSheets()[0];


    for(i=2;i
      
       var kaynak=sheet.getRange(i,1).getValue();
       var hedef=sheet.getRange(i,2);
       var sonuc=risk_test(kaynak);
       hedef.setValue(sonuc);
       
    }  
  Browser.msgBox(“Risk hesaplandı”);
      
}

İlk Google App Script Uygulamam

Google Drive (Docs) kullanıyorsanız excel makroları muadili olarak kullanılan ve saf Javascriptle yazılan “Google App Script” kodlamayla üstün ve karmaşık işlemler yapabilirsiniz. Buna mail gönderimi, google data servislerine erişim de dahildir. Bu yönüyle excel makrolarından daha fazla şey vadediyor. Ve daha kolay…
Script A1 hücresindeki değeri alıp kdv’sini hesaplayıp B1’e yazıyor.

İşte ilk scriptim:

function kdv_hesapla(deger) {
  var kdv=deger*0.18;
  return kdv;
}
function run(){
  var ss=SpreadsheetApp.getActiveSpreadsheet();
  var sheet=ss.getSheets()[0];
      
  var kaynak=sheet.getRange(“A1”);
  var hedef=sheet.getRange(“B1”);
  var deger=kdv_hesapla(kaynak.getValue());
  hedef.setValue(deger)
      
}

Excel makroları içinde gelişmiş denetimli formüller yazma

Bazen excel’deki formüllerin yetmediği durumlar olabilir. Mesela içiçe 5 eğer fonksiyonu veya karmaşık matematiksel hesaplamalar gibi. Bu durumlarda excel makrolarını kullanabilirsiniz.
Aşağıdaki ekte bulunan makro bundan evvel  şu makalede anlattığımız python ile yaptığımız parasal değere karşılık risk analizi yapan formülasyonun  excel makrosu dili (VBA) ile yazılmış halidir.
Şu adresten indirip makro alanına import edebilirsiniz.
https://docs.google.com/open?id=0B2QbjSFSlgaMX2NJWkU2U0dhT28

Makro kaynak kodları ise şöyle:

Sub VeriKontrol()
    ‘For dongumuzu acalim
    For i = 1 To 99
        ‘Parasal degerimizi tanimliyoruz
        Dim parasal_deger As Long
        ‘Sonra bu degere A1,A2,A3… hucremizden aldigimiz degeri atiyoruz her seferinde
        parasal_deger = Range(“A” & i)
        
        ‘Parasal degerimizi checkediyoruz.
        ‘Bunun icin parasal degeri x sayalim
        Dim x As Long
        x = parasal_deger
        ‘Risk degerimizi varsayian olarak 0 atayalim
        Dim risk As Integer
        risk = 0
        ‘If blogumuz pythondaki : yerine Then ve sonda Endif kullandik
        If x > 10000 And x
            risk = 1
        ElseIf x > 100000 And x
            risk = 2
        ElseIf x > 500000 And x
            risk = 3
        ElseIf x > 1000000 And x
            risk = 4
        ElseIf x > 2000000 Then
            risk = 5
        Else:
            risk = 0
        End If
        ‘Simdi hesaplanan risk degerimizi B sutunumuza siraliyoruz
        Range(“B” & i) = risk
        ‘For dongumuzu guzel guzel next ile devam ettiryoruz
        Next i
End Sub