Dolu ve boş sütunları şartlarda nasıl belirtmem gerekiyor.

[blazer2004]

Arkadaşlar A Sütunu boş ise A10 'a sütun boş yazsın eğer dolu ise hiçbirşey yapmasın istiyorum bir kaç deneme yaptım ama olmadı.

For v = 1 To 10
If s1.Cells(v, 30)= Null Then
s1.cells(1,10)="boş"

End If
Next

nerde yanlış yaptım acaba saygılar

 

[Ergün Güler]

Selam,
a sütunu boş olduğu zaman A10 boş yazınca A sütunu yine dolu olmuş oluyor. Bunun adı da döngü oluyor.
Sorunuzda bir yanlışlık yok öyle değil mi?

 

[Mehmet Şahin]

ergüngüler76 haklı sanırım siz farklı bir şeyden sözediyorsunuz.
en iyisi olmasını istediğiniz şekilde bir örnek dosya gönderin.

 

[Korhan Ayhan]

Selamlar,

Sn. blazer2004,

Aşağıdaki kod ile A sütununun boş olup olmadığını kontrol edebilirsiniz.

Option Explicit
 
Sub SÜTUN_BOŞMU()
    If WorksheetFunction.CountA(Columns(1)) = 0 Then Range("A10") = "SÜTUN BOŞ"
End Sub

 

[blazer2004]

Çok teşekkür ederim Arkadaşlar Korhan hocamın verdiği kodla yola çıkınca problemi giderdim.İyi çalışmalar