eğer li formülü VBA kod ile çalıştırma

[cemshan]

=EĞERHATA(EĞER(I2="ADET";H2;H2/AD2);"") Bu formül AE2:AE5000 arasında çalışacak


şimdiden teşekkür ederim

 

[Korhan Ayhan]

Deneyiniz.

Sub Convert_Formula_Value()
    With Range("AE2:AE5000")
        .Formula = "=IFERROR(IF(I2=""ADET"",H2,H2/AD2),"""")"
        .Value = .Value
    End With
End Sub

 

[cemshan]

nerdeyse benim yazdığım formülün aynısıymış Elinize sağlık