Преобразование географических координат в excel

Если Вам нужно отобразить широту или долготу в формате 56°54’31» (56 градусов 54 минуты 31 секунда), то этот пример для Вас.

В зависимости от желаемого результата и исходных данных существуют разные способы отображения широты и долготы в формате 56°54’31» (56 градусов 54 минуты 31 секунда).

Применение пользовательского формата

Если в ячейке содержится число вида 565431, то применение

пользовательского формата

позволит только правильно отобразить формат широты и долготы (56°54’31»), арифметические же операции с долготой или шириной произвести не удастся (при прибавлении 30 секунд будем иметь 56°54’61», а не 56°55’01»). Тем не менее, применим пользовательский формат.

Пользовательский формат вводим через диалоговое окно

Формат ячеек

. Для вызова окна нажмите

CTRL

+

1

. Выберите (

все форматы

), удалите все из поля

Тип

.

• в поле
  
  Тип
  
  введите ###;
• затем введите туда же знак градуса (°), скопировав из Буфера обмена, в который его заранее туда вставили командой
  
  Символ
  
  (
  
  )
  
  . Или удерживая
  
  ALT
  
  , наберите на цифровой клавиатуре 0176 и отпустите
  
  ALT
  
  (Подробнее о вводе нестандартных символов читайте в статье

  Ввод символов с помощью клавиши ALT

  );

• введите пробел, два нуля, апостроф (‘) и еще пробел;
• введите еще два нуля и еще 2 апострофа (‘) (двойная кавычка не подойдет или ее придется вводить вместе с обратным слешем «);
• нажмите ОК.

Теперь введите в ячейку 565431 и нажмите

ENTER

, в ячейке отобразится 56°54’31».

Преобразование из десятичного формата

Часто долготу и широту представляют в десятичном формате. Например, число 122,44 соответствует 122 градусам 26 минутам и 24 секундам. Проверить это не составляет труда: целая часть соответствует градусам, 1 градус соответствует единице, минута– 1/60 градуса, секунда – 1/60 минуты или 1/3600 градуса. Получаем: 122+26*(1/60)+24*(1/3600)=122,44.

С десятичным представлением можно производить необходимые вычисления, например, можно прибавить 2 минуты и 10 секунд: +2*(1/60)+10*(1/3600).

Представить 122,44 в формате долготы и широты с помощью простого форматирования не удастся, нужно использовать формулу для преобразования из десятичного формата. Если значение долготы 122,44 находится в ячейке

А1

, то для преобразования в нужный формат запишем формулу:

=ТЕКСТ(ОТБР(A1);»0″&СИМВОЛ(176)) &ТЕКСТ(ЦЕЛОЕ(ОСТАТ(A1;1)*60);»0′») &ТЕКСТ(60*ОСТАТ((ОСТАТ(A1;1)*60);1);»0′ «)

Результат:

122°26’24»

– значение в текстовом формате.

Отображение широты и долготы в MS EXCEL

​Смотрите также​ *Sender) { double​ это я добавил​ обязательны.​ ему отдельные минуты​С уважением, Александр.​ градусов минус только​

​ колонками «Румб» и​ в окне поиска​ единицу измерения углов​ угловые скорости и​ = 0) Then​ As Byte) As​Richman​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ЛЕВБ(D4;ДЛСТР(D4)-4);»°»;»:»);»- «;»»)*24*ЕСЛИ(ЛЕВСИМВ(D4)=»-«;-1;1)​

Применение пользовательского формата

​ нужно использовать формулу​, наберите на цифровой​Если Вам нужно отобразить​ x; //тут градусы​ для функции floor​=ЕСЛИОШИБКА (ЗНАЧЕН (ПСТР​ и секунды из​drony​ что вычисленное целое​ «Градусы» , который​ вводим необходимо функцию​ rad перевести в​ переводить градусы в​ ГрадусыМинутыСекунды = Градусы​ String​

​, спасибо большое​Елены:Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(D4;ПОИСК(«°»;D4)-1)+(ПСТР(D4;ПОИСК(«°»;D4)+1;2)/60)*ЕСЛИ(ЛЕВСИМВ(D4)=»-«;-1;1)​ для преобразования из​ клавиатуре 0176 и​​ широту или долготу​​ с запятой double​ //————————————————————————— #pragma package(smart_init)​ (RC[-1];1;НАЙТИ («°»;RC[-1];1)-1));0)+ЕСЛИОШИБКА (ЗНАЧЕН​

• ​ шестидесятиричной системы в​: Спасибо за помощь​
• ​ число минут, деленное​ нужен для записи​ как показано ниже​ значение gradus°. Для​ радианы и радианы​ & «°»​Dim Градусы As​Можно ли в экселе​​Rustem​​ десятичного формата. Если​ отпустите​ в формате 56°54’31″​​ y = int(x);​​ #pragma resource «*.dfm»​ (ПСТР (RC[-1];НАЙТИ («°»;RC[-1];1)+2;НАЙТИ​ десятичную и всё​ Sh_Alex и Igor67​ на 60, умноженное​
• ​ промежуточных результатов. Дело​ на рисунке. Указываем​ этого предусмотрена функция​
• ​ в градусы. В​If (Секунды <>​ Integer, Минуты As​ десятичные градусы перевести​: http://support.microsoft.com/kb/213449/ru​ значение долготы 122,44​ALT​
• ​ (56 градусов 54​

​ //тут целые градусы​ TForm1 *Form1; //—————————————————————————​​ («‘»;RC[-1];1)-НАЙТИ («°»;RC[-1];1)-2));0)/60+ЕСЛИОШИБКА (ЗНАЧЕН​​ сложить с количеством​ !​

Преобразование из десятичного формата

​ на 3600 и​ в том, что​ на высветившуюся функцию.​ ГРАДУСЫ. Она позволяет​ Excel для этого​ 0) Then ГрадусыМинутыСекунды​ Integer, Секунды As​ в формат -​Morinus​ находится в ячейке​(Подробнее о вводе​ минуты 31 секунда),​ double z =​ __fastcall TForm1::TForm1(TComponent* Owner)​ (ПСТР (RC[-1];НАЙТИ («‘»;RC[-1];1)+2;ДЛСТР​

​ градусов​Pozia​ округленное до двух​ все-таки изначально Excel​Выбираем диапазон градусов (А3​

​ перевести значения выраженные​ предусмотрены специальные функции.​ = Градусы &​ Integer​ градусы минуты секунды​: Благодарю​А1​ нестандартных символов читайте​ то этот пример​​ (x — y)​​ : TForm(Owner) {​ (RC[-1])-НАЙТИ («‘»;RC[-1];1)-2));0)/3600​Например, можно вводить​
​: Sh_Alex, подскажите пожалуйста​
​ знаков после запятой​
​ не предназначался для​

​ по А7) и​ в радианах в​

excel2.ru

Перевод градусов, минут и секунд в десятичные? (Формулы/Formulas)

​ Для упрощения математических​​ «° » &​Dim Остаток As​ (например, 84,506631град =​XBird​, то для преобразования​ в статье Ввод​ для Вас.​ * 60; //тут​ } //————————————————————————— void​V-Gub​ градусы, минуты и​ пошагово как в​ = число секунд,​ работ в геодезической​ нажимаем на кнопку​ градусы в десятичном​ расчетов может потребоваться​ Минуты & «‘​ Double​

​ 84град 30′ 24»).​​: Есть файл с​ в нужный формат​
​ символов с помощью​

​В зависимости от желаемого​​ минуты с запятой​​ __fastcall TForm1::Button1Click(TObject *Sender)​

​: Добрый день!​​ секунды в отдельных​ имеющимся мне файле​ вычисленное с точностью​ сфере, поэтому в​ ОК.​

​ исчислении.​​ выразить в одной​​ " & Секунды​​Градусы = Int(Число)​

​ Какая нужна формула?​​ координатами точек в​

​ запишем формулу:​​ клавиши ALT);​

excelworld.ru

Преобразование десятичных градусов в ГГ°ММ′СС″ (Формулы/Formulas)

​ результата и исходных​​ double e; x​ { float x;​Пишу программку, очень​ ячейках и использовать​ экселя сделать чтобы​ до 2-х знаков​ нем нет встроенных​

​Протягиваем строку вниз для​​Нам нужно найти сколько​​ и второй величине.​​ & «»»​Остаток = Число​

​Андрей кяшкин​​ виде десятичных градусов​
​=ТЕКСТ(ОТБР(A1);"0"&СИМВОЛ(176))​

​введите пробел, два нуля,​​ данных существуют разные​​ = StrToFloat(Edit1->Text); Label1->Caption​​ float x1; float​ маленькую, но мне​ формулу:​ работала функция «gradus»?​ после запятой.​

​ форматов представления результатов​​ того, чтобы мы​​ будет в градусах​​Нам необходимо найти сколько​End If​ — Градусы​

​: Встроенных функций в​​ — долгота,широта,высота. Необходимо​​&ТЕКСТ(ЦЕЛОЕ(ОСТАТ(A1;1)*60);»0′»)​​ апостроф (‘) и​ способы отображения широты​ = «N «​ y; x =​ она нужна для​= + (/60)​ Спасибо​***********************************************************​

​ угловых измерений. Впрочем,​​ могли узнать сколько​​ 4,1 радианы. Нажимаем​​ будет в Радианах​

excelworld.ru

Можно ли в экселе десятичные градусы перевести..

​If (ВыборРезультата <>​Минуты = Int(Остаток​ Excel вроде бы​ их преобразовать в​&ТЕКСТ(60*ОСТАТ((ОСТАТ(A1;1)*60);1);»0′ «)​ еще пробел;​ и долготы в​

​ + FloatToStrF(y,ffGeneral,7,3) +​​ StrToFloat(Edit1->Text); //x1= floor(x);​ работы, собственно всегда​ + (/3600)​Pozia​Как теперь сделать​ они достаточно легко​ радиан во всех​
​ кнопку fx для​ 180°. Нажимаем кнопку​ 1) And (ВыборРезультата​ * 60)​ нет. Но решить​
​ широту ГГ°ММ′СС″ и​Результат: 122°26’24»– значение в​введите еще два нуля​ формате 56°54’31» (56​ «°» + FloatToStrF(z,ffGeneral,7,3);​ — ругается на​ то что мне​(, и -​: все. спасибо. разобрался​ шпоргалочку ?​ реализуются вручную, но,​ приведенных градусах, не​ вызова окна выбора​ fx возле строки​ <> 2) Then​Остаток = Остаток​ проблему можно так.​ долготу ГГ°ММ′СС″​
​ текстовом формате.​ и еще 2​ градусов 54 минуты​ } //————————————————————————— //​ это!!!! y =​ нужно пересчитывал в​ ссылки на соответствующие​
​Guest​Хочу в VB​ скажем, для записи​ вызывая функцию по​
​ функции и в​ формул для вызова​ ГрадусыМинутыСекунды = «ВыборРезультата​ * 60 -​
​ Пусть у нас​Richman​
​Morinus​
​ апострофа (‘) (двойная​ 31 секунда).​
​ x = 40.1234​ x1*60; Label1->Caption =​
​ Excel’е, но так​ ячейки)​: Sh_Alex, как в​
​ написать простенькую программку​ величины угла в​
​ несколько раз.​ окне поиска вводим​
​ окна выбора функций​ не равен 1​
​ Минуты​
​ в ячейке A2​
​:​: Здравствуйте! Помогите пожалуйста​
​ кавычка не подойдет​Если в ячейке содержится​
​ // y =​
​ «N » +​
​ как начал изучение​Если хотите вводить​
​ вашем примере удалить​ для этого дела,​ формате «градусы, минуты,​Получаем сразу значения всех​ соответствующее название функции.​
​ «Вставка функции» (SHIFT+F3)​
​ или 2″​Секунды = Round(Остаток​
​ находится число 84,506631.​XBird​ с формулой. У​ или ее придется​ число вида 565431,​ 40 // z​ FloatToStrF(y,ffGeneral,7,2) + «°»;​
​ С++ решил попробовать​ одной строкой, используя​ в клетке для​ но незнаю как​ секунды» требуется не​
​ радиан:​Появляется окно в которое​ и в окне​End Function​ * 60)​Способ 1 (громоздкий).​, Вот здесь уже​
​ меня есть данные,​
​ вводить вместе с​ то применение пользовательского​ = (40.1234-40)*60; z​ // — здесь​ написать её.​ ‘ и »​
​ перевода в градусы​
​ функции XL перевести​ один столбец таблицы,​Для 45 градусов –​ нужно ввести аргументы​
​ поиска вводим функцию​
​После этого на​
​If (Секунды =​
​ Здесь мы используем​ решали эту проблему​ например: — 1°​ обратным слешем «);​
​ формата позволит только​ = 0.1234*60; z​ как-то записать что​

Функции Excel для перевода из РАДИАНЫ в ГРАДУСЫ и обратно

​Суть в чём!​ , то это​ минуты секунды последнею​ в функции(операторы) VB.​ а три, соответственно,​ это 0,7853, для​ функции. Вводим значение​ «РАДИАНЫ». Выбираем высветившуюся​ листе Excel функцию​ 60) Then​ комбинацию из встроенных​Саня​ 3’31» (все в​

Как работает функция индекс в Excel?

​нажмите ОК.​ правильно отобразить формат​ = 7.404 //​ к чему складывается…​ Я получаю морские​ тоже можно организовать​ цифру? Прикрепил файл​Может кто подскажет​ доступ к этим​ 67 градусов –​ 4,1, так как​ нужную функцию, как​ в ячейке можно​Минуты = Минуты​

​ функций. Формула будет​: эта задача обратная.​ одной ячейке) и​Теперь введите в ячейку​ широты и долготы​ конечный результат должен​ N + x​ координаты, но в​ формулой используя текстовые​Юрий М​ таблице соответствий???​ данным тоже осуществляется​ это 1,1693, для​

​ нам следует найти​ показано на ниже​ вызывать так​ + 1​ выглядеть так:​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ТЕКСТ(ЦЕЛОЕ(A1);»00″)&»°»&ТЕКСТ(ЦЕЛОЕ((A1-ЦЕЛОЕ(A1))*60);»00″)&»‘»&ТЕКСТ(ОКРУГЛ(((A1-ЦЕЛОЕ(A1))*60-ЦЕЛОЕ((A1-ЦЕЛОЕ(A1))*60))*60;0);»00″)&»»»​ мне нужна формула​ 565431 и нажмите​

​ (56°54’31»), арифметические же​ иметь вид N​

​ + ° +​ градусах и десятых​ функции.​: Алекс уже давно​ОТБР — ???​ раздельно. Для решения​ 23 градусов –​ сколько будет gradus°​

​ рисунке.​=ГрадусыМинутыСекунды (A2;1)​

​Секунды = 0​=ЕСЛИ (ЕСЛИ (ОКРУГЛ​XBird​ для перевода этого​

​ENTER​

Как перевести Радианы в Градусы средствами Excel

​ операции с долготой​ 40°7.404 // а​ x1 }Ну в​ градусов в таком​Думаю, сами построить​ не появляется -​ОКРУГЛ-???​ этой проблемы пришлось​ это 0,4014, для​ в 4,1 rad.​

​Появляется окно, в которое​или​End If​ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ​:​ значения в десятичные,​, в ячейке отобразится​ или шириной произвести​

​ получается не то​ общем подскажите кто,​ виде N 40,1234,​ сможете (если не​ приболел… Попробуйте связаться​COS-???​ делать структуру, которая​ 12 градусов –​

​ Нажимаем ОК.​ нужно ввести аргументы​=ГрадусыМинутыСекунды (A2;2)​

​If (Минуты =​ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ​Richman​

Сколько радиан в нескольких значениях градуса?

​ что должно дать​ 56°54’31».​ не удастся (при​ : N 0°2.536585E-305​ что может?!​ 39.1234 и такие​ сможете — пишите)​ с ним по​ACOS-???​ переводит величину в​ это 0,2094, для​

​Для исходного значения 4,1​ функции. Вводим значение​В первом случае​ 60) Then​ ((A2-ОКРВНИЗ (A2;1))*60;1))=60;ОКРВНИЗ (A2;1)+1;ОКРВНИЗ​, я читала, но​ -1,058611111. В данном​Часто долготу и широту​ прибавлении 30 секунд​ , т.е. y​vxg​ же по E,​

​Александр хмыз​ почте.​SIN-???​ градусах (десятичные доли)​

​ 57 градусов –​ получаем ровно 235​ 180, так как​ нулевые секунды будут​Градусы = Градусы​ (A2;1)) & «°​ мне надо наоборот​

​ случае значения я​ представляют в десятичном​

​ будем иметь 56°54’61»,​ = 0.Что я​: C++ double x;​ мне их нужно​: Переводчик Градусов​Pozia​ASIN-???​ в требуемый формат,​ это 0,9948 в​ градусов.​ нам нужно найти​

exceltable.com

Угол ед.изм. : Градус,минут,секунд ???

​ отображаться, во втором​​ + 1​ » & ЕСЛИ​ выделить из десятичных​ привел со знаком​ формате. Например, число​ а не 56°55’01»).​
​ упустил???​
​ //тут градусы с​
​ перевести в грудусы​Для начало разберитесь​: А как узнать​Igor67​ отбрасывая сначала величину​ радианах.​Таким образом выполняется перевод​ сколько будет радиан​ — нет.​Минуты = 0​ (ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ​ градусов еще минуты​ «-«, но в​ 122,44 соответствует 122​ Тем не менее,​vxg​ запятой double y​ минуты и десятые​ что такое стили​ его почту?​: Мне на этом​ десятых долей и​drony​ из радиан в​ в 180 градусах.​P.S. Если будут​End If​ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ​ и секунды.​ моих данных так​ градусам 26 минутам​ применим пользовательский формат.​: как бы даже​ = int(x); //тут​ минут т.е. WGS-84​ ссылок А1 и​Guest​ сайте нравятся шпаргалочки.​ устанавливая количество целых​: Ув.господа, первоначальная задача​ градусы в Excel.​ Жмем ОК.​ какие-либо вопросы, обращайтесь.​If (ВыборРезультата =​ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ ((A2-ОКРВНИЗ​XBird​ же есть значения​ и 24 секундам.​Пользовательский формат вводим через​ неудобно говорить. вы​ целые градусы double​ из N 40,1234​ R1C1 в Excel​: посмотреть его пост​ По ссылке на​ градусов, а после​ стояла как отображение​ПРИМЕР 3. Иногда нужно​В 180 градусах будет​ Задача понравилась.​ 1) Then​ (A2;1))*60;1))=60;0;ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ​:​ и со знаком​ Проверить это не​ диалоговое окно Формат​ упустили x =​ z = (x​ и получаю N​RC[-1] — ячейка​ за 31.03.2008, 17:01​
​ формулы.​
​ переводя десятичные доли​ угла в градусах​
​ определить сколько радиан​ 3,1415 радиан.​Функция РАДИАНЫ (на английском​ГрадусыМинутыСекунды = Градусы​ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ​Саня​
​ «+», что формула​ составляет труда: целая​
​ ячеек. Для вызова​
​ 40.1234)​
​ — y) *​
​ 40°7.40, то же​
​ левее формулы. Сама​
​Владимир​

​Sh_Alex​​ градуса в минуты​ с минутами и​ в сразу нескольких​Найдем радианы для угла​

​ RADIANS) – это​​ & «° «​
​ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ ((A2-ОКРВНИЗ​, спасибо, но что-то​ должна понимать. Спасибо!​
​ часть соответствует градусам,​ окна нажмите​Nekto​ 60; //тут минуты​ самое и с​
​ формула ссылается только​: Проблема с записью​: «Drony»!​
​ и секунды. Для​ с секунтдами. Это​ значениях градуса и​
​ в 90°. Откроем​

​ одна из математических​​ & Минуты &​ (A2;1))*60;1))) & «‘​ не выходит… выдает​

​Pelena​​ 1 градус соответствует​CTRL+1​: Присвоить значение иксу​ с запятой​ долготой, т.е. просто​ на нее.​

​ углов , вычисление​​Вам удалось попасть​

​ примера, формулы, записанные​​ я уже решил.​ вводить тогда каждый​ окно функций и​ и тригонометрических функций,​ «‘ » &​ » & ЕСЛИ​

​ ЗНАЧ​​: Наверное, не самый​ единице, минута– 1/60​. Выберите (все форматы),​ надо перед тем,​Nekto​

​ отбрасываем целую часть​​Переводим дробь в​ дирекционного угла в​

​ в нужное время,​​ в ячейках: H4​Вот решение :​

planetaexcel.ru

Как в excel вводить градусы,минуты,секунды? мне нужны не сами значки…а чтобы он воспринимал числа как градусы…

​ минуты и секунды​​ excel.​ в нужное место.​
​ =ОТБР(G4) – целое​*********************************************************​ долго. В таком​ необходимо вычислить. Находим​ для инженерных расчетов.​End If​ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;0;ОКРУГЛ (((A2-ОКРВНИЗ​
​:​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(D4;ПОИСК(«°»;D4)-1)+(ПСТР(D4;ПОИСК(«°»;D4)+1;2)/60+ПСТР(D4;ПОИСК(«‘»;D4)+1;2)/3600)*ЕСЛИ(ЛЕВСИМВ(D4)=»-«;-1;1)​ 1/60 минуты или​ поля Тип.​C++ double x​
​ получать с помощью​ умножаем на 60​
​Пример исходного числа:​Файл удален​Я геодезист. Для​
​ число градусов I4​Например, таблица 1,​ случае можно воспользоваться​ ее в окне​ Данная функция в​If (ВыборРезультата =​ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0))​
​XBird​Nic70y​ 1/3600 градуса. Получаем:​

​в поле Тип введите​​ = StrToFloat(Edit1->Text); double​
​ стандартной функции http://www.cplusplus.com/reference/cmath/modf/​ и потом записываем​6,345​- велик размер​
​ своих нужд написал​ =ОТБР((G4-H4) *60) –​ «Вычисление дирекционных углов​ немного иным способом​
​ мастера функций и​ Excel легко преобразует​
​ 2) Then​
​ & «»»​
​, Формула Сани работает​
​: для разнообразия:​ 122+26*(1/60)+24*(1/3600)=122,44.​ ;;​ y = int(x);​
​V-Gub​ ввиде 40°07.40. В​
​Формула:​ — [​ функции, которые Вам​ целая часть произведения​
​ и длин сторон​ конвертирования величин для​ выбираем аргумент 90.​ градусы в радианы​If (Минуты <>​Способ 2 (изящный).​

Преобразовать координаты из десятичного представления в градусы минуты секунды

​ отлично. Замените все​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ЛЕВБ(D4;ДЛСТР(D4)-1);»°»;»:»);»‘»;»:»);»- «;»»)*24*ЕСЛИ(ЛЕВСИМВ(D4)=»-«;-1;1)​
​С десятичным представлением можно​затем введите туда же​V-Gub​: C++ #include #pragma​ экселе это всё​=СЦЕПИТЬ (ОТБР (RC[-1]);»°​МОДЕРАТОРЫ​ нужны. Посмотрите прикрепленный​ из десятичных долей​ между исходными пунктами»​
​ измерения углов.​ОК. В 90 градусах​ – угол, соответствующий​ 0) And (Секунды​ Здесь применяется макрос.​ точки, на запятые​Morinus​ производить необходимые вычисления,​ знак градуса (°),​: но это же​ hdrstop #include «Unit1.h»​ выглядит просто функция​ «;ОТБР (ABS(RC[-1]-ОТБР (RC[-1]))*60);»‘​]​ файл.​ градусов, умноженных на​ , выглядит так:​Требуется найти сколько будет​ будет 1,5707 радиан.​ дуге, а длина​ = 0) Then​ Для этого создается​ в разделителях. т.е.​: Круто! Спасибо Вам​ например, можно прибавить​ скопировав из Буфера​ значение всегда разное.​ #include //————————————————————————— #pragma​
​ ОТБР и т.д.,​ «;ОКРУГЛ (ABS(RC[-1]-ОТБР (RC[-1])-ОТБР​Это не единственная проблема.​Я сделал этот​ 60, т.е. целое​ Как видно, таблица​ в Радианах 45,​В следующих примерах рассмотрим,​ этой дуги равна​ ГрадусыМинутыСекунды = Градусы​ модуль, в который​ 39.45656877 -нельзя, 39,0000774-нужно.​ огромное. А можно​ 2 минуты и​ обмена, в который​ Его только в​ package(smart_init) #pragma resource​ а в билдере​ ((RC[-1]-ОТБР (RC[-1]))*60)/60)*3600;1);»»»»)​ Читайте, полезно:​ модуль надстройкой Excel.​ число минут J4​ почти полностью дублирует​ 67, 23, 12,​ как конвертировать эти​ ее радиусу.​ & «° «​ помещается следующий код​ Можно через «cntl+f»​

​ такую же формулу​​ 10 секунд: +2*(1/60)+10*(1/3600).​ его заранее туда​ Edit вписывать потом​ «*.dfm» TForm1 *Form1;​ С++ у меня​Переводим обратно в​Serge​ Дает массу преимуществ.​ =ОКРУГЛ((G4-H4-(I4/60) ) *3600;2)​

​ таблицу, взятую из​​ 57 градусов. Нажимаем​ единицы измерения углов​ПРИМЕР 1. Для инженерных​

​ & Минуты &​​ (набросал минут за​ найти «.», заменить​ только без значения​Представить 122,44 в формате​ вставили командой Символ​ после компиляции​ //————————————————————————— __fastcall TForm1::TForm1(TComponent*​ не получается.​ дробь:​: Excel понимает градусы​С вопросоми сюда​ – произведение из​ «методических указаний» ,​ кнопку fx (SHIFT+F3)​ в обоих направлениях.​ расчетов связанных с​ «‘»​ десять):​ «,»​ секунд.​ долготы и широты​ (Вставка/ Текст/ Символ).​Спасибо большое! Разобрался!​ Owner) : TForm(Owner)​C++ #include #pragma​36° 15’ 17″​ в десятичной системе​ или на E-mail:​ исходной величины градусов​ только имеется лишний​ для вызова окна​​ движением по окружности​If (Минуты =​Function ГрадусыМинутыСекунды (Число​XBird​Nic70y​ с помощью простого​

​ Или удерживая​​Добавлено через 34 секунды​ { } //—————————————————————————​ hdrstop #include «Unit1.h»​ — пробелы после​

​Значит надо перевести​​ [email protected]​ минус целое число​ столбец (пустой) между​
​ выбора функции и​ПРИМЕР 2. Иногда нужно​ зачастую необходимо вычислять​

​ 0) And (Секунды​​ As Double, ВыборРезультата​:​: Моя:​ форматирования не удастся,​ALT​
​Всем спасибо!!!!​
​ void __fastcall TForm1::Button1Click(TObject​
​ #include // -​

CyberForum.ru

​ ° и ‘​

Как переводить координаты из одного числового формата в другой

Географические координаты одной и тоже точки могут быть выражены в разных форматах. В зависимости от того, представлены минуты и секунды как значения от 0 до 60 или от 0 до 100 (десятичные доли).

Формат координат обычно записывают следующим образом: DD — градусы, MM — минуты, SS — секунды, если минуты и секунды представлены как десятичные доли, то пишут просто DD.DDDD. Например:

DD MM SS: 50° 40′ 45» в.д., 40 50′ 30» с.ш. — Градусы, минуты, секунды

DD MM.MM: 50° 40.75′ в.д., 40 50.5′ с.ш. — Градусы, десятичные минуты

DD.DDDDD: 50.67916 в.д., 40.841666 с.ш. — Десятичные градусы.

Многие программы не понимают координаты выраженные в форме, допускающем пробелы, такие как DD MM SS или DD MM.MM. Для нормальной работы, координаты рекомендуется хранить в форме DD.DDDDD.

Существует много способов осуществить данную конвертацию рассмотрим 3 основных (в порядке эффективности).

Правильно настроить GPS

Для того, чтобы не иметь проблем с переводом координат, проще всего сразу настроить GPS так, чтобы он отображал значения координат в формате DD.DDDDD. Однако, это может быть не удобно для тех, кто ориентируется в поле по топокартам с нанесенной координатной сеткой, где координаты подписаны в другом числовом формате. С другой стороны в этом случае, рекомендуется и саму координатную сетку подписывать в этом формате.

Подробнее про настройку GPS можно прочитать в специальной статье.

Использовать специальный скрипт

Если вы работаете в Arcview GIS, вы можете воспользоваться специальным скриптом, который осуществит пересчет за вас.

Для начала работы в Arcview должна быть создана или загружена таблица в формате DBF (создать такую таблицу можно, например, в Excel’e). Таблица в которой записаны исходные значения ДОЛЖНА быть открыта для записи TableStart editing.

В этой таблице должно присутствовать 2 столбца (общее количество может быть больше) в которых должны быть записаны значения координат в формате DDMMSS то есть пробелов между цифрами быть не должно, например 505050.3214

В процессе работы скрипт попросит указать название столбца в котором записаны значения широты и столбца в котором записаны значения долготы. Затем попросит ввести название для результирующих столбцов. После этого скрипт выполнит преобразование и запишет в новые столбцы с названиями которые вы вводили значения координат в формате DD.DDDDD.

Загрузить скрипт (о том как загрузить и выполнить скрипт в Arcview).

Пересчитать значения координат самому в Excel

Формула для пересчета из dd mm ss в dd.ddddd:

Формула для пересчета из dd mm.mmmm в dd.ddddd:

Формула для пересчета из dd.ddddd в dd mm ss:

DD = TRUNC(DDD)

MM = TRUNC((DDD − DD) * 60)

SS = ((DDD − DD) * 60 − MM) * 60

где DDD — координаты в формате DD.DDDD, DD — градусы, MM (MM.MMMM) — минуты, SS — секунды

Если лень вводить формулы и создавать таблицу, можно загрузить готовую. Дальше потребуется только ввести свои координаты и скопировав столбцы с результатом вставить их в новую таблицу или текстовый файл, который можно будет потом импортировать в ГИС.

Чтобы еще больше облегчить пересчет координат в Excel можно использовать надстройку подключаемую к Excel. После ее подключения, в Excel добавляются несколько формул, позволяющих конвертировать значения из DDMMSS (в разных форматах в десятичные градусы). Скачать надстройку. Описание подключения и использования надстройки внутри архива.

• ГРД__ГГ_ММСС — перевод градусов, введенных в 1 ячейку в виде ГГ,ММСС
• ГРД__ГГММ_СС — перевод градусов, введенных в 1 ячейку в виде ГГММ,СС
• ГРД__ГГ_ММ_СС — перевод градусов, введенных в 3 ячейки в виде ГГ ММ СС

В блоге мне задали вопрос, как десятичное число отразить в Excel в виде географической координаты? Допустим в ячейке набрано 89,88. Можно ли отразить в виде 89°52’48"? В стандарте Excel такого формата нет. Я обратился к Интернету, и нашел статью Отображение широты и долготы в MS Excel. Авторы предлагают два интересных решения, но оба не позволяют обрабатывать координаты, как числа… например, складывать. Решение родилось по аналогии, ведь формат координаты по структуре аналогичен формату времени))

Рис. 1. Формат даты и времени в Excel

Скачать заметку в формате Word или pdf, примеры в формате Excel

Напомню, как Excel отображает дату и время. Единица – начало исчисления – 1 января 1900 г. 0:00:00. А число 43 382,5 приходится на полдень 9 октября 2018 г. (рис. 1). Сутки = 1, час = 1/24 = 0,041(6), минута = 1/1440 = 0,00069(4), секунда = 1/86400 = 0,0000115(740).

Кроме того, в Excel есть два формата времени. В первом случае – ч:мм:сс – часы могут изменяться от 0 до 23, а 24 – это начало следующих суток. На официальном сайте Microsoft такой формат называется время. Во втором случае – [ч]:мм:сс – часы изменяются до бесконечности. Такой формат называют истекшее время.

Введите в ячейке формулу =89,88/24, преобразуя десятичное число в количество часов. Кликните на ячейке правой кнопкой мыши, выберите опцию Формат ячеек… В области Числовые форматы выберите Время. В области Тип – 37:30:55. Такое обозначение подчеркивает, что часы могут иметь значение более 23. Кликните Ok.

Рис. 2. Форматируем десятичное число в виде истекшего времени

То, что получилось уже очень близко к желаемой форме (рис. 3).

Рис. 3. Десятичное число в формате истекшего времени

Поскольку, нам понадобится знак градуса, кликните в любую ячейку листа, пройдите по меню Вставка –> Символ. В открывшейся таблице найдите знак градуса, выделите его и кликните Вставить. В ячейке выделите знак градуса и скопируйте его в буфер отмена.

Пользовательский формат географических координат

Еще раз кликните на ячейке А1 правой кнопкой мыши, выберите опцию Формат ячеек… В области Числовые форматы выберите (все форматы). В области Тип (см. 1 на рис. 4) после [ч] вставьте знак градуса вместо двоеточия, затем после мм вставьте знак апострофа вместо двоеточия, и, наконец, вставьте два апострофа после сс. В области 2 смотрим, как отображаются вносимые нами изменения. Если вас всё устраивает, кликните Ok.

Рис. 4. Преобразуем формат истекшего времени в формат широты (долготы)

Получилось!

Рис. 5. Десятичное число в формате широты (долготы)

Проверяем, что с нашей широтой можно выполнять операции сложения и вычитания (рис. 6).

Рис. 6. С широтой в таком формате можно выполнять операции сложения и вычитания