= deki sayı ile işlem

[muya78]

merhabalar herkese exel de böyle bir fonksiyon varmıdır bilmiyorum bu konuda bilgilerinizi paylaşmanızı rica ediyorum

 

[YUSUF44]

Formülü zaten yazmışsınız siz, sadece başında eşittir eksik:

=A8/B8*C8/D8

 

[muya78]

Formülü zaten yazmışsınız siz, sadece başında eşittir eksik:

=A8/B8*C8/D8

hocam ilk sutundaki 30 u 15 yapalım ikinci sutundakini 68 yapalım sonuç aynı çıksın 0,135135135 28 ve 84 ü fonkiyon artırıp düşürsün ama sonuç hep aynı çıksın bunu demek istedim


örneğin 0,202702703 elimde var a 45 b74 cxxx dxxxx =0,202702703 c ve d yi program kendisi bulsun istiyorum

 

[Haluk]

......
...
örneğin 0,202702703 elimde var a 45 b74 cxxx dxxxx =0,202702703 c ve d yi program kendisi bulsun istiyorum

Verdiğiniz örnek, Lise'deki matematik derslerinde gösterilen 2 bilinmeyenli tek denklemdir ve 2 bilinmeyenin birden değerleri bulunamaz. Bu nedenle, "sonsuz" adette çözüm elde edersiniz.

Mutlaka "c" veya "d" değerlerinden birine ihtiyacınız var. Ya da, "c" ve "d" bilinmeyenlerini içeren 2nci bir denkleme ihtiyaç var.

.

 

[muya78]

Verdiğiniz örnek, Lise'deki matematik derslerinde gösterilen 2 bilinmeyenli tek denklemdir ve 2 bilinmeyenin birden değerleri bulunamaz.

Mutlaka "c" veya "d" değerlerinden birine ihtiyacınız var. Ya da, "c" ve "d" bilinmeyenlerini içeren 2nci bir denkleme ihtiyaç var.

.

teşekkür ederim iyigünler

 

[YUSUF44]

A1'de ulaşmak istediğiniz sonucun olduğunu düşünerek:

C8 hücresine aşağıdaki formülü yazın. Bu formül C8 hücresine her seferinde 2-100 arası bir tamsayı yazar

=RASTGELEARADA(2;100)

D8 hücresine aşağıdaki formülü yazın. Bu formül A1'deki sonuca ulaşmak için D8'de olması gereken sayıyı bulur:

=A8/B8*C8/$A$1

Yalnız D8'de tamsayı sonucu olmayabilir.

 

[YUSUF44]

İşlemi makro ile yaptırmak isterseniz aşağıdaki kodu kullanabilirsiniz. Böylece sonuçlar sadece siz istediğinizde yani makroyu çalıştırdığınızda değişir. İlk verdiğim formüllerde sayfadaki her değişiklikte değerler yenileniyordu.

Sub Makro1()
    [C8] = Evaluate("=RandBetween(2, 100)")
    [D8] = Evaluate("=A8/B8*C8/$A$1")
End Sub

 

[muya78]

İşlemi makro ile yaptırmak isterseniz aşağıdaki kodu kullanabilirsiniz. Böylece sonuçlar sadece siz istediğinizde yani makroyu çalıştırdığınızda değişir. İlk verdiğim formüllerde sayfadaki her değişiklikte değerler yenileniyordu.

Sub Makro1()
    [C8] = Evaluate("=RandBetween(2, 100)")
    [D8] = Evaluate("=A8/B8*C8/$A$1")
End Sub

Teşekkür ederim bu bir dişli çark oranı hesabı içindi farlı bir formül bulmam gerekecek iyigünler

 

[YUSUF44]

Olabilecek sayıların sınırları nedir?

 

[muya78]

Olabilecek sayıların sınırları nedir?

tamam yusuf bey tamda bunu demiştim elinize sağlık çokta güzel oldu sınırı rastgeleara 30 60 arası yaptım gerçekten emeğinize sağlık tekrar teşekkür ederim

 

[muya78]

çalışmanın son hali

134 sayısını 0,1 , 0,2 , 0,3 50 tam sayıya kadar bölüp arasında 2 basamaklı tam sayıyı bulmaya çalışıyorum bunun kolay yolu varmıdır bu sayıyı bulup kırmızı kutuya yazdırmalıyım ege sarı kutu son hane çift ise bulduğu rakamın sonu tekli sayı olmalı eğer sarı kutu tek rakam ise bulduğu sayının sonu çift rakam olmalı teşekkürler

 

[YUSUF44]

Dosyayı excel dosyayı olarak paylaşınız.