Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.07.2013, 14:52   #1
vunka
 
Регистрация: 24.07.2013
Сообщений: 6
По умолчанию Веб-запрос для экспорта нескольких таблиц с сайта

Здравствуйте, помогите пожалуйста в веб-запросе для экспорта данных со страниц официального сайта Минфин:
- для аудиторов = http://www1.minfin.ru/ru/accounting/...udit/auditors/
- для аудиторских организаций = http://www1.minfin.ru/ru/accounting/...t/auditor_org/.

Сложность заключается в том, что эти данные раньше Минфином выкладывались в экселевском файле, теперь вот в таком постраничном режиме с пересщелкиванием. Возможно ли осуществить экспорт отображаемых (те данные, что расскрываются при нажатии на каждое поле НЕ НУЖНЫ, по большому счету) на странице данных в упорядоченную таблицу в excel (пускай даже и с повторам шапки, её можно будет потом вручную удалить).

При создании веб-запроса в файл с расширением ".iqy" просписываются следующие параметры запроса:

WEB
1
http://www1.minfin.ru/ru....from4=1

Selection=10
Formatting=All
PreFormattedTextToColumns=True
ConsecutiveDelimitersAsOne=True
SingleBlockTextImport=True
DisableDateRecognition=False
DisableRedirections=False

Может быть здесь сделать значение "1" переменным или как-то задать диапозон просматриваемых страниц, чтобы запрос выполнялся со всех таблиц однотипных таблиц. Если создать много запросов, просто их получится слишком много,... Помогите пожалуйста реализовать эту задачу или хотя бы скажите на Вашем сайте могу ли я найти ответ, т.к. я не смог найти подходящей конструкции для решения моего вопроса.
vunka вне форума Ответить с цитированием
Старый 24.07.2013, 16:02   #2
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Можно таким способом получить данные
Вложения
Тип файла: zip minfin_ru.zip (20.0 Кб, 32 просмотров)
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 24.07.2013, 16:10   #3
vunka
 
Регистрация: 24.07.2013
Сообщений: 6
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Можно таким способом получить данные
Вы просто меня спасли (почти). Мне никто не может помочь (или не хотят). Я так понимаю, что это вариант на сбор с 10 страниц для аудиторских организаций. Скажите мне пожалуйста, что надо мне поменять, чтобы все собрать, а пустые строки и дубли шапок я удалю сам )))
vunka вне форума Ответить с цитированием
Старый 24.07.2013, 16:53   #4
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию



Код:
  For n = 1 To 10

Вместо 10 поставте номер последней страницы
Вместо 1 поставте номер стартовой страницы
Если все,то строка будет выглядеть
Код:
  For n = 1 To 482
Можете порциями брать
Код:
  For n = 100 To 200
Анализ,обработка данных Недорого

Последний раз редактировалось doober; 24.07.2013 в 16:55.
doober вне форума Ответить с цитированием
Старый 24.07.2013, 17:07   #5
vunka
 
Регистрация: 24.07.2013
Сообщений: 6
По умолчанию

Не смущайтесь, правда, я очень Вам благодарен, у меня нет возможности заказывать программные продукты и макросы, а тут Вы откликнулись. Я думаю Вам и самому стало интересно.
Понял. Спасибо. А на счет аудиторов, я так понял, меняю просто в строке URL?

Да, мне откликнулся по моему запросу еще один товарищ на другом форуме, сделал для аудиторов и сразу удаляются пустые строки и шапка прописывается, правда ждать приходится, т.к. данных много. Я думаю и Вам будет интересно для личного опыта. Кидаю ссылку http://www.planetaexcel.ru/forum/ind...49911#postform

Если будут какие другие варианты разрешения данного вопроса, я буду только рад.
vunka вне форума Ответить с цитированием
Старый 24.07.2013, 17:09   #6
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Цитата:
Я думаю Вам и самому стало интересно
Нет,парсеры уже достали.

У меня пошустрее вариант
24 страницы меньше минуты против 5,я не по классике решил вопрос.
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 24.07.2013, 17:16   #7
vunka
 
Регистрация: 24.07.2013
Сообщений: 6
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Нет,парсеры уже достали.

У меня пошустрее вариант
24 страницы меньше минуты против 5,я не по классике решил вопрос.
Именно в этом и заключается Ваш большой плюс, что быстрее работает, а проблема пустых строк и повторяющихся шапок - пустяк. Еще раз огромное спасибо. Если не возражаете, то я обращусь к Вам при возникновении вопросов?
vunka вне форума Ответить с цитированием
Старый 24.07.2013, 17:17   #8
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Контакты в профиле,мыло там есть.
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 25.07.2013, 12:56   #9
vunka
 
Регистрация: 24.07.2013
Сообщений: 6
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Можно таким способом получить данные
Подскажите пожалуйста как быстро перевести экспоненциальные значения в числовые без всяких + и Е ? После повторного ввода значения, если ячейка в текстовом формате, число выходит нужного вида, но каждую ячейку перещелкивать сума можно сойти.
vunka вне форума Ответить с цитированием
Старый 25.07.2013, 13:15   #10
DiemonStar
Старожил
 
Регистрация: 08.02.2012
Сообщений: 2,173
По умолчанию

измените формат столбца, например, на такой: 0000000000000000000 и будет счастье...
Правильно поставленная задача - три четверти решения.
DiemonStar вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запрос данных из нескольких таблиц Daslife SQL, базы данных 5 07.01.2013 14:04
Запрос. Выборка из нескольких таблиц Ol'ga БД в Delphi 2 16.05.2012 22:54
Запрос на выборку из нескольких таблиц bullvinkle Microsoft Office Access 9 11.04.2012 04:35
Создать запрос выборки из нескольких таблиц skilk SQL, базы данных 10 03.03.2012 10:47
Запрос с нескольких таблиц Lokos БД в Delphi 3 15.04.2011 07:43