Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » e_artem
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 5 6 След.
Excel & VBA WinHttpRequest POST & GET т.д.
 
#
28.11.2024 12:47:05
большое спасибо, я попробую и напишу, если без браузера, то это будет вообще замечательно.


попробовал - не работает
Изменено: e_artem - 28.11.2024 13:02:21
 
Перейти    
Excel & VBA WinHttpRequest POST & GET т.д.
 
#
28.11.2024 11:40:00
Привет.
Переделываю скрэпинг с www.rp5.ru сайта, так как ранее работало, теперь (видимо с обновлением сайта) перестало.
Как это ранее работало на vba
1) Создаю
  CreateObject("InternetExplorer.Application")
2) Через метод navigate гружу нужную страницу (например https://rp5.ru/Weather_archive_in_Yeysk)
3) На странице программно (через VBA (через GetElementsByClassName и/или GetElementById)) перехожу на вкладку Download weather archive, настраиваю Date Range, выбираю all days, формат Excel и далее нажимаю кнопку Select to file GZ (archive) и правее кнопки получаю прямую ссылку для скачивания, далее дело техники
4) Ранее вот этот кусок кода, нажимающий кнопку
Код
        For Each Obj In IE.Document.getElementsByClassName("inner")
          If Obj.innertext Like "Select to file GZ*" Then
            ...
            Obj.Click
            ...
          End If
        Next
работал и не вызывал никаких вопросов, я получал ссылку для скачивания, а теперь не работает. Получаю ошибку Error #FS000.
Может кто помочь как правильно на VBA нажать кнопку Select to file GZ (archive)?
P.S.
Пробую сейчас реализовать нажатие через
Код
     winHttpReq.Open "POST", "https://rp5.ru/responses/reFileSynop.php", False
но пока безрезультатно.

Заранее большое спасибо за помощь и/или любые идеи.
Изменено: e_artem - 28.11.2024 11:43:13
 
Перейти    
Как скрестить ужа (VBA) с ежом (Cloudera Hadoop)
 
#
09.09.2021 11:57:11
Добрый день
Есть задача подружить VBA с Cloudera Hadoop. В идеале должна получиться такая парочка как MS Office (Excel/Access) в качестве фронт енда и Cloudera Hadoop в качестве бак енда и все это должно работать спомощью VBA. Поделитесь пожалуйста опытом/мыслями/ссылками, кто уже делал что-то подобное.
Заранее спасибо
 
Перейти    
Как c помощью VBA получить прямую ссылку для скачивания из сети
 
#
15.07.2021 17:11:20
Добрый день.
Задача в двух штрихах состоит в сборе данных из сети и складиваниии в БД с реализацией на VBA.
Ранее все работало, но как изменилась версия сайта, работать перестало.
Итак сам сайт https://data.tuik.gov.tr/Kategori/GetKategori?p=Agriculture-111
далее согласно рисунка я перехожу на нужную страницу (зеленые прямоугольники) и скачиваю файл,
дальше дело техники.

Для получения прямой сылки я использую следующую конструкцию (имитирующую пользовательскую активность/нажатия)
Код
...
IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.Navigate URL
While IE.ReadyState <> 4: Sleep 100: Wend
...
IE.Document.getElementsByClassName ...
...
IE.Document.getElementsByClassName("btn btn-outline-primary")(0).Click
...
и я добирался до нужной мне прямой ссылки для скачивания.
Видимо текущая версия сайта не работоспособна на Internet Explorer, так как при "переходе" в конкретный пресс релиз Internet Explorer не отрабатывает и уходит в "бесконечные часы".
Есть у кого какие либо идеи (с помощью Chrome, JS, ...) как иначе можно получить эту прямую ссылку (Table-1)?
Заранее спс.
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
26.05.2021 20:00:16
Я решил читать построчно, может и чуть медленее, чем частями как у вас реализованно, зато практичнее imho.
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
26.05.2021 09:22:12
Большое спасибо, метод рабочий... правда при обработке фалов ~150 МБ система конечно подвисает, подумаю, как сделать так, чтобы подвисшая система не вводила в ступор пользователей.

P.S.
При больших файлах (>100Mb) я не дожидался результата
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
25.05.2021 18:01:31
Пожалуйста, врагмент файла
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
25.05.2021 12:13:39
На разных машиных в зависимости от настроек согласно картинке загрузка происходит по разному. Согласно скрина загружает не верно, если в настройках стоит например Germany или France, то загрузка выполняется верно. Подскажите как можно на VBA именно в этой задаче конвертировать текст в процессе обработки исходя из Current language for non-Unicode programs: = Germany?
Скрытый текст

В качестве (временного) решения пока сделал так
Код
Replace(Replace(Replace(Replace(tmpline, ChrW(1100), "ue"), ChrW(1094), "oe"), ChrW(1076), "ae"), ChrW(1071), "ss")
, Может быть кто-сможет предложить более быстрый и красивый способ?
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
24.05.2021 22:00:13
В догонку к предыдущему:
Если содержимое TSQL инсерта просмотреть и в Immediate окне и далее скопировать и вставить в MS SQL Management Studio, то получится
Код
DECLARE @PK INT=(SELECT TOP 1 ID FROM DWDItemList WHERE ItemCode='Sttns');INSERT INTO DWDItemList (ItemType,Parent_ID,ItemCode,ItemName,ItemNum,ItemNote,ItemRaw)
VALUES
(1,@PK,'00003',N'Aachen',00003,'50.7827:6.0941:202|27.02.2011',N'56:Vennvorland|5610:Aachener Hügelland|Nordrhein-Westfalen'),
(1,@PK,'00164',N'Angermünde',00164,'53.0316:13.9908:54|',N'74:Rückland der Mecklenburgischen Seenplatte|7440:Uckermärkisches Hügelland (mit Uecker- und Randowtal)|Brandenburg')
и в результате данные вставятся корректно, но если этот инсерт выполнить на ADODB.Connection.Execute в VBA, то специфичные немецкие символы в БД вставятся неверно.
 
Перейти    
Как правильно прочитать и обработать данные на немецком языке
 
#
24.05.2021 21:50:07
Добрый вечер.
Есть задача затолкать содержимое вот этого файла (и подобные этому)
https://opendata.dwd.de/climate_environment/CDC/help/PH_Beschreibung_Phaenologie_­Stationen_Jahresmel...
с помощью VBA в БД MS SQL.
Сейчас это работает по следующему принципу:
1) построчно читается скачанный файл в строковую переменную
Код
        Open WFile For Input As #1
          While Not EOF(1)
            Line Input #1, tmpline
            ....
2) Далее разбирается строковая переменная и формируется множественный TSQL инсерт, который далее выполняется методом Execute объекта ADODB.Connection
3) Данные ложатся в БД, но не так как надо, а именно специфичные немецкие символы типа "ü" заменяются на "ь" например "Aachener Hügelland" в БД выглядит вот так "Aachener Hьgelland".
Я понимаю, что проблема на стороне VBA между чтением файла и записью в БД, но как поправить что-то не соображу, заранее спасибо за помощь?

P.S. В договку, чтобы избежать лишних вопросов:
  - поля в БД типа NVARCHAR
  - в TSQL инсерте стоит N' где нужно для вставки данных в NVARCHAR поля
Изменено: e_artem - 25.05.2021 10:17:10
 
Перейти    
Слетает Ribbon в Excel файле
 
#
21.07.2020 18:28:45
Добрый лень...
Есть Excel файл (xlsb), который располагается на Share Point, с ним регулярно (ежедневно) работают несколько (3-5) пользователей, кто из офисной сети (хорошая сеть), кто удаленно из дома (я подозреваю, что на не очень хорошем интернете. Данный файл содержит макросы и CustomUI секцию в виде Ribbon'ов, через которые запускаются эти макросы. Так вот иногда (раз-два раза в неделю) CustomUI (Ribbon'ы) слетают (исчезают) из файла причем customUI14.xml из Excel файла исчезает напрочь, а все остальное данные и макросы остаются на месте. Пользоватеть работает нормально закрывает с сохранением файл и при следующем открытии у него нет кастомного Ribbon'а. Лечится только восстановление резервной копии. До короновируса, пока все сидели в офисе подобных проблем не было вообще. Соответственно, я интуитивно грешу на качество интернета у тех, кто работает из дома. Кто-нибудь уже сталкивался с подобным, каковы могут быть причины и, соответственно, какие могут быть решения?
Заранее спасибо, Арт
 
Перейти    
Вытащить значения из таблицы в формате pdf
 
#
11.07.2020 23:03:37
В своей работе для чтения данных из pdf я пользуюсь утилитой xpdf. Но если в вашем pdf  изображение (скан), то вам надо смотреть в сторону ocr систем и пытаться сдружить их (ocr) с помощью vba. Практического опыта связки ocr + vba у меня нет, поэтому не подскажу больше...
 
Перейти    
Проблемы с кодировкой в Excel
 
#
26.06.2020 09:55:44
Выполнил настройки согласно ссылке https://remontka.pro/fix-cyrillic-windows-10/, и вопрос разрешился...
 
Перейти    
Проблемы с кодировкой в Excel
 
#
25.06.2020 21:30:03
У меня нет возможности выбора, прийдется работать с тем что дали...
Завтра проверю настройки согласно ссылки и отпишу, работает или нет...
Изменено: e_artem - 25.06.2020 22:21:46
 
Перейти    
Проблемы с кодировкой в Excel
 
#
25.06.2020 21:18:02
Кажется решение здесь https://remontka.pro/fix-cyrillic-windows-10/
 
Перейти    
Проблемы с кодировкой в Excel
 
#
25.06.2020 20:24:02
Добрый вечер....
Долгое время работал на одной машине WIN7+MS Office 365 x86, пришлось сменить на WIN10+MS Office 365 x64.

Раньше все было нормально теперь не могу понять, где нужно подкрутить настройки.
Итак фрагмент кода, который пыполняется со стороны MS Access и который отрабатывает не верно
Код
        MSE.ActiveSheet.cells(1, 20).FormulaR1C1 = "=MATCH(""*Республикасы*"",C1,0)-1"
в результате в Excel в соответствующей ячейке получается вот такая вот формула

=MATCH("*Ðåñïóáëèêàñû*";$A:$A;0)-1

Я не могу сообразить, как и где подкрутить в настройках или WIN или MS Office или ...?
Заранее спасибо
 
Перейти    
Вычислить/получить прямой URL для дальнейшего скачивания и разбора файла на VBA
 
#
02.06.2020 13:10:06
Андрей Лящук, Спасибо, вроде ничего сложного но познавательно (лично для меня).
 
Перейти    
Вычислить/получить прямой URL для дальнейшего скачивания и разбора файла на VBA
 
#
02.06.2020 12:27:33
По вкладке Network и истории все понятно, нашел, спасибо.
Андрей Лящук, подскажите принцип работы вашей ссылки/запроса, откуда вы эту ссылку взяли или сами написали?
P.S.
Интересуюсь на будущее так как 100% еще прийдется решать в будущем задачи подобные этой и поэтому мне хотелось бы понять принцип в общем.
 
Перейти    
Вычислить/получить прямой URL для дальнейшего скачивания и разбора файла на VBA
 
#
02.06.2020 11:13:48
Олег, в вашем последнем сообщении картинка не загружается
 
Перейти    
Вычислить/получить прямой URL для дальнейшего скачивания и разбора файла на VBA
 
#
02.06.2020 10:48:28
Дело в том, что я еще до того как написать в форум посмотрел через F12, но так и не разобрался. Можете или скриншотом или как-то иначе показать/объяснить как и с помощью чего вы получили ссылку?
 
Перейти    
Вычислить/получить прямой URL для дальнейшего скачивания и разбора файла на VBA
 
#
01.06.2020 14:51:08
Добрый день. Нужна ваша помощь по следующему вопросу.
1) Есть интернет ресурс https://cereobs.franceagrimer.fr/cereobs-sp/#/publications
2)  Ддалее в этом ресурсе двигаемся по следующему пути Stades de développement и далее Blé tendre -> Épiaison -> XLS
3) Вот собственно информация из этого Excel файла и необходимо собирать с определенной регулярностью

Я вижу здесь следующие этапы решения задачи
1) Вычислить/найти прямой URL
2) Скачать этот файил
3) Распарсить уже локально и и разложить по полочкам в БД

Я пока застрял на этапе 1. Я понимаю, что этот этап не совсем относится в Excel, но если у кого есть подобный опыт я буду раз если поделитесь, как можно выловить прямую ссылку? Я пробовал использовать Fiddler2, но у меня не особо ничего не получилось, возможно я не умею им пользозваться.

Заранее, спасибо
 
Перейти    
Как получить GPS координаты (широта, долгота) со встроенного сенсора GPS/GLONAS на VBA
 
#
30.10.2019 15:36:38
спасибо, я еще не все представленные выше ссылки пролистал
 
Перейти    
Как получить GPS координаты (широта, долгота) со встроенного сенсора GPS/GLONAS на VBA
 
#
30.10.2019 15:20:07
Всем ответившим спасибо.
1) Почему именно в VBA - потому что далее работать с полученными координатами прийдется в MS Office (в Excel в частности), хотя я понимаю, что в основном дело в драйвере GPS и всем, что с этим близко связано
2) Почитаю мануал по ссылкам
3) В качестве костыля - можно попробовать пользователя напрячь делать фотки и потом пробовать из них читать координаты
4) Поищу так же готовые примеры на JS, может быть получится интегрировать JS код в VBA через обертывание в wsc и объект GetObject
 
Перейти    
Как получить GPS координаты (широта, долгота) со встроенного сенсора GPS/GLONAS на VBA
 
#
30.10.2019 12:53:06
Добрый день.
Может быть кто-то уже решал подобный вопрос или есть какие-либо идеи для следующей задачи, которая стоит предо мной.

Есть Win устройство c MS Office со встроенным GSP датчиком.
Как можно и можно ли вообще считать GPS координаты из этого датчика с помощью VBA?

Заранее спасибо!
 
Перейти    
Как на VBA узнать, что использует Excel (запятую или точку в запятой) в синтасисе для разедения параметров функций рабочего листа
 
#
04.07.2019 09:18:06
спасибо
 
Перейти    
Как на VBA узнать, что использует Excel (запятую или точку в запятой) в синтасисе для разедения параметров функций рабочего листа
 
#
27.06.2019 12:30:02
Добрый день.
Подскажите как программно (с помощью VBA) узнать, какой разлелитель в синтаксисе написания функций рабочего листа использует Excel?
У меня возникает ошибка в этой строке кода (условное форматирование с формулой)
Код
          .FormatConditions.Add Type:=xlExpression, Formula1:="=AND(ROW()=COLUMN();RC=0;ROW()>=5)": .FormatConditions(.FormatConditions.Count).SetFirstPriority
Т.е. на том экземпляре Excel, где в качестве разделителя параметров функций рабочего листа используется точка с запятой - код отрабатывает без ошибок, там же, где запятая - ошибка.
Заранее Спасибо, Арт
 
Перейти    
Формула суммирования диапазона по нескольким условиям только по элементам c MAX уровнем вложенности
 
#
23.04.2019 16:28:31
Цитата
в 4 строке 9 столбца указан владимир ID -11, PARENT_ID - 8 тоже для владимира  дак откуда по 9 столбцу у него возьмется 33 ели это значение относится к новгороду
Родитель для Владимира ЦФО
 
Перейти    
Формула суммирования диапазона по нескольким условиям только по элементам c MAX уровнем вложенности
 
#
23.04.2019 16:20:09
Цитата
Зачем считать для Воронежа то что ниже?
это страница ввода данных в БД (назовем условно лист матрицы потоков) своего рода фронт енд
юзер хочет выравнивать балансы регионов потоками на 0 перед записью матрицы в БД  
Изменено: e_artem - 23.04.2019 16:22:40
 
Перейти    
Формула суммирования диапазона по нескольким условиям только по элементам c MAX уровнем вложенности
 
#
23.04.2019 16:07:49
Цитата
вообще ни че не понятно по русски объясните что хотите
Необходимо найти сумму по каждому столбцу
1) по диапазону каждого столбца от первой ячейки ниже диагонали и далее (чтобы строка была > столбца)
2) только по регионам, без сумм по федеральным округам (чтобы не было задвоений)

Т.е. Например для 9ого стобца эта сумма будет равняться 33
Изменено: e_artem - 23.04.2019 16:09:32
 
Перейти    
Формула суммирования диапазона по нескольким условиям только по элементам c MAX уровнем вложенности
 
#
23.04.2019 15:47:14
Добрый день
Нужна ваша помощь в написании формулы, чего-то не соображает голова сегодня, а вопрос для меня горящий...
Формула, которая мне нужна находится в строке 3, она частично написана, но мне необходимы немного более сложные вычисления.

Я сделал: Balance +/- Сумму по региону (столбцу) НИЖЕ ДИАГОНАЛИ,
но эту "Сумму по региону (столбцу)" необходимо очистить от задвоений, которые получаются в ячейках с Федеральными округами???

ID и PARENT_ID это иерархия, которая может быть использована для "Очистки"

Заранее Спасибо, Арт
 
Перейти    
Страницы: 1 2 3 4 5 6 След.
Наверх