Hücre değerinin koşuluna göre işlem yapma

[Sedata]

Merhaba,

Dağınık bir tabloyu düzenlemek için basit bir makro öğrenmek ve yazmak istiyorum. hücrenin içeriği tarihse (yani içinde tarih varsa) belirli bir hücreye J sutununa o satırdaki tutarları (bu tarihten standart bir hücre sonrasında) yazdırmak istiyorum. Bu nasıl yazılabilir.

if cells (i,y).value = ? then activecell.offset (0, 3).value = cells (i, J ?)

Teşekkür ederim.

 

[Recep İpek]

Küçük bir örnek ekleyip, onun üzerinden gidersek daha çabuk çözüm bulunabilinir.

 

[Sedata]

örnek olarak ekleyebileceğim dosya. Teşekkür ederim.

 

[Korhan Ayhan]

Selamlar,

Örnek dosyanızda kullandığınız kodu aşağıdaki ile değiştirip denermisiniz. Mouse ile veri olan alanı seçip makroyu çalıştırın.

Sub TEST()
For Each ALAN In Selection
If IsDate(ALAN) = True Then Cells(ALAN.Row, "G") = ALAN.Offset(0, 2)
Next
End Sub

 

[Sedata]

teşekkür

Çok teşekkür ederim Sn.Cost Contol. Bu bir tablo düzenlerken çok çeşitli varyasyonlarını kullanabileceğim bir açılım gibi. İSdate dışında kullanabileceğim sayı,text,formul gibi doğrulamalar için kullanmam gereken İS varyasyon kodları ne olabilir bu konudada kısa bir bilgi alırsam çok sevinirim.

İyi Çalışmalar dileklerimle,

 

[Korhan Ayhan]

Selamlar,

İlk aklıma gelenleri açıklamaya çalışayım.

IsDate(...) = Verilen kriterin tarih olup olmadığını denetler.
IsNumeric(...) = Verilen kriterin sayısal değer olup olmadığını denetler.
IsEmpty(...) = Verilen kriterin boş olup olmadığını denetler.
IsNull(...) = Verilen kriterin boş olup olmadığını denetler.

Eğer bunların dışında da varsa bilen arkadaşlarımız eklerse sevinirim.

 

[Levent Menteşoğlu]

Eğer bunların dışında da varsa bilen arkadaşlarımız eklerse sevinirim.

Bunların dışındada çok sayıda vba fonksiyonu elbette mevcut. Sn COST_CONTROL'un yazdığı fonksiyonlar VBA nın information yani bilgi fonksiyonları grubundandır. Bu fonksiyonların bir kısmı true ve false (doğru ve yanlı&#351 olarak sonuç döndürürken bir kısmıda sayısal veri döndürür. Bu bilgi fonksiyonlarının tam listesi aşağıdaki gibidir. Bu fonksiyonlarla ilgili detay bilgiyide aşağıdaki linkten almak mümkündür.

http://msdn.microsoft.com/vba