Как проверить расход бензина по геолокации в эксель
Обращаем Ваше внимание, что в соответствии с Федеральным законом N 273-ФЗ «Об образовании в Российской Федерации» в организациях, осуществляющих образовательную деятельность, организовывается обучение и воспитание обучающихся с ОВЗ как совместно с другими обучающимися, так и в отдельных классах или группах.
Рабочие листы и материалы для учителей и воспитателей
Более 2 500 дидактических материалов для школьного и домашнего обучения
Столичный центр образовательных технологий г. Москва
Получите квалификацию учитель математики за 2 месяца
от 3 170 руб. 1900 руб.
Количество часов 300 ч. / 600 ч.
Успеть записаться со скидкой
Форма обучения дистанционная
- Онлайн
формат - Диплом
гособразца - Помощь в трудоустройстве
311 лекций для учителей,
воспитателей и психологов
Получите свидетельство
о просмотре прямо сейчас!
Расчёт расхода ГСМ в таблицах EXCEL
Цель работы : Учащиеся н аучатся: вводить данные, редактировать и форматировать данные, оформлять в виде таблицы, изменять ширину и высоту ячейки, выравнивать, редактировать и форматировать ячейки, создавать границы и заливку ячеек, производить вычисления в таблицах, освоить автосуммирование, копирование формул и организацию адресных ссылок.
Порядок работы :
1. Открыть книгу Excel одним из способов:
1 способ Пуск, Программы, Microsoft Excel , Файл, Отрыть , устанавливаем в окне Папка Личную папку, выделяем одну из рабочих книг и нажимаем клавишу Открыть, переходим на чистый лист
2-способ Мой компьютер, Личная папка, Выделить один из файлов Ex с el , нажать клавишу Открыть и перейти на чистый лист.
2. Переименовать листы таблицы как Табл7, Табл8, Табл9. Для этого:
- поставить указатель мыши на наименование листа;
- вызвать контекстное меню щёлкнув правой клавишей мыши;
- удаляем старую надпись;
3. Выполните названия и шапки таблиц с учётом действующего стандарта. При этом нужно пользоваться пунктом меню Формат, вкладкой Выравнивание. Например, для Табл7:
Выделить блок А1:Е1, нажать клавишу “Объединить и поместить в центре” на панели Главная
Поставить указатель мышки между обозначениями 1 и 2 строк так, чтобы он изменился в двунаправленную черную стрелку, нажать левую клавишу мыши и протащить её до нужной для заголовка ширины строки.
Так же увеличить ширину столбцов A , B , C , D , E и строки 2.
Выделить блок А1:Е2.
Выполнить команду: Формат, Ячейки, выбираем вкладку Выравнивание и устанавливаем флажки (по горизонтали - по центру, по вертикали тоже - по центру, переносить по словам), Ок.
Заносим название таблицы в ячейку A 1
Заносим названия граф в ячейки A 2, B 2, C 2, D 2, E 2 соответственно.
4. Заполняем таблицы с учётом того, что приведённые в таблицах величины, являются исходными, остальные графы – производными:
Табл7 Годовая потребность в топливе = Норма расхода * Суммарное планируемое время
Табл8 Планируемая потребность в дизельном топливе - берём из Табл7 с помощью ссылки
Сезонная потребность в бензине = Норма бензина * Планируемая потребность / 100
Табл9 Планируемая потребность в дизельном топливе - берём из Табл7 с помощью ссылки
Потребность в смазочных материалах = Норма * Планируемую потребность в дизельном топливе / 100
5. Сохраняем книгу в Личной папке. Выходим из Excel .
6. Оформляем отчёт. В отчёте должны быть приведены таблицы с указанием формул и ссылок. Чтобы в таблицах вместо результатов высвечивались формулы необходимо выполнить команду Формулы, Отобразить формулы.
Доброго времени суток!
В просторах интернета готовых решений найти не удалось, но тема и сама затея может быть кому-нибудь будет интересной и полезной.
Цель определить расстояние между городами, местами, конкретными адресами и тд
Полазив по гуглу, и экспериментируя руками, получилось найти структуру ответа на запрос по расстоянию на карте между пунктами в виде xml
Атрибут distance дает расстояние в метрах.
Распарсить xml я не могу т.к. этот отрезок vba мне дается тяжело
Sub DistanceXML()
Dim urladr, a, b
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
a = Replace(a, " ", "+")
a = Replace(a, ",", "+")
b = Replace(b, " ", "+")
b = Replace(b, ",", "+")
urladr = "https://maps.googleapis.com/maps/api/distancematrix/xml?origins=" & a & "|Seattle&destinations Расстояние " & distance & " метров :)"
End Sub
Доброго времени суток!
В просторах интернета готовых решений найти не удалось, но тема и сама затея может быть кому-нибудь будет интересной и полезной.
Цель определить расстояние между городами, местами, конкретными адресами и тд
Полазив по гуглу, и экспериментируя руками, получилось найти структуру ответа на запрос по расстоянию на карте между пунктами в виде xml
Атрибут distance дает расстояние в метрах.
Распарсить xml я не могу т.к. этот отрезок vba мне дается тяжело
Sub DistanceXML()
Dim urladr, a, b
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
a = Replace(a, " ", "+")
a = Replace(a, ",", "+")
b = Replace(b, " ", "+")
b = Replace(b, ",", "+")
urladr = "https://maps.googleapis.com/maps/api/distancematrix/xml?origins=" & a & "|Seattle&destinations Расстояние " & distance & " метров :)"
End Sub
Цель определить расстояние между городами, местами, конкретными адресами и тд
Полазив по гуглу, и экспериментируя руками, получилось найти структуру ответа на запрос по расстоянию на карте между пунктами в виде xml
Атрибут distance дает расстояние в метрах.
Распарсить xml я не могу т.к. этот отрезок vba мне дается тяжело
Sub DistanceXML()
Dim urladr, a, b
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
a = Replace(a, " ", "+")
a = Replace(a, ",", "+")
b = Replace(b, " ", "+")
b = Replace(b, ",", "+")
urladr = "https://maps.googleapis.com/maps/api/distancematrix/xml?origins=" & a & "|Seattle&destinations Расстояние " & distance & " метров :)"
End Sub
Плохо искали
Вот тут есть и тут
По моему что-то даже тут на форуме было. Автор - SLAVICK
Дата добавления - 02.02.2016 в 01:26
Public Sub GetDistance()
Dim a, b, GetDistance As String
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
Dim firstVal As String, secondVal As String, lastVal As String
firstVal = "http://maps.googleapis.com/maps/api/distancematrix/json?origins &destinations &mode=car&language=pl&sensor=false"
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
URL = firstVal & Replace(a, " ", "+") & secondVal & Replace(b, " ", "+") & lastVal
objHTTP.Open "GET", URL, False
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.send ("")
If InStr(objHTTP.responseText, """distance"" : <") = 0 Then GoTo ErrorHandl
Set regex = CreateObject("VBScript.RegExp"): regex.Pattern = """value"".*?(2+)": regex.Global = False
Set matches = regex.Execute(objHTTP.responseText)
tmpVal = Replace(matches(0).SubMatches(0), ".", Application.International(xlListSeparator))
GetDistance = CDbl(tmpVal)
MsgBox GetDistance
Exit Sub
ErrorHandl:
GetDistance = -1
End Sub
Public Sub GetDistance()
Dim a, b, GetDistance As String
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
Dim firstVal As String, secondVal As String, lastVal As String
firstVal = "http://maps.googleapis.com/maps/api/distancematrix/json?origins &destinations &mode=car&language=pl&sensor=false"
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
URL = firstVal & Replace(a, " ", "+") & secondVal & Replace(b, " ", "+") & lastVal
objHTTP.Open "GET", URL, False
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.send ("")
If InStr(objHTTP.responseText, """distance"" : <") = 0 Then GoTo ErrorHandl
Set regex = CreateObject("VBScript.RegExp"): regex.Pattern = """value"".*?(9+)": regex.Global = False
Set matches = regex.Execute(objHTTP.responseText)
tmpVal = Replace(matches(0).SubMatches(0), ".", Application.International(xlListSeparator))
GetDistance = CDbl(tmpVal)
MsgBox GetDistance
Exit Sub
ErrorHandl:
GetDistance = -1
End Sub
Public Sub GetDistance()
Dim a, b, GetDistance As String
a = InputBox("Пункт А", "А", "")
b = InputBox("Пункт Б", "Б", "")
Dim firstVal As String, secondVal As String, lastVal As String
firstVal = "http://maps.googleapis.com/maps/api/distancematrix/json?origins &destinations &mode=car&language=pl&sensor=false"
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
URL = firstVal & Replace(a, " ", "+") & secondVal & Replace(b, " ", "+") & lastVal
objHTTP.Open "GET", URL, False
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.send ("")
If InStr(objHTTP.responseText, """distance"" : <") = 0 Then GoTo ErrorHandl
Set regex = CreateObject("VBScript.RegExp"): regex.Pattern = """value"".*?(5+)": regex.Global = False
Set matches = regex.Execute(objHTTP.responseText)
tmpVal = Replace(matches(0).SubMatches(0), ".", Application.International(xlListSeparator))
GetDistance = CDbl(tmpVal)
MsgBox GetDistance
Exit Sub
ErrorHandl:
GetDistance = -1
End Sub
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
distance = xmlDoc.SelectSingleNode("//distance/value").Text
MsgBox "Расстояние " & distance & " метров :)"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
distance = xmlDoc.SelectSingleNode("//distance/value").Text
MsgBox "Расстояние " & distance & " метров :)"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
distance = xmlDoc.SelectSingleNode("//distance/value").Text
MsgBox "Расстояние " & distance & " метров :)"
Действительно:D
Спасибо огромное!!
Doober, просто превосходно.
Благодарю за помощь. Автор - Валерьянка
Дата добавления - 02.02.2016 в 02:14
Sub LatLong()
Dim a, lat, lng, urladr As String
a = InputBox("Место назначения (Город, адрес)", "Пункт", "")
urladr = "http://maps.google.com/maps/api/geocode/xml?address=" & Replace(a, " ", "+") & "&sensor=false"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
lat = xmlDoc.SelectSingleNode("//location/lat").Text
lng = xmlDoc.SelectSingleNode("//location/lng").Text
MsgBox lat & "," & lng
End Sub
Sub LatLong()
Dim a, lat, lng, urladr As String
a = InputBox("Место назначения (Город, адрес)", "Пункт", "")
urladr = "http://maps.google.com/maps/api/geocode/xml?address=" & Replace(a, " ", "+") & "&sensor=false"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
lat = xmlDoc.SelectSingleNode("//location/lat").Text
lng = xmlDoc.SelectSingleNode("//location/lng").Text
MsgBox lat & "," & lng
End Sub
[/vba]
[moder]Какое отношение этот вопрос имеет к расчету расстояния?
Создайте новую тему.[/moder] Валерьянка
Sub LatLong()
Dim a, lat, lng, urladr As String
a = InputBox("Место назначения (Город, адрес)", "Пункт", "")
urladr = "http://maps.google.com/maps/api/geocode/xml?address=" & Replace(a, " ", "+") & "&sensor=false"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.Load urladr
Do While xmlDoc.readyState <> 4
DoEvents
Loop
lat = xmlDoc.SelectSingleNode("//location/lat").Text
lng = xmlDoc.SelectSingleNode("//location/lng").Text
MsgBox lat & "," & lng
End Sub
[/vba]
[moder]Какое отношение этот вопрос имеет к расчету расстояния?
Создайте новую тему.[/moder] Автор - Валерьянка
Дата добавления - 04.02.2016 в 14:44
Googlе рассчитывает расстояние исходя из маршрута и средства передвижения, загруженности дороги и т.п.
потому расстояние может постоянно изменятся.
Наиболее точное геодезическое расстояние, для оценки отдаленности, можно получить от пункта А до Б по прямой
Вот что у меня получилось собрать :)
Sub Расстояние()
Const pi = 3.14159265358979 ' определяем константу pi
lat1 = 56.7529556 ' Широта А
lng1 = 37.1969234 ' Долгота А
lat2 = 56.7523821 ' Широта Б
lng2 = 37.1976746 ' Долгота Б
' переводим градусы в радианы
GradToRadLat1 = lat1 * pi / 180 ' Радианы Широты А
GradToRadLng1 = lng1 * pi / 180 ' Радианы Долготы А
GradToRadLat2 = lat2 * pi / 180 ' Радианы Широты Б
GradToRadLng2 = lng2 * pi / 180 ' Радианы Долготы Б
a = 6378137 ' экваториальный радиус земли (метров)
f = 1 / 298.257223563 ' сжатие
b = a * (1 - f) ' полярный радиус
GSinLat = (Sin((GradToRadLat1 - GradToRadLat2) / 2) ^ 2) 'Гаверсинус широты
GSinLng = (Sin((GradToRadLng1 - GradToRadLng2) / 2) ^ 2) 'Гаверсинус долготы
CosLat = Cos(GradToRadLat1) * Cos(GradToRadLat2) 'Произведение косинусов широт
'вычисление арксинуса угла (Sqr(GSinLat + GSinLng * CosLat)
x = Sqr(GSinLat + GSinLng * CosLat)
Arcsin = Atn(x / Sqr(-x * x + 1))
'расчет дистанции
dist = (a + b) * Arcsin
MsgBox dist
End Sub
Как получить координаты смотрите здесь
Googlе рассчитывает расстояние исходя из маршрута и средства передвижения, загруженности дороги и т.п.
потому расстояние может постоянно изменятся.
Наиболее точное геодезическое расстояние, для оценки отдаленности, можно получить от пункта А до Б по прямой
Вот что у меня получилось собрать :)
Sub Расстояние()
Const pi = 3.14159265358979 ' определяем константу pi
lat1 = 56.7529556 ' Широта А
lng1 = 37.1969234 ' Долгота А
lat2 = 56.7523821 ' Широта Б
lng2 = 37.1976746 ' Долгота Б
' переводим градусы в радианы
GradToRadLat1 = lat1 * pi / 180 ' Радианы Широты А
GradToRadLng1 = lng1 * pi / 180 ' Радианы Долготы А
GradToRadLat2 = lat2 * pi / 180 ' Радианы Широты Б
GradToRadLng2 = lng2 * pi / 180 ' Радианы Долготы Б
a = 6378137 ' экваториальный радиус земли (метров)
f = 1 / 298.257223563 ' сжатие
b = a * (1 - f) ' полярный радиус
GSinLat = (Sin((GradToRadLat1 - GradToRadLat2) / 2) ^ 2) 'Гаверсинус широты
GSinLng = (Sin((GradToRadLng1 - GradToRadLng2) / 2) ^ 2) 'Гаверсинус долготы
CosLat = Cos(GradToRadLat1) * Cos(GradToRadLat2) 'Произведение косинусов широт
'вычисление арксинуса угла (Sqr(GSinLat + GSinLng * CosLat)
x = Sqr(GSinLat + GSinLng * CosLat)
Arcsin = Atn(x / Sqr(-x * x + 1))
'расчет дистанции
dist = (a + b) * Arcsin
MsgBox dist
End Sub
Как получить координаты смотрите здесь Валерьянка
Вот что у меня получилось собрать :)
Sub Расстояние()
Const pi = 3.14159265358979 ' определяем константу pi
lat1 = 56.7529556 ' Широта А
lng1 = 37.1969234 ' Долгота А
lat2 = 56.7523821 ' Широта Б
lng2 = 37.1976746 ' Долгота Б
' переводим градусы в радианы
GradToRadLat1 = lat1 * pi / 180 ' Радианы Широты А
GradToRadLng1 = lng1 * pi / 180 ' Радианы Долготы А
GradToRadLat2 = lat2 * pi / 180 ' Радианы Широты Б
GradToRadLng2 = lng2 * pi / 180 ' Радианы Долготы Б
a = 6378137 ' экваториальный радиус земли (метров)
f = 1 / 298.257223563 ' сжатие
b = a * (1 - f) ' полярный радиус
GSinLat = (Sin((GradToRadLat1 - GradToRadLat2) / 2) ^ 2) 'Гаверсинус широты
GSinLng = (Sin((GradToRadLng1 - GradToRadLng2) / 2) ^ 2) 'Гаверсинус долготы
CosLat = Cos(GradToRadLat1) * Cos(GradToRadLat2) 'Произведение косинусов широт
'вычисление арксинуса угла (Sqr(GSinLat + GSinLng * CosLat)
x = Sqr(GSinLat + GSinLng * CosLat)
Arcsin = Atn(x / Sqr(-x * x + 1))
'расчет дистанции
dist = (a + b) * Arcsin
MsgBox dist
End Sub
Как получить координаты смотрите здесь Автор - Валерьянка
Дата добавления - 12.02.2016 в 03:17
Правильно подобранное изображение может донести больше полезной информации, чем самая элегантная таблица. Очень эффектной является диаграмма типа спидометр, которая показывает текущее значение на некоторой ограниченной шкале. На этой диаграмме можно отображать, например, уровень KPI, выполнение плана, уровень обслуживания клиентов и другие показатели с ограниченным диапазоном изменения. Циферблат спидометра делится на зоны, стрелка показывает текущее состояние дел. Снизу можно добавить точное значение измеряемого показателя.
Такая диаграмма отлично встраивается в отчеты и дашборды, т.к. весьма информативна, не занимает много места и на вид красива. Однако этой диаграммы нет в стандартном наборе Excel (во всяком случае пока). Для ее построения, придется использовать доступные средства, скомбинировав кольцевую и круговую диаграммы, для шкалы и стрелки, соответственно.
Вначале об общем принципе. Шкала – это верхняя половина кольцевой диаграммы. Нижняя половина также есть, но она прозрачная. Стрелка – это контур видимого сектора круговой диаграммы. Там же есть еще два сектора, но они прозрачны. Местоположение стрелки определяет измеряемый показатель.
Теперь изучим, как сделать диаграмму-спидометр в Excel. Вначале подготовим данные для шкалы, для чего нужно задать 4 значения: величина нижней прозрачной части, красной, желтой и зеленой зоны (цвета и их количество, разумеется, можно выбирать самостоятельно). Т.к. прозрачная часть занимает половину диаграммы, то она должна быть равна сумме трех цветов. Для простоты пусть весь циферблат занимает 100 делений. Тогда красная зона (плохо) – 50, желтая (нормально) – 30 и зеленая (хорошо) – 20 (50+30+20=100). Чтобы получился полукруг, невидимая часть также должна быть равна 100.
Выделяем весь диапазон и создаем кольцевую диаграмму.
По умолчанию получится следующее.
В параметрах ряда делаем поворот на 90⁰.
Удаляем название и легенду.
Почти готово. Двойным нажатием заходим в каждый сектор и меняем цвет: нижний – прозрачный, остальные – красный, желтый и зеленый. Контур также убираем.
Получаем циферблат спидометра.
Теперь сделаем стрелку. Подготовим данные, по которым будут строится три сектора круговой диаграммы. Первый сектор – от нуля до стрелки (прозрачный), второй – стрелка, третий – оставшаяся часть круга (прозрачный).
На этот раз секторы должны быть подвижными и зависеть от измеряемого показателя. Результатом будет «отклонение стрелки» на соответствующую величину. Пусть показатель измеряется в процентах и его первоначальное значение равно 60%.
Как и с циферблатом, диапазон от 0 до 100% должен приходиться на верхний полукруг. Тогда весь круг – это 200%. Чтобы стрелка меняла свое положение, первый сектор (от которого строятся остальные) привяжем к значению измеряемого показателя. Стрелка имеет фиксированный размер, установим пока 2% (потом вообще уберем). Последний сектор – это разница между 200% и суммой первых двух секторов.
Теперь нужно добавить на имеющийся циферблат спидометра новый ряд данных, чтобы отобразить стрелку. Для этого нажимаем правой кнопкой мыши по диаграмме и в контекстном меню «Выбрать данные…».
Указываем источник данных (диапазон из трех значений) и ОК. Должно получиться примерно следующее.
Не нужно пугаться, вон тот оранжевый зародыш внизу – это будущая стрелка. Дело в том, что вместо нужной круговой диаграммы пока получилось второе кольцо. Поэтому в контекстном меню (через правую кнопку мыши) выбираем новый тип для этого ряда.
Меняем диаграмму на круговую.
Обязательно нужно выбрать вспомогательную ось, как на рисунке, иначе стрелка окажется под циферблатом. Осталось повернуть диаграмму на 270⁰ и сделать прозрачными ненужные секторы.
Не забываем убрать контуры секторов.
Чтобы стрелка была больше похожа на стрелку, а не на узкий кусочек пирога, зададим для нее вначале черный (или другой) контур, а затем ширину сектора вместо 2% сделаем 0%.
Сектор исчезнет, а контур превратится в черную линию.
Для более точного и отображения снизу можно добавить цифровое значение показателя. Это сделать очень просто. Вставим прямоугольник с закругленными углами.
Сделаем прозрачный фон, красный контур. Затем выделим полученную фигуру, поставим курсор в строку формул и сделаем ссылку на отображаемое значение.
Отформатируем, как нужно и получим окончательный вид спидометра.
Остался один нюанс. Дело в том, что, если значение выйдет за пределы от 0 до 100%, то стрелка окажется не известно где.
Примерно так рисуется «классический» спидометр.
Иногда диапазон возможных значений нельзя разделить четкими границам типа «плохо», «нормально», «хорошо». Четких границ может не быть, тогда потребуется плавный переход от одного цвета к другому. Например, когда в качестве результата получается некоторая вероятность (p-value, бинарная классификация и др.) или измеряется уровень дефицита запасов, где также нет четких границ и хотелось бы подчеркнуть их размытость. В этом случае для шкалы спидометра следует использовать градиентную заливку. В целом диаграмма строится также, но ее циферблат состоит из одного цвета, плавно переходящего в другой.
Сделать такую диаграмму также несложно. Отличие только в циферблате. В ролике ниже показана пошаговая инструкция, как в Excel сделать оба варианта спидометров.
Используйте диаграмму спидометр в Excel, чтобы удивить своих коллег, а также руководство. По кнопке ниже можно скачать файл с примерами.
Во времена Excel 2013 появилась возможность добавить надстройку Power Map, с помощью которой данные можно изобразить на географической карте. Этот прием не только расширяет возможности визуализации, но также позволяет анализировать данные, осуществляя поиск закономерностей, имеющих региональное происхождение.
В Excel 2016 Power Map вживлена в программу и называется 3D-карта (3D-map). Сразу к делу. Допустим, есть коммерческие данные о деятельности компании в нескольких европейских странах.
Исходные данные лучше хранить в виде Таблицы Excel, а не обычного диапазона. Это позволит автоматически подхватывать новые значения при их добавлении. Активируем любую ячейку и во вкладке Вставка нажимаем 3D-карта.
Открывается окно создания и редактирования 3д-карты.
В верхней части окна находится лента, состоящая из одной вкладки Главная. Здесь находятся команды добавления, удаления, редактирования. По мере разбора примера рассмотрим, как ими пользоваться.
Слева находится панель со сценами карт. Выглядит как Power Point. Оно так и есть. Можно нарисовать несколько карт или их представлений и, как в презентации, включить слайд-шоу с красивыми переходами.
Справа панель управления полями данных, по которым рисуется карта. Здесь, примерно, как в сводной таблице, можно добавлять поля в разные области карты, перетаскивать, настраивать агрегацию, фильтры.
В центре мы видим карту текущей сцены (у нас она пока только одна) со всеми действующим настройками. По умолчанию это глобус. По нему можно перемещаться, как в навигаторе. Для этого используется мышь и/или клавиатура. Справа внизу кнопки навигации.
Стрелками перемещаемся вправо/влево и меняем угол наклон карты (глобуса). Плюс/минус – это приближение/удаление карты.
При наезде появляются детали (дороги, реки). Однако внешний вид лучше настраивать по факту, когда данные уже нанесены на карту.
Добавление данных на 3D-карту
Для добавления данных предусмотрена панель справа.
Пойдем сверху вниз. На карте, как в фотошопе, можно использовать несколько слоев. Каждый слой показывает определенную информацию и настраивается независимо. Слой можно переименовать в более понятное название, чем Слой 1, Слой 2 и т.д. Например, первый слой – это Продажи, второй – Реклама. Слои можно скрывать, редактировать, удалять (см. пиктограммы справа от названия). Если нужно создать еще один слой, нажимаем Добавить слой.
Ниже в разделе Данные выбирается тип карты. Уровни значений могут отображаться в виде столбиков, столбиков с накоплением, столбиков рядом, пузырьков, тепловой и региональной карты.
Затем идут поля для заполнения карты.
Расположение. В этой области указывается поле с географическим признаком (геолокация). Excel всячески пытается нам помочь и сам выбирает столбец, где находится географический признак. Однако угадывает не всегда. Вот и в нашем примере выбран признак региона, хотя нужны страны.
Крестиком справа удаляем ненужное поле. Затем нажимаем Добавить поле и выбираем столбец со странами.
Для Excel важным является тип географической переменной. Это могут быть страны, города, адреса, координаты и др. В нашем простом примере Excel сам присвоил тип Страна/регион. Спасибо экселю за помощь, но иногда тип приходится указывать самостоятельно. Тогда открываем список (рядом с названием) и выбираем подходящий вариант.
Те названия, которые Excel распознал, сразу отмечаются на карте (если сам показатель еще не выбран, то в виде точек), а чуть выше области Расположение показан процент распознанных названий. В идеале должно быть 100% (см. скриншот выше), но может быть и меньше (так часто бывает, если название написано с ошибкой, если это адрес, малый город, деревня). Можно нажать на процент и посмотреть, какие названия эксель не понимает. Если необходимо, исправьте названия и затем нажмите Обновить данные.
Имейте ввиду, что даже при индикаторе 100% эксель не всегда правильно определяет точку на карте. Это связано с дублированием наименований. Например, город Курчатов есть в России и Казахстане. Поэтому следует визуально проконтролировать, чтобы Excel не закинул вас на другой конец карты. Если это произошло, добавьте в исходные данные (и на карту) еще один столбец, который указывает принадлежность города (улицы и т.д.) к более крупному региону (области, стране). Не забудьте затем обновить 3D-карту.
В нашем примере все страны распознались на 100%, что сразу показывается на карте – это столбцы с нулевой высотой.
Итак, на местности сориентировались. Переходим к данным для визуализации.
Высота. В этой области выбирается показатель, который нужно отразить на карте (или несколько). Выберем продажи.
Т.к. по умолчанию в качестве типа выбрана гистограмма (с накоплением), то на карте (глобусе) появятся столбцы.
Выглядит очень круто, но ужасно с точки зрения наглядности. Вообще говоря, любая 3d-гистограмма – это зло, т.к. она искажает реальные пропорции. Тем более, если смотреть сверху. Если вдруг вам нужны именно вертикальные столбики, то хотя бы измените угол обзора.
Ненамного лучше, но пока оставим так.
Исходные данные не всегда представлены в виде компактной (сведенной) таблицы. Источником может быть и база данных, где каждая строка отражает сделку и, соответственно, многие признаки повторяются, в том числе и географический. В этом случае значения нужно агрегировать определенным способом. Как правило, используется суммирование. Задается в выпадающем списке около названия (как в сводной таблице).
Другими словами, все значения выбранного показателя, соответствующие определенной стране, суммируются, а результат показывается на карте. Как видно, можно агрегировать, рассчитывая среднее, минимум, количество и др. Скажем, у вас карта города, где показаны цены на недвижимость. Нужно отразить минимальную цену в некотором районе. Это можно сделать прямо из исходных данных, не прибегая к дополнительным расчетам.
Категория. Довольно часто данные разбиваются на группы. В нашем примере весь рынок сбыта разделен на две части: Восток и Запад и показан в столбце Регион. Выберем данное поле в качестве категории.
Столбики перекрасятся в соответствии с группировочным признаком.
В области Категория можно поместить только одно поле.
Время. Сюда помещают столбец, отражающий время, чтобы показать изменение данных в динамике. В нашем примере их нет.
Фильтры. Используется для фильтрации данных по некоторому полю (см. видеоролик ниже).
Параметры слоя. Здесь меняются настройки отображения. Например, для столбиков можно задать высоту, толщину, цвет, прозрачность. Также показывать ли нули и отрицательные значения. Будьте осторожны с внесением изменений – на 3D-карте нет команды отмены последнего действия, т.е. Ctrl + Z не работает.
Настройки внешнего вида 3D-карты
Итак, с данными определись, однако выглядят они по умолчанию не очень хорошо. Нужно сделать их более наглядными. Универсальных правил здесь, конечно, нет, т.к. наглядность зависит от самих данных и того, что вы хотите в них показать. Однако рассмотрим основные настройки.
Глобус выглядит красиво, но плоская карта все же понятней. Для замены глобуса на карту используйте кнопку Плоская карта.
После ее нажатия, глобус развернется в обычную карту. Немного поправим масштаб и угол обзора.
Следующий момент – это подписи. На ленте есть специальная кнопка.
На карте появляются названия.
К сожалению, регулировать подписи нельзя. Они сами добавляются в соответствии с масштабом. Поэтому следует осторожно пользоваться этой опцией.
Можно еще выбрать тему карты. Например, сделать как будто это снимок со спутника или просто поменять цветовую палитру.
Однако это лишь регулировка внешнего вида карты. Перейдем к типам визуализации. Их несколько.
Как и в обычной гистограмме, для каждой категории (страны) можно отразить несколько показателей. Добавим в область Высота данные о затратах на рекламу. Однако перед этим придется очистить область Категория, т.к. категории можно применить только для одного показателя в области Высота.
Т.к. используется гистограмма с накоплением, то два показателя просто сложились, что нам не подходит. Поэтому выберем гистограмму с группировкой.
Получим следующий вид.
Красиво, но не очень понятно. Как вариант, на карту можно вывести плоскую диаграмму.
В настройках выбирается нужный тип: вертикальная, горизонтальная, с накоплением и рядом.
Диаграмма помещается прямо на карте.
Следующая визуализация – пузырьковая диаграмма. Диаметр кружка соответствует значению показателя.
Но при этом, т.к. у нас два показателя, видно соотношение между продажами и рекламой. Кстати, столбцов больше нет, карту можно повернуть под прямым углом (смотреть строго сверху). Цвета можно поменять в параметрах слоя (внизу в правой панели).
Тепловая карта отражает только один показатель, поэтому реклама исчезает автоматически. Чем больше красного, тем теплее и, соответственно, выше показатель.
Последний вариант – региональная карта. Наверное, самая подходящая для одного показателя по странам (или другим регионам). Здесь все понятно и просто. Чем темнее цвет, тем больше значение.
Цвет можно изменить в параметрах слоя. Когда-то я весь интернет облазил, чтобы нарисовать что-то подобное. Сегодня это делается за 5,6 секунды, возможно, быстрее.
Слои карты
Слои используются для совмещения разнородных типов визуализации. Скажем, нужно одновременно показать столбики по одному показателю и тепловую карту по другому. На одном слое это сделать невозможно. На разных – легко.
Назовем имеющийся слой Продажи и создадим новый Реклама.
В новом слое визуализируем затраты на рекламу, сделав их столбиками.
Теперь интенсивность заливки контура страны показывает продажи, высота столбика – затраты на рекламу. Можно добавить легенду.
Разумным будет акцентировать внимание на нужном регионе с помощью примечания. Правой кнопкой кликаем по элементу и вносим пояснение.
К сожалению, построение 3д-карты происходит в отдельном окне, ее нельзя поместить на лист Excel. Но если вам нужно отобразить карту именно на листе эксель или в power point, сделайте скриншот с помощью вот этого фотоаппарата на ленте.
Естественно, что связки с данными больше нет. Зато есть красивый рисунок. А данные легко обновить и снова вставить картинку.
Создание обзора
В 3D-карте можно создать обзор нескольких карт. Получится что-то похожее на Power Point, где с помощью слайдов (сцен) создается презентация (обзор).
Даже на нашей небольшой карте информации довольно много и без комментариев она не воспринимается. Хорошо бы по очереди показать отдельные показатели по странам. Можно конечно, построить много карт и просто менять картинки в презентации, рассказывая о том, на что обратить внимание, а можно сделать слайдшоу с эффектом полета над картой.
Итак, стоит задача отобразить данные по продажам и рекламе. Сделаем слайд-шоу. Вначале покажем продажи, затем добавим расходы на рекламу. Далее акцентируем внимание на отдельные страны. И в конце снова покажем весь рынок сбыта, но уже под прямым углом, заменив столбики рекламы на пузырьки. Таков полет нашей режиссерской мысли.
Вначале создадим те карты (сцены), которые, собственно, нужны. Первая карта – только продажи. Вторая – добавляем столбики рекламы (с измененным углом обзора карты). Далее перемещение по странам. Последняя – общий обзор, прямой угол обзора, замена столбиков пузырьками.
Чтобы переходы были плавными, сцены следует рисовать не с нуля, а копировать предыдущие (или следующие) и вносить в них изменения. Сразу настроим параметры сцены, чтобы и они также копировались.
Уменьшим длительность одной сцены до 3 секунд, длительность перехода – 2 секунды, и эффект перехода – Перелет. Вам же я рекомендую самостоятельно поэкспериментировать, чтобы добиться требуемого результата.
Теперь создадим новые сцены с помощью копирования.
Внесем изменения, расположив их в нужной последовательности на панели обзора. Кстати, сам обзор и сцены можно также переименовать, ну да ладно. У меня получилось примерно так.
Для того, чтобы посмотреть обзор, как презентацию, нажимаем на кнопку Воспроизвести обзор.
Воспроизведение обзора может несколько подтормаживать. Этот инструмент отнимает много ресурсов. Да и показать можно не на каждом компьютере (не у всех же стоит Excel последней версии). Поэтому данную презентацию можно записать в формате mp4.
В следующем окне выбираем разрешение (берите максимум) и, если надо, накладываем музыку из заранее заготовленного файла.
После обработки получим файл mp4. Теперь этот видеофайл можно залить на Youtube, Яндекс.диск или вставить в презентацию (что получилось, смотрите в видеуроке ниже).
Конечно, чтобы сделать красивую карту и обзор, придется немного постараться. Я лишь показал, как работать с 3D-картами в Excel. Так что дальше дело за вашим пониманием данных, идеей, как их отразить на карте и творческой мыслью при создании обзора.
Чтобы узнать о других возможностях 3D-карты (изображение адресов, динамика показателей и др.), а также изучить множество других инструментов Excel, приглашаю на мой онлайн курс «Продвинутый уровень Excel».
Обращаем Ваше внимание, что в соответствии с Федеральным законом N 273-ФЗ «Об образовании в Российской Федерации» в организациях, осуществляющих образовательную деятельность, организовывается обучение и воспитание обучающихся с ОВЗ как совместно с другими обучающимися, так и в отдельных классах или группах.
Рабочие листы и материалы для учителей и воспитателей
Более 2 500 дидактических материалов для школьного и домашнего обучения
Столичный центр образовательных технологий г. Москва
Получите квалификацию учитель математики за 2 месяца
от 3 170 руб. 1900 руб.
Количество часов 300 ч. / 600 ч.
Успеть записаться со скидкой
Форма обучения дистанционная
- Онлайн
формат - Диплом
гособразца - Помощь в трудоустройстве
Видеолекции для
профессионалов
- Свидетельства для портфолио
- Вечный доступ за 120 рублей
- 311 видеолекции для каждого
Расчёт расхода бензина в таблицах EXCEL
Цель работы: Учащиеся н аучатся: вводить данные, редактировать и форматировать данные, оформлять в виде таблицы, и зменять ширину и высоту ячейки, выравнивать, редактировать и форматировать ячейки, создавать границы и заливку ячеек, производить вычисления в таблицах, освоить автосуммирование, копирование формул и организацию адресных ссылок.
Порядок работы:
Открыть книгу Excel одним из способов:
1 способ Пуск, Программы, Microsoft Excel , Файл, Отрыть, устанавливаем в окне Папка Личную папку, выделяем одну из рабочих книг и нажимаем клавишу Открыть, переходим на чистый лист
2-способ Мой компьютер, Личная папка, Выделить один из файлов Ex с el , нажать клавишу Открыть и перейти на чистый лист.
Переименовать листы таблицы как Табл7, Табл8, Табл9. Для этого:
поставить указатель мыши на наименование листа;
вызвать контекстное меню щёлкнув правой клавишей мыши;
удаляем старую надпись;
Выполните названия и шапки таблиц с учётом действующего стандарта. При этом нужно пользоваться пунктом меню Формат, вкладкой Выравнивание. Например, для Табл7:
Выделить блок А1:Е1, нажать клавишу “Объединить и поместить в центре” на панели Главная
Поставить указатель мышки между обозначениями 1 и 2 строк так, чтобы он изменился в двунаправленную черную стрелку, нажать левую клавишу мыши и протащить её до нужной для заголовка ширины строки.
Так же увеличить ширину столбцов A , B , C , D , E и строки 2.
Выделить блок А1:Е2.
Выполнить команду: Формат, Ячейки, выбираем вкладку Выравнивание и устанавливаем флажки (по горизонтали - по центру, по вертикали тоже - по центру, переносить по словам), Ок.
Заносим название таблицы в ячейку A 1
Заносим названия граф в ячейки A 2, B 2, C 2, D 2, E 2 соответственно.
Заполняем таблицы с учётом того, что приведённые в таблицах величины, являются исходными, остальные графы – производными:
Табл7 Годовая потребность в топливе = Норма расхода * Суммарное планируемое время
Табл8 Планируемая потребность в дизельном топливе - берём из Табл7 с помощью ссылки
Сезонная потребность в бензине = Норма бензина * Планируемая потребность / 100
Табл9 Планируемая потребность в дизельном топливе - берём из Табл7 с помощью ссылки
Потребность в смазочных материалах = Норма * Планируемую потребность в дизельном топливе / 100
Сохраняем книгу в Личной папке. Выходим из Excel .
Оформляем отчёт. В отчёте должны быть приведены таблицы с указанием формул и ссылок. Чтобы в таблицах вместо результатов высвечивались формулы необходимо выполнить команду Формулы, Отобразить формулы.
Читайте также: