Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

Решение геодезических задач в MS Excel

Тема в разделе "Другие программы", создана пользователем kub13, 5 янв 2013.

  1. kub13

    Форумчанин

    Регистрация:
    3 сен 2009
    Сообщения:
    115
    Симпатии:
    141
    Адрес:
    Липецк
    Выкладываю файл подготовленный мной, по просьбе знакомого геодезиста, давно, лет 10-15 назад. Сам этим методом не пользовался.
     

    Вложения:

    • Рейка.xls
      Размер файла:
      256 КБ
      Просмотров:
      116
    #161
    мирось и Lex K-G нравится это.
  2. Борис_8

    Регистрация:
    10 июн 2016
    Сообщения:
    1
    Симпатии:
    1
    Вопрос 1.

    Нашёл ошибку в программе, в файле "Вертикальность_Мачты_МТГ". Проявляется в неверном допуске отклонения для мачт:
    оригинальная строка:
    =ЕСЛИ(C16="";"";ЕСЛИ($S$2="Мачта";C16-$C$8/1,5;ЕСЛИ($S$2="Башня";C16-$C$8;"")))
    исправленная строка
    =ЕСЛИ(C16="";"";ЕСЛИ($S$2="Мачта";(C16-$C$8)/1,5;ЕСЛИ($S$2="Башня";C16-$C$8;"")))


    Можете ли исправить файл, у меня при сохранении пишет такое:

    Отчет о совместимости для Вертикальность_Мачты_МТГ.xls
    Дата отчета: 10.06.2016 12:01
    Некоторые свойства данной книги не поддерживаются более ранними версиями Excel. Открытие книги в более ранней версии Excel или ее сохранение в формате более ранней версии приведет к потере или ограничению функциональности этих свойств.
    Существенная потеря функциональностиЧисло экземпляровВерсия
    Одна или несколько ячеек книги содержат правила проверки данных, использующие ссылки на значения, находящиеся на других листах. Такие правила проверки данных не будут сохранены.  1 
       X'!D2Excel 97-2003
    Несущественная потеря точности
    Книга содержит формулы, которые ссылаются на другие закрытые книги. Если связанные книги закрыты, то при пересчете в более ранних версиях Excel значения этих формул будут ограничены 255 знаками.  14
    Определенные имена
    Excel 97-2003

    Вопрос 2:
    В труде "Руководство по геодезическому контролю в процессе строительства, монтажа и эксплуатации высотных сооружений связи", разработки ООО НТЦ "Техкон", указано:

    Допустимые отклонения оси ствола для мачт не более 0,0007 м от высоты.

    Вопрос, как правильнее вычислять отклонение у мачт делить высоты на 1,5(как в вашем файле), или умножать высоту на 0,7 ?
     
    #162
    MarkGeo нравится это.
  3. Lex K-G

    Форумчанин

    Регистрация:
    4 июл 2012
    Сообщения:
    1.610
    Симпатии:
    1.061
    Адрес:
    οἰκουμένη
    КРЕДО-ДОС это прекрасно считала;) Сейчас такого софта нет... Не, ну Exell, конечно, считает все;)
     
    #163
  4. X-Y-H

    X-Y-H Администратор
    Команда форума Форумчанин

    Регистрация:
    18 май 2007
    Сообщения:
    21.793
    Симпатии:
    7.072
    Адрес:
    Россия
    Кредо дат.
     
    #164
  5. Lex K-G

    Форумчанин

    Регистрация:
    4 июл 2012
    Сообщения:
    1.610
    Симпатии:
    1.061
    Адрес:
    οἰκουμένη
    Кредо ДАТ WINDOWS рейку не воспринимает. КРЕДО ДАТ ДОС.
     
    #165
  6. ЮС

    Форумчанин

    Регистрация:
    28 фев 2010
    Сообщения:
    4.564
    Симпатии:
    5.066
    Принимает:
    QIP Shot - Screen 382.jpg
    Даже профессионалы от реек не отказались, а уж LITE или 3.1 тем более "ЗА". ::biggrin24.gif::
     
    #166
    Lex K-G нравится это.
  7. Lex K-G

    Форумчанин

    Регистрация:
    4 июл 2012
    Сообщения:
    1.610
    Симпатии:
    1.061
    Адрес:
    οἰκουμένη
    Оффтоп

    Вот блин... Все они предусмотрели!;) У меня ломаный ДАТ был лет эдак пять тому назад.
    Отсюда мораль - ПОЛЬЗОВАТЬСЯ НАДО ЛИЦЕНЗИОННЫМ ПО!:)
     
    #167
  8. kub13

    Форумчанин

    Регистрация:
    3 сен 2009
    Сообщения:
    115
    Симпатии:
    141
    Адрес:
    Липецк
    Не совсем по теме, но на геометрию задача похожа.
    К Новому 2017 году "Фракталы-снежинки". Проверено в Ексел 2010, 2016.
     

    Вложения:

    #168
    Lex K-G нравится это.
  9. Lex K-G

    Форумчанин

    Регистрация:
    4 июл 2012
    Сообщения:
    1.610
    Симпатии:
    1.061
    Адрес:
    οἰκουμένη
    Оффтоп
    БОЛЬШОЕ СПАСИБО! Баловались Вашими фракталами на Новый Год! Подымаю тост за Ваше здоровье, за благополучие Вашей семьи, за любовь и удачу в Вашем доме! Спасибо большое за уроки в EXCEL! С наступающим Новым Годом по очередной версии календаря!
     
    #169
  10. FreddyKryeger

    Регистрация:
    9 фев 2017
    Сообщения:
    2
    Симпатии:
    1
    Не подскажите как сделать чтоб excel не переводил угол из градусов в радианы когда считаешь синус?!
     
    #170
  11. В.Шуфотинский

    В.Шуфотинский Модератор
    Команда форума Форумчанин

    Регистрация:
    10 дек 2008
    Сообщения:
    17.307
    Симпатии:
    4.957
    Он не переводит. "Excel" работает с радианами, а для удобства пользователя вводить данные и выводить результаты в градусной мере, используют подпрограммки перевода.
     
    #171
  12. FreddyKryeger

    Регистрация:
    9 фев 2017
    Сообщения:
    2
    Симпатии:
    1
    В общем мне нужно получить синус угла в градусной мере, как это сделать? Какие именно подпрограмки?) или может формулы есть какие то?
     
    #172
    Lex K-G нравится это.
  13. В.Шуфотинский

    В.Шуфотинский Модератор
    Команда форума Форумчанин

    Регистрация:
    10 дек 2008
    Сообщения:
    17.307
    Симпатии:
    4.957
    Синус не может быть в градусной мере, т.к. это не угол, не температура и не крепость напитка. Это тригонометрическая функция, потому она безразмерная.

    Если Вам надо перевести немного углов, то проще это сделать на калькуляторе. Там же и вычислить синусы. Если же углов тысячи, то самое простое, это не подпрограммки, которые Вы, как я понимаю, всё равно не введёте в Microsoft Visual Basic, а поколонковое вычисление радианов. В каждой колонке делаете по несколько простых действий, в конце получите радианы, из которых в последней колонке вычислите синус. Такое вычисление можно протянуть и на сотни тысяч углов.

    1радиан = 180º/3.1415926
     
    #173
  14. stout

    Форумчанин

    Регистрация:
    5 янв 2008
    Сообщения:
    4.172
    Симпатии:
    11.936
    Адрес:
    Златоглавая и Белокаменная
    Если в А1 угол, то =SIN(РАДИАНЫ(A1))
     
    #174
    Lex K-G нравится это.
  15. kub13

    Форумчанин

    Регистрация:
    3 сен 2009
    Сообщения:
    115
    Симпатии:
    141
    Адрес:
    Липецк
    Задача не совсем ясно сформулирована.
    В прилагаемом файле подготовлена таблица для вычисления синусов и косинусов.
    Если войти в редактор VBA, предварительно нажав Alt+F11, можно ознакомится, изучить, выбрать и воспользоваться подпрограммами-функциями, заготовленными для геодезических нужд. Например, на листе в таблице применялась функция:
    'Перевод углов из ГГГ.ММСС в радианы
    Function Rad(GMS As Double) As Double
    Rad = GDD(GMS) / 180 * Pi
    End Function
     

    Вложения:

    #175
    мирось, Pawell, Grandpa и ещё 1-му нравится это.
  16. Lex K-G

    Форумчанин

    Регистрация:
    4 июл 2012
    Сообщения:
    1.610
    Симпатии:
    1.061
    Адрес:
    οἰκουμένη
    Спасибо БОЛЬШОЕ! Вы открыли для нас EXCEL! И VBA!
     
    #176
  17. maris_st

    Форумчанин

    Регистрация:
    16 июл 2012
    Сообщения:
    31
    Симпатии:
    1
    а с координатами WGS-84 не пытались подружить EXCEL ?
    kub13,
    kub13,
    stout,
     
    #177
    Lex K-G нравится это.
  18. trir

    Форумчанин

    Регистрация:
    25 ноя 2014
    Сообщения:
    3.253
    Симпатии:
    931
    Адрес:
    gnomtrir@mail.ru
  19. Valang

    Форумчанин

    Регистрация:
    9 фев 2012
    Сообщения:
    2.770
    Симпатии:
    2.215
    Адрес:
    г.Магадан
    Синус, косинус и т.д. - это отношение сторон в треугольнике: длину одной стороны, делим на длину другой стороны. Если быть точнее, то синус - это отношение противолежащей стороны к гипотенузе. Результат деления никак не может быть в градусах.
     
    #179
  20. geod64

    Форумчанин

    Регистрация:
    21 фев 2013
    Сообщения:
    359
    Симпатии:
    10
    Адрес:
    GEOD64@MAIL.RU
    Добрый день, подскажите пожалуйста, есть ли у кого пример вычисления азимута в EXCEL по прямоугольным координатам двух точек линии. Пробую сам сделать не получается
     
    #180

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление