Excel VBA da bir noktanın bir doğruya olan en kısa mesafesi probleminin algoritmasını nasıl kullanabilirim??

[nerome]

https://hizliresim.com/havmVA

Böyle bir problem için site noktasından diğer fay hatlarına olan en kısa mesafeyi bulmak için bir makroya ihtiyacım var.VBA da yapılabilir mi ?

 

[Haluk]

"A" fayı için:







.

 

[nerome]

(60,15) noktasından doğruya en kısa mesafe 33 gelmesi lazım .

 

[Haluk]

Benim şekle göre; en kısa mesafe 48,57 -15,00 = 33,57



.

 

[nerome]

Benim şekle göre; en kısa mesafe 48,57 -15,00 = 33,57



.

Doğrudur , dosyayı paylaşabilir misin

 

[Haluk]

Zaten hesap dahil, resimde herşey belli ... Öyle muhteşem bir hesap yok.

.

 

[Haluk]

Matematiksel olarak, "A" fayını simule eden doğrunun denklemi;

y=(50-40)/70 x + 40

olduğuna göre, biz x=60 iken "y" değerini bulmak için bu fonksiyonda "x" için 60 değerini koyduğumuzda; y=48,57 olarak hesaplanır.

O zaman, Site (x,y)|(60,15) noktasından "A" fayına en kısa mesafe de;

48,57 - 15,00 = 33,57 olarak hesaplanır.

Bunu da zaten Excel'de hücrelere ilgili değerleri ve fonksiyonu girerek hesaplatabilirsiniz...

Sanırım;

sin( inv Tan(60/(48,57-40)) * 33,57 = 33,23

.

 

[Haluk]

Gerçi; "A" fayına en kısa mesafenin bulunabilmesi için, aşağıdaki resimde "kırmızı" ile belirttiğim uzunluğun bulunması gerekir.

Bu "kırmızı" çizgi, "A" fayından 90 derece dik açıyla (60,15) noktasına çıkan doğru olduğu için, en kısa mesafenin söz konusu "kırmızı" çizgi olması gerekir....

Yani; en kısa mesafenin 33,57 olduğunu da zannetmiyorum ....


sin ( inv Tan(60/(48,57-40)) * 33,57 = 33,23 olması lazım ...






.

 

[YUSUF44]

Gerçi; "A" fayına en kısa mesafenin bulunabilmesi için, aşağıdaki resimde "kırmızı" ile belirttiğim uzunluğun bulunması gerekir.

Bu "kırmızı" çizgi, "A" fayından 90 derece dik açıyla (60,15) noktasına çıkan doğru olduğu için, en kısa mesafenin söz konusu "kırmızı" çizgi olması gerekir....

Yani; en kısa mesafenin 33,57 olduğunu da zannetmiyorum ....




.

İlk cevabı gördüğümde beri içim içimi yiyordu, "bir doğruya en yakın mesafe o doğruya inen dikmenin uzunluğu değil midir, Haluk üstadım neden böyle çözdü, acaba bir ayrıntısı mı var?" Diye.

Açı çok küçük olduğundan dikmenin uzunluğu da 33,23 gibi yakın bir değer çıkıyor (h=70*33,57/kök 5000) bulduğuma göre, muhtemelen soru sahibi arkadaş da bu sonuca göre doğru kabul etti 33,57'yi.

 

[Haluk]

Yusuf Bey; gecenin bu saatinde kafa karışıyor ...

.