NOT fonksiyonun makroda kullanilisi

[arkanonur]

Merhaba Arkadaslar,

Bir makroda su kodlari kullaniyorum.

For i = 2 To rij
If Range("AE" & i) = "" Then
Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp
i = i - 1

Bu "If" denkleminde soyle bir mantiksal baglantinin olmasini istiyorum.

Silinme islemi Eger "AE" sutunu bos ise ve "A" sutunu bos degil ise olsun istiyorum ama kodu nasil yazacagimi bilmiyorum.

Soyle birsey denedim olmadi.

For i = 2 To rij
If Range("AE" & i) = "" Then
If Range("A" & i) = Not( "" )Then
Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp
i = i - 1

Eger "A" bos degil ise veya eger "A" sutunu dolu ise kodunu visual basic'de nasil yazarim?
Yardimci olabilecek arkadaslara simdiden cok tesekkurler.

Saygilarimla,
Onur

 

[Levent Menteşoğlu]

Eger "A" bos degil ise veya eger "A" sutunu dolu ise kodunu visual basic'de nasil yazarim?

Aşağıdaki gibi kullanabilirsiniz.

if range("a" & i)<>0 then

 

[kombo]

For i = 2 To rij
If Range("AE" & i) = "" Then
If Range("A" & i) = Not( "" )Then
Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp
i = i - 1

bende makrodan fazla anlamıyorum ama birde,
Kırmızı yeri "<>0" olarak değiştirip deneyin.

 

[kombo]

Sn leventm cevap vermiş görmedim , Bende %50 tutturmuşum

 

[arkanonur]

cok tesekkurler arkadaslar,

saygilarimla,

Onur