Şartlı Kopyalama

[excelman]

Þartlı Kopyalama

Merhabalar;

C1 hücresindeki değeri B1 hücresinde yazan değer sayısınca D sütununa kopyalamak istiyorum.Ã?rneklendirecek olursak
C1 deki değer=1250
B1 deki değer=5
D1 den D5 e kadar 1250 yazacak.

 

[cako]

For i = 1 To Cells(1, 2)
Cells(i, 4) = Cells(1, 3)
Next i

 

[excelman]

Cevabınız için teşekkür ederim.Kodlar işime yaradı.
Bu soruyu şöyle değiştirmek istiyorum.

textbox1 e yazdığım değeri textbox2 deki değer sayısınca d sutununa kopyalamak istiyorum.Kodları nasıl değiştirmem lazım.

Teekkürler.

 

[cako]

cells(1,2) yerine textbox2.value
cells(1,3) yerine textbox1.value

 

[excelman]

Sayın Cako cevaplarınız için teşekkür ederim.Kodlar çalıştı.
:bravo: