DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
=SOLDAN(A1;BUL("*";A1)-1)*(SOLDAN(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");BUL("*";YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";""))-1))*(YERİNEKOY(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");SOLDAN(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");BUL("*";YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";""))-1)&"*";""))
Aşağıdaki formülü deneyiniz:
Kod:=SOLDAN(A1;BUL("*";A1)-1)*(SOLDAN(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");BUL("*";YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";""))-1))*(YERİNEKOY(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");SOLDAN(YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";"");BUL("*";YERİNEKOY(A1;SOLDAN(A1;BUL("*";A1)-1)&"*";""))-1)&"*";""))
hücrede iki tane aynı rakam olursa hata veriyor
örneğin 55*55*3 yazınca değer hatasaı veriyor
=ÇARPIM((0+SOLDAN(A1;(BUL("*";A1;1))-1));(0+PARÇAAL(A1;(BUL("*";A1;1))+1;((BUL("*";A1;(BUL("*";A1;1))+1))-(BUL("*";A1;1))-1)));(0+SAĞDAN(A1;UZUNLUK(A1)-(BUL("*";A1;(BUL("*";A1;1))+1)))))
Function KÇARP(Veri As Range)
On Error Resume Next
KÇARP = Evaluate(Veri.Text)
End Function
Aşağıdaki formülü kullanabilirsiniz.
Kod:=ÇARPIM((0+SOLDAN(A1;(BUL("*";A1;1))-1));(0+PARÇAAL(A1;(BUL("*";A1;1))+1;((BUL("*";A1;(BUL("*";A1;1))+1))-(BUL("*";A1;1))-1)));(0+SAĞDAN(A1;UZUNLUK(A1)-(BUL("*";A1;(BUL("*";A1;1))+1)))))