Отображение широты и долготы в MS EXCEL
Смотрите также *Sender) { double это я добавил обязательны. ему отдельные минутыС уважением, Александр. градусов минус только
колонками «Румб» и в окне поиска единицу измерения углов угловые скорости и = 0) Then As Byte) AsRichman200?’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,44ALT
- (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; //тут } //————————————————————————— voidV-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 секунд , т.е. yvxg же по E,
Александр хмыз почте.SIN-??? градусах (десятичные доли)
57 градусов – получаем ровно 235 180, так как нулевые секунды будутГрадусы = Градусы (A2;1)) & «° мне надо наоборот
случае значения я представляют в десятичном
будем иметь 56°54’61», = 0.Что я: C++ double x; мне их нужно: Переводчик ГрадусовPoziaASIN-??? в требуемый формат, это 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 и получаю NRC[-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Вот решение :
раз аргумент очень введем функцию, что которая часто применяется Секунды & «»» (ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ
Richman оптимальный вариант градуса, секунда – удалите все из как производишь действия.
: Дробнуюцелую часть можно (40), а дробную
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))
XBirdNic70y 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 #pragma36° 15’ 17″ в десятичной системе или на E-mail: исходной величины градусов только имеется лишний для вызова окна движением по окружностиIf (Минуты =Function ГрадусыМинутыСекунды (ЧислоXBirdNic70y с помощью простого
Или удерживаяДобавлено через 34 секунды { } //————————————————————————— hdrstop #include «Unit1.h» — пробелы после
Значит надо перевести [email protected] минус целое число столбец (пустой) между
выбора функции иПРИМЕР 2. Иногда нужно зачастую необходимо вычислять
0) And (Секунды As Double, ВыборРезультата:: Моя: форматирования не удастся,ALT
Всем спасибо!!!!
void __fastcall TForm1::Button1Click(TObject
#include // -
CyberForum.ru
° и ‘
Пересчет из Градусы/Минуты/Секунды в десятичные градусы с помощью Excel
Очень простая статья по переводу координат из представления «Градусы/Минуты/Секунды» в формат десятичных градусов. Обработка до 5000 пар координат за раз.
Файл к статье: https://yadi.sk/d/QNw-SUMGXUAIzg
Откройте скачанный файл и разрешите выполнение макросов:
Теперь рассмотрим его содержимое подробнее: на вкладке (листе) «Исходные (Г.М.С)» мы видим исходные данные для примера — в дальнейшем, их разумеется, можно (и нужно!) удалить, и заменить своими.
На листе «Десятичные градусы» мы видим, что пока эксель не может выполнить расчеты
Вернитесь в первую вкладку и нажмите кнопку «Удалить буквы N,E»
Результат на втором листе не заставит себя ждать:
Теперь можно скопировать всю эту огромную пачку координат, и например:
— перевести в кадастровые. Описано здесь в разделе 3
прямая ссылка на сайт-конвертер:
— Отобразить на карте в виде геоданных:
Прим.1: Макрос выполняет поиск и замену букв N и E в тексте, аналогичные действия можно выполнить вручную, просто нажав Ctrl+H — для любых других букв/символов.
Прим.2: Если при копировании из источника данных значения широты/долготы оказываются в одной ячейке при вставке, то их легко разделить на вкладке Данные, Текст по столбцам.
Прим.3: Формулы можно легко расширит на необходимый диапазон, если вдруг 5000 строк окажется недостаточно. Пароль защиты листа: 911
Как в Excel преобразовать градусы с десятичными знаками в минуты и секунды?
К примеру, есть значение вида 12.3648°, преобразовать в 12° Х.х’ или в 12° Х’ Y.y».
Порядок действий для преобразования градусов из десятичных долей
считаем что исходное значение записано в ячейке A2
- формула для вычисления целых градусов =ЦЕЛОЕ(A2)
- формула для вычисления минут градуса (1°=60′) =ЦЕЛОЕ(ОСТАТ(A2;1) *60)
- формула для вычисления секунд градуса (1°=3600″) =(ОСТАТ(A2;1)-ЦЕЛО Е(ОСТАТ(A2;1)*60)/60) *3600
Каждое значение надо преобразовать к текстовому виду функцией ТЕКСТ
и объединить в одну текстовую строчку формулой
если десятичные доли секунд не нужны то формула будет такая:
формула без секунд с десятичными знаками для минут
Обратите внимание, что при копировании формул со страницы этого ресурса иногда появляются лишние знаки, которые надо удалить, иначе формула в EXCEL будет давать ошибку.
Доброе время суток. Допустим, данные в ячейке B2 в виде десятичных градуса такого вида: 51,214794. Тогда формула, скажем, в ячейке B4, у меня следующего вида: =ТЕКСТ(ОТБР(B3);»0″& СИМВОЛ(176))&ТЕКСТ(ЦЕ ЛОЕ(ОСТАТ(B3;1)*60);» 0′»)&ТЕКСТ(60*ОСТАТ(B 3;1);»0,00000»»). Здесь в моих предложениях точки — это просто знаки препинания, их не надо ставить в ячейки. Продолжу. Конечный результат в ячейке B4 с формулой будет такой: 51°12’12,88764»
Тут в формуле знаки «нуль», а не «#», суть от этого не меняется. Должен сказать, что в конце формулы можно менять разрядность секунд в десятичном представлении, то есть точность. К примеру, поставим «0,000»». Тогда результат станет: 51°12’12,887». Две последние цифры опускаются. А если я поставлю «0,00000000»», то конечный результат: 51°12’12,88764000». Я не программист, просто искал на сайтах, а потом переделал немного формулу под свои запросы. Кстати, на одном форуме задали вопрос, могут ли быть углы >360° ? Как специалист по электроприводам и автоматике, отвечу, что могут. Здесь от заданного значения надо вычитать по 360, пока в остатке не получится число
Географические информационные системы и дистанционное зондирование
Конвертация значений координат в формате DDMMSS в формат DD.DDDD
Как переводить координаты из одного числового формата в другой
Географические координаты одной и тоже точки могут быть выражены в разных форматах. В зависимости от того, представлены минуты и секунды как значения от 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.
[править] Пересчитать значения координат самому в Excel
Формула для пересчета из dd mm ss в dd.ddddd:
Формула для пересчета из dd mm.mmmm в dd.ddddd:
Формула для пересчета из dd.ddddd в dd mm ss:
где DDD — координаты в формате DD.DDDD, DD — градусы, MM (MM.MMMM) — минуты, SS — секунды
Если лень вводить формулы и создавать таблицу, можно загрузить готовую. Дальше потребуется только ввести свои координаты и скопировав столбцы с результатом вставить их в новую таблицу или текстовый файл, который можно будет потом импортировать в ГИС.
Чтобы еще больше облегчить пересчет координат в Excel можно использовать надстройку подключаемую к Excel. После ее подключения, в Excel добавляются несколько формул, позволяющих конвертировать значения из DDMMSS (в разных форматах в десятичные градусы). Скачать надстройку. Описание подключения и использования надстройки внутри архива.
- ГРД__ГГ_ММСС — перевод градусов, введенных в 1 ячейку в виде ГГ,ММСС
- ГРД__ГГММ_СС — перевод градусов, введенных в 1 ячейку в виде ГГММ,СС
- ГРД__ГГ_ММ_СС — перевод градусов, введенных в 3 ячейки в виде ГГ ММ СС
Последнее обновление: 2014-05-14 21:38
Дата создания: 01.03.2002 Автор(ы): Максим Дубинин
Можно ли в экселе десятичные градусы перевести..
Способ 1 (громоздкий). Здесь мы используем комбинацию из встроенных функций. Формула будет выглядеть так:
=ЕСЛИ (ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))=60;ОКРВНИЗ (A2;1)+1;ОКРВНИЗ (A2;1)) & «° » & ЕСЛИ (ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))=60;0;ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1)+1;ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))) & «‘ » & ЕСЛИ (ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)=60;0;ОКРУГЛ (((A2-ОКРВНИЗ (A2;1))*60-ОКРВНИЗ ((A2-ОКРВНИЗ (A2;1))*60;1))*60;0)) & «»»
Способ 2 (изящный). Здесь применяется макрос. Для этого создается модуль, в который помещается следующий код (набросал минут за десять):
Function ГрадусыМинутыСекунды (Число As Double, ВыборРезультата As Byte) As String
Dim Градусы As Integer, Минуты As Integer, Секунды As Integer
Dim Остаток As Double
Градусы = Int(Число)
Остаток = Число — Градусы
Минуты = Int(Остаток * 60)
Остаток = Остаток * 60 — Минуты
Секунды = Round(Остаток * 60)
If (Секунды = 60) Then
Минуты = Минуты + 1
Секунды = 0
End If
If (Минуты = 60) Then
Градусы = Градусы + 1
Минуты = 0
End If
If (ВыборРезультата = 1) Then
ГрадусыМинутыСекунды = Градусы & «° » & Минуты & «‘ » & Секунды & «»»
End If
If (ВыборРезультата = 2) Then
If (Минуты <> 0) And (Секунды = 0) Then ГрадусыМинутыСекунды = Градусы & «° » & Минуты & «‘»
If (Минуты = 0) And (Секунды = 0) Then ГрадусыМинутыСекунды = Градусы & «°»
If (Секунды <> 0) Then ГрадусыМинутыСекунды = Градусы & «° » & Минуты & «‘ » & Секунды & «»»
End If
If (ВыборРезультата <> 1) And (ВыборРезультата <> 2) Then ГрадусыМинутыСекунды = «ВыборРезультата не равен 1 или 2»
End Function
Отображение широты и долготы в MS 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».
Excel градусы минуты секунды в десятичные градусы
Подсмотрел на форуме клуба «Магистраль» тему и решил задублировать её тут, чтобы была «под рукой».
Географические координаты одной и тоже точки могут быть выражены в разных форматах. В зависимости от того, представлены минуты и секунды как значения от 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.
Пересчёт координат при помощи Excel
Формула для пересчета из dd mm ss в dd.ddddd:
Формула для пересчета из dd mm.mmmm в dd.ddddd:
Формула для пересчета из dd.ddddd в dd mm ss:
DD = TRUNC(DD)
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 ячейки в виде ГГ ММ СС
|
Перевод градусов, минут и секунд в десятичные? |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
Если Вам нужно отобразить широту или долготу в формате 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»
– значение в текстовом формате.