Hücre İçine Formül Yazdırmak

[bichet]

Merhabalar,

Range("D2").Formula = "=PRODUCT(B2:C2)"
Range("D2").Select
Selection.AutoFill Destination:=Range("D2200")

Bazı komutlarda otomatik doldurma ile istediğimi yapabiliyorum ancak alttaki formülü yazarken sıkıntı yaşıyorum. Hücre içine =EĞER(EHATALIYSA(DÜŞEYARA(A5;fiyat!$A$1:$B$6;2;0));0;DÜŞEYARA(A5;fiyat!$A$1:$B$6;2;0)) yazdığım zaman problem yok ama VBA kullanırken hata alıyorum.

Range("C2").Formula = "=if(iferror(vlookup(A5;fiyat!$A$1:$B$6;2;0));0;vlookup(A5;fiyat!$A$1:$B$6;2;0))"

 

[Korhan Ayhan]

VBA tarafında formüllerin parametrik bölümlerinde ayıraç olarak virgül kullanmanız gerekir.

 

[bichet]

Range("C2").Formula = "=if(iferror(vlookup(A5,fiyat!$A$1:$B$6,2,0)),0,vlookup(A5,fiyat!$A$1:$B$6,2,0))" böyle yazdım ama kabul etmedi yine.

 

[Korhan Ayhan]

Formül kurgunuzda da hata var. Aşağıdaki gibi deneyiniz.

Range("C2").Formula = "=IFERROR(VLOOKUP(A5;fiyat!$A$1:$B$6,2,0),0)"

 

[bichet]

Teşekkür ederim.