Выгрузка CopyFromRecordset в несколько диапазонов

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Выгрузка CopyFromRecordset в несколько диапазонов (Макросы/Sub)

Leojse

Дата: Пятница, 19.10.2018, 20:51 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 148

Репутация: 1 ±

Замечаний: 0% ±

2010/2013

Добрый вечер, уважаемые форумчане!
Снова прошу подсказки, так как ничего похожего на форуме не нашел.
Выгружаю данные с помощью CopyFromRecordset в определенный лист, проблем тут нет. Подскажите, а как выгрузить данные в несколько листов?
Код типа
[vba]

Код

Worksheets(5).Range("A1").CopyFromRecordset rst
Worksheets(6).Range("A1").CopyFromRecordset rst
Worksheets(7).Range("A1").CopyFromRecordset rst
Worksheets(8).Range("A1").CopyFromRecordset rst

[/vba]
не помогает.

Ответить

_Boroda_

Дата: Пятница, 19.10.2018, 21:24 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16718

Репутация: 6505 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Файл дадите?
И что значит "Не помогает"? Как-то поподробнее можно?

И как Вы

Цитата Leojse, 19.10.2018 в 20:51, в сообщении № 1 ()

Выгружаю данные с помощью CopyFromRecordset в определенный лист

? В чем принципиальная разница? Тот "Определенный лист активен в момент загрузки?

*
Там, похоже, только первая загрузка должна сработать
Может, попробовать сначала записать данные в массив, а потом этот массив уже класть на лист?
[vba]

Код

ar= rst.GetRows

[/vba]

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

bmv98rus

Дата: Пятница, 19.10.2018, 21:59 | Сообщение № 3

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4116

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

Цитата _Boroda_, 19.10.2018 в 21:24, в сообщении № 2 ()

Там, похоже, только первая загрузка должна сработать

Александр, если есть на чем проверить уже, то попробовать перемотать на начало перед второй выгрузкой.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

_Boroda_

Дата: Пятница, 19.10.2018, 22:09 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 16718

Репутация: 6505 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Проверку лень делать. Я просто недавно как раз с ADO возился
Да, я тоже сначала подумал о "возвернуться взад", но смысл? Массив загрузил и голову не морочишь

*Кстати, интересно как получается - заметил, что вопросы вроде группами какими-то ходят. Часто за короткий период несколько вопросов появляются из тем, ранее редко встречающихся, причем от разных людей вопросы.

Ответить

bmv98rus

Дата: Пятница, 19.10.2018, 23:00 | Сообщение № 5

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4116

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

Цитата _Boroda_, 19.10.2018 в 22:09, в сообщении № 4 ()

заметил, что вопросы вроде группами какими-то ходят.

сезонная миграция :-)

Тут как раз был пример под рукой проверил rst.movefirst между выгрузками.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Сообщение отредактировал bmv98rus - Пятница, 19.10.2018, 23:27

Ответить

Выгрузка CopyFromRecordset в несколько диапазонов (Макросы/Sub)

Страница 1 из 1
1