hidrojen

Amaç 1: Variable (değişken) deklare etmek Sub variableName() Dim MüşteriAdı As String Dim Ciro As Currency Dim Risk As Integer Dim Tarih As Date Dim Tarih As Boolean (TRUE or FALSE) Dim X As Range End Sub Not: Bütün kodlar Sub xxx() ve End Sub arasında yazılır. Sonraki örneklerde bu ihmal edilecek… Not: As Range için Amaç 11’e bak Amaç 2: Ekrana o günün tarihini getiren bir pop-up penceresi aç Dim i As Date i = Date MsgBox (i) Amaç: A1 hücresinde 1000'den büyük bir değer varsa ekrana yazdır ve 0,1 koordinatındaki hücreyi kırmızı yap Range("A11").Select If ActiveCell > 1000 Then MsgBox (ActiveCell) Else ActiveCell. Offset( 0, 1).Interior.Color = vbRed End If Not: (0,1) (X,Y) (satır, sütun) Not:   offset ile aktif hücreye göre başka bir hücre tarif edilir Amaç 3: Açılan inputbox’a girdiğin tarih bugünün tarihinden 30 gün sonrasından sonrası ise veya 20 gün öncesinden öncesi ise; girdiğin tarihin ayını ...

Yine aynı tablodan (SALATA-CICEK) hareket edelim. Yapmak istediğimiz şu: B alanı (sütunu, field'ı) 2 olan kayıtların C sütunundaki değerini Borç ismi ile bir sütunda B alanı (sütunu, field'ı) 3 olan kayıtların C sütunundaki değerini Alacak ismi ile başka bir sütunda göstermek Kodumuz şöyle; SELECT     CASE dbo.SALATA-CICEK. B         WHEN 2 THEN dbo.SALATA-CICEK. C         ELSE 0     END     AS Borç,     CASE dbo.SALATA-CICEK. B       WHEN 3 THEN dbo.SALATA-CICEK. C       ELSE 0     END     AS Alacak FROM   dbo.SALATA-CICEK birinci ELSE 0 ifadesi şunu söylüyor; eğer B sütunundaki değer 2 değil ise oluşturulacak B sütununa 0 (sıfır) yaz. aynı şekilde ikinci ELSE 0 ifadesi de eğer B sütünündeki değer 3 değil ise oluşturulacak C sütununa 0 (sıfır) yaz.

Diyelimki önceki yazımızda olandan bir Excel Tablomuz var. Bu tablonun aynısından bir de SQL tablomuz var. Amacımız  eğer B sütunu 2 iken aynı zamanda C sütunu 3 ise salatalık B sütunu 2 iken aynı zamanda C sütunu 4 ise domates B sütunu 3 iken aynı zamanda C sütunu 3 ise gül B sütunu 3 iken aynı zamanda C sütunu 4 ise papatya değerlerini elde edelim. Excel'de verinin gelmesini istediğimiz hücreye, SQL'de sql guery sayfasına yazmamız gereken kodlar aşağıdadır. Tablo Adı: SALATA-CICEK excel formülünü H2 hücresine girdiğimizi varsayarsak. (bkz. bir önceki yazımız - Tablo, SQL ve Exce l) Not SQL        : .C ve .B  column titles EXCEL   : .B2 ve C2  excel hücreleri