hücrelere kayıtta hücreye formül atama

[osmanfenerli1907]

merhaba
textboxlardan hücreye kayıt yaparken örneğin
kayıt 3.satıra yapılırken J3 hücresi şu formülü nasıl alır?
=EĞER(A3<>"";A3-BUGÜN();"")
kayıt 4.satıra yapılırken J4 hücresi =EĞER(A4<>"";A4-BUGÜN();"") böyle gidecek.

 

[osmanfenerli1907]

çözümü yokmu

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kod yapısını kullanabilirsiniz. SATIR isimli değişkeni kendi kodunuzdaki değişkene göre değiştirmelisiniz.

SATIR = 3
Cells(SATIR, "J") = "=IF(A" & SATIR & "<>"""",A" & SATIR & "-TODAY() ,"""")"

 

[osmanfenerli1907]

herzaman çalışırmı kod.yani örneğin bugünün tarihi 5 gün sonra değişincede doğru olurmu

 

[Korhan Ayhan]

Selamlar,

Tabiki çalışır. Sonuçta fonksiyonu hücreye yazdırıyoruz.