for i= problem to... for next

[gokmensen]

For i = X To Cells(2, "I").End(xlUp).Row Step -1
veri1 = Sheets("GSCIKIS").Range("I" & j).Value



formul satirindaki X rakami hergun baska bir deger olmasi gerekiyor, bu durumda elle degistiriyorum.

data sayfasindaki, A kolonundaki degerleri arasa, bu degere esit buldugu ilk hucrenin satir sayisi = x seklindeki formulu yazamadim, yazabilsem; for i= yerinde sayi yerine bu x i tanimlardim.

yardimci olur musunuz?

tesekkurler...

 

[Recep İpek]

a=[a2:a65536].Find("Ali").Row

For i = a To Cells(2, "I").End(xlUp).Row Step -1

olarak deneyin.

 

[gokmensen]

Sayin Ripek,
Oncelikle tesekkurler, sayenizde satir sayisini x= seklinde tanimlamayi ogrenmis oldum. ama bir yardima daha ihtiyac var.
a=Sheets("data").[a2:a65536].Find("Ali").Row...

bu formulun icine [a2:a65536] araliginin hangi calisma sayfasi icinde oldugunu da belirtmem gerek, makro baska sayfalarda calisiyorda, data baska sayfada

 

[gokmensen]

bir onceki satira sheets("data").activate yazarak cozdum sanirim

ama yine de a=[a2:a65536].Find("Ali").Row formulunde [a2:a65536] araliginin hangi calisma sayfasinda oldugunu bu formul satirinda belirtebilseydim daha yerinde olurdu.
a=Sheets("data").[a2:a65536].Find("Ali").Row.. satirini yazinca hata veriyor, demek ki dogru bir yazilis degil.

Sn. Ripek tekrar tesekkurler sorunumu cozdugunuz icin.

 

[Recep İpek]

a=Sheets("data").[a2:a65536].Find("Ali").Row

doğru sonuç vermedi mi?Çünkü bende gayet düzgün çalışıyor.