ziyaretçi takip programı

[fatihsoyler]

öncelikle böyle bir sitenin var olmasından dolayı çok mutluyum. kurucuları tebrik ediyorum.

adı soyadı firma adı tel. v.b. g,ibi hali hazırda bir tablom var.

tabloda istediğim satırın sonuna 1 yazdığımda o satırı aynen başka bir sayfaya taşısın.

böyle bişiy mümkünmü ? teşekkürler

 

[Levent Menteşoğlu]

Merhaba

İstediğiniz elbette mümkün, fakat bir örnek dosya eklerseniz, daha hızlı ve amacınıza uygun cevap geleceğini düşünüyorum.

 

[fatihsoyler]

örnek dosya nasıl eklenir ?

 

[Levent Menteşoğlu]

Aşağıdaki linki inceleyin.

http://www.excel.web.tr/viewtopic.php?t=2489

 

[fatihsoyler]

o zaman şole sorayım ...


m1 hücresine 1 yazarsam a1-b1-c1-d1-e1-f1 gücrelerini sheet 2 ye taşısın

buna cevap verebirilirmisiniz ?

 

[Red-Kid]

Sheet2 de A1 hücresine =IF(Sheet1!M1=1;Sheet1!A1;0)
Sheet2 de b1 hücresine =IF(Sheet1!M1=1;Sheet1!b1;0)
Sheet2 de c1 hücresine =IF(Sheet1!M1=1;Sheet1!c1;0)
Sheet2 de d1 hücresine =IF(Sheet1!M1=1;Sheet1!d1;0)
Sheet2 de e1 hücresine =IF(Sheet1!M1=1;Sheet1!e1;0)
Sheet2 de f1 hücresine =IF(Sheet1!M1=1;Sheet1!f1;0)

 

[Levent Menteşoğlu]

Makro ile de aşağıdaki gibi çözebiliriz.

[vb:1:ffd67f4648]Sub aktar()
if [a1]=1 then
for a=1 to 5
sheets("sayfa2").cells(1,a)=cells(1,a).value
next
end if
end sub[/vb:1:ffd67f4648]