Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Расчет площади фигуры в полярных координатах
 
#1
28.07.2015 16:24:35
Добрый день!

Подскажите, пожалуйста, есть ли функция или надстройка для автоматического расчета площади фигуры в полярных координатах? Это нужно для сравнения площади нескольких фигур.

Заранее спасибо!
 
 
 
#2
28.07.2015 16:26:13
А если помогающий не знает, есть ли такая функция, но сможет ее написать - где ее писать? Вашего примера нет.
 
 
 
#3
28.07.2015 16:27:15
может сюда глянуть
Лень двигатель прогресса, доказано!!!
 
 
 
#4
28.07.2015 18:17:19
Приношу извинения за неточность вопроса.

В файле (не знаю из какой программы) отражено нечто подобное, что нужно мне, но только в Excel.
Как можно заметить, на кортинке показаны две разные фигуры с разной площадью, построенные на нескольких осях координат (по параметрам) на плоскости.
 
 
 
#5
28.07.2015 18:19:53
MAS, помогающие должны Ваши данные придумать и самостоятельно внести на лист?
Вы думаете сами себе помогать или предоставляете это право другим?
 
 
 
#6
28.07.2015 18:28:04
На кОртинке показана заполненная лепестковая диаграмма
Согласие есть продукт при полном непротивлении сторон
 
 
 
#7
28.07.2015 18:29:08
MAS, Ваша задача сводится к нахождению площади треугольника по двум сторонам и углу между ними - каждая фигура состоит из треугольников, причем угол (при центральной точке) у всех одинаковый.

... а вот и формула: http://www.treugolniki.ru/ploshhad-treugolnika-po-dvum-storonam/
Изменено: Казанский - 28.07.2015 18:31:29
 
 
 
#8
28.07.2015 18:42:48
Vikttur, мне не нужна функция под конкретный пример.
Данные могут метяться причем координально и могут быть не сопоставимы друг с другом (т.е. не помещаться в одной координатной системе без спец. преобразований).
Сама тема относится к одному из разделов Теории принятия решений (ТПР). Кто касался данной тематики, тот поймёт.

Мне же важно определить, есть ли вообще в Excel подобный инструмент?
 
 
 
#9
28.07.2015 20:42:07
Для горизонтального ряда
Скрытый текст

Для вертикального по аналогии
Изменено: B.Key - 28.07.2015 20:46:06
 
 
 
#10
28.07.2015 21:05:55
Цитата
B.Key написал: s = Sin(360 / UBound(a, 2))
Неверно: аргумент Sin должен быть в радианах.
Умножение на 0.5 * s лучше за цикл вынести.
 
 
 
#11
28.07.2015 22:41:31
Да, все правильно Алексей, забыл , что угол должен быть выражен в радианах
Код
Function AreaFigure(r As Range)
Dim a, i&, t&
a = r.Value
For i = 2 To UBound(a, 2)
    t = t + (a(1, i) * a(1, i - 1))
Next
AreaFigure = (t + (a(1, 1) * a(1, UBound(a, 2)))) * 0.5 * Sin(2 / UBound(a, 2) * [pi()])
End Function
Изменено: B.Key - 29.07.2015 11:57:14
 
 
 
#12
29.07.2015 00:36:43
а зачем умножать на 360 и потом делить на 180?
сразу на 2 умножить нельзя?  ;)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#13
29.07.2015 09:30:07
 Чтобы посчитать площадь, нужно знать координаты фигуры.
С выставленной картинки снимите форму фигуры полилинией.
Со снятой формы выставите координаты на лист( макросом)
А далее по крайним точкам строим квадрат и разбиваем на маленькие
и считаем квадратики в области фигуры.

Если снимите фигуру с картинки и выставите файл напишу макрос для координат фигуры.
 
 
 
#14
30.07.2015 20:22:37
Кому интересно может посчитать площадь.
Здесь очень часто выставлялся макрос(внутри фигуры или нет)
 
 
 
#15
30.07.2015 20:28:00
Цитата
magrifa написал:
далее по крайним точкам строим квадрат и разбиваем на маленькие
А считать площадь треугольника нельзя? )
 
 
 
Страницы: 1
Наверх