Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Добавление текущей даты в запрос Power Query - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Добавление текущей даты в запрос Power Query (Формулы/Formulas)
Добавление текущей даты в запрос Power Query
VMax Дата: Суббота, 12.01.2019, 19:25 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день.
Прошу помочь с решением. Необходимо в запросе вместо даты (тут для примера - 2019-01-13) вставлять текущую дату.
Пробовал различные варианты но ошибка с синтаксисом. Наверняка кто нибудь уже решил подобную задачу.

Пример запроса:

let
Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&date=2019-01-13")),
#"Преобразовано в таблицу" = Record.ToTable(Источник),
.....
in
 
Ответить
СообщениеДобрый день.
Прошу помочь с решением. Необходимо в запросе вместо даты (тут для примера - 2019-01-13) вставлять текущую дату.
Пробовал различные варианты но ошибка с синтаксисом. Наверняка кто нибудь уже решил подобную задачу.

Пример запроса:

let
Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&date=2019-01-13")),
#"Преобразовано в таблицу" = Record.ToTable(Источник),
.....
in

Автор - VMax
Дата добавления - 12.01.2019 в 19:25
krosav4ig Дата: Суббота, 12.01.2019, 19:43 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация: 989 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Добрый день.
Как-то так, если память не подводит
[vba]
Код
Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&" & DateTime.ToText(DateTime.Date(DateTime.LocalNow),"yyyy-MM-dd"))),
[/vba]


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Суббота, 12.01.2019, 19:44
 
Ответить
СообщениеДобрый день.
Как-то так, если память не подводит
[vba]
Код
Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&" & DateTime.ToText(DateTime.Date(DateTime.LocalNow),"yyyy-MM-dd"))),
[/vba]

Автор - krosav4ig
Дата добавления - 12.01.2019 в 19:43
VMax Дата: Понедельник, 14.01.2019, 00:25 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Благодарю Вас за указанное направление. После небольшой корректировки задача решена. Вот верный запрос

Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&date=" & Date.ToText(DateTime.Date(DateTime.LocalNow()), "yyyy-MM-dd"))),


Сообщение отредактировал VMax - Понедельник, 14.01.2019, 01:24
 
Ответить
СообщениеБлагодарю Вас за указанное направление. После небольшой корректировки задача решена. Вот верный запрос

Источник = Json.Document(Web.Contents("https://api.rasp.yandex.net/v3.0/schedule/?apikey=хххххххх-хххх-хххх-хххх-хххххххххххх&station=s9610483&date=" & Date.ToText(DateTime.Date(DateTime.LocalNow()), "yyyy-MM-dd"))),

Автор - VMax
Дата добавления - 14.01.2019 в 00:25
VMax Дата: Понедельник, 14.01.2019, 00:27 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
krosav4ig, Спасибо


Сообщение отредактировал VMax - Понедельник, 14.01.2019, 01:26
 
Ответить
Сообщениеkrosav4ig, Спасибо

Автор - VMax
Дата добавления - 14.01.2019 в 00:27
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Добавление текущей даты в запрос Power Query (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!