ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Экспорт данных в Excel
25 сообщений из 63, страница 1 из 3
  1  все
Экспорт данных в Excel
    #36539788
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Всем привет!!!
Срочно нужна помощь.
Суть проблемы такова:
Есть книга Excel в которой несколько листов (предположим 5)
в каждом листе есть некая таблица состоящая из 9 столбцов (A, B, C, D, E, F, G, H, I) и 5000 строк.

Мне требуется собрать все эти таблицы (из 4 листов) в пятый лист, но так чтобы сначала вставилась из первого листа, затем в следующие строки вторая и т.д.
И чтобы вставлялись только те строки в которых в Столбце "G" любое значение не равное "0"

Заранее Всем спасибо!!!
...
Рейтинг: 0 / 0
24.03.2010, 14:49
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540072
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
nikalex2, запрос пишите к листам. так будет проще всего и быстрее (если кол-во листов не миллион, конечно).
но, если работа одноразовая - то ручками. потом просто ставите фильтр на столбик G "выводить равное 0" и сносите все видимые строки.
...
Рейтинг: 0 / 0
24.03.2010, 15:52
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540175
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
PlanBnikalex2, запрос пишите к листам. так будет проще всего и быстрее (если кол-во листов не миллион, конечно).
но, если работа одноразовая - то ручками. потом просто ставите фильтр на столбик G "выводить равное 0" и сносите все видимые строки.

работа не одноразовая, хочу создать что то типа шаблона
в данный момент так и делаю, т.е. фильтром, но хотелось бы усовершенствовать )))
создать кнопку, что то типа "Собрать базу" при нажатии которой запускался некий макрос и получалась бы сводная таблица
...
Рейтинг: 0 / 0
24.03.2010, 16:14
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540269
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
nikalex2,

MsQuery помучайте, может подойти, даже может быть идеально.
...
Рейтинг: 0 / 0
24.03.2010, 16:38
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540349
trofik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
trofik
Гость
nikalex2,
как-то так...если через msquery
SELECT `Лист1$`.a, `Лист1$`.b
FROM `Лист1$` `Лист1$`
union all
SELECT `Лист2$`.a, `Лист2$`.b
FROM `Лист2$` `Лист2$`
...
Рейтинг: 0 / 0
24.03.2010, 16:59
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540431
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Hugo121nikalex2,

MsQuery помучайте, может подойти, даже может быть идеально.

забыл сказать, я новичок и даже без понятия что такое MsQuery
...
Рейтинг: 0 / 0
24.03.2010, 17:26
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540477
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
nikalex2, 3 года на SQL, и всё ещё жизнь не заставила изучить?
C:\Program Files\Microsoft Office\Office\MSQRY32.EXE запустите, если есть...
...
Рейтинг: 0 / 0
24.03.2010, 17:41
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540534
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Hugo121nikalex2, 3 года на SQL, и всё ещё жизнь не заставила изучить?
C:\Program Files\Microsoft Office\Office\MSQRY32.EXE запустите, если есть...

ок, спасибо, щас попробую разобраться???
ну а вообще с помощью VBA возможно это сделать???
...
Рейтинг: 0 / 0
24.03.2010, 18:01
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540571
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
nikalex2, можно, и легко, но долго, если много данных - надо строки перебирать по одной или может автофильтр можно подключить, не знаю пока.
...
Рейтинг: 0 / 0
24.03.2010, 18:15
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540581
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Вообще-то да, можно сперва из источников автофильтром выкинуть все G=0, затем всё оставшееся скопом скопировать. Но всё-же попробуйте MsQuery - там оперативнее менять запросы можно. Только вот насчёт порядка (так чтобы сначала вставилась из первого листа, затем в следующие строки вторая) не уверен, так тонко не изучал.
...
Рейтинг: 0 / 0
24.03.2010, 18:18
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540592
zchvv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zchvv
Участник
nikalex2,

вот тебе мое решение.
Кое-что можно вынести на формочку для универсальности.
Не считаю это решение оптимальным, но работает прекрасно. Я использую часто, только без цикла.
...
Рейтинг: 0 / 0
24.03.2010, 18:26
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540597
zchvv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zchvv
Участник
Забыл!!!
...
Рейтинг: 0 / 0
24.03.2010, 18:27
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540623
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
zchvv, через union красиво... и вот без iLastRow тоже хорошо получилось!
...
Рейтинг: 0 / 0
24.03.2010, 18:40
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540645
zchvv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zchvv
Участник
Hugo21,

спасибо за хорошую оценку
...
Рейтинг: 0 / 0
24.03.2010, 18:51
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540939
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
zchvvnikalex2,

вот тебе мое решение.
Кое-что можно вынести на формочку для универсальности.
Не считаю это решение оптимальным, но работает прекрасно. Я использую часто, только без цикла.

СПАСИБО!!! Это то что мне нужно!!!
...
Рейтинг: 0 / 0
24.03.2010, 21:53
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540944
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Hugo121nikalex2, 3 года на SQL, и всё ещё жизнь не заставила изучить?
C:\Program Files\Microsoft Office\Office\MSQRY32.EXE запустите, если есть...

и Вам спасибо!!! Сижу читаю Help по MsQuery ))) пока ещё не въехал)))
...
Рейтинг: 0 / 0
24.03.2010, 21:55
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540945
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Возник другой вопрос!!!
А как теперь эту таблицу экспортировать в Word ???
...
Рейтинг: 0 / 0
24.03.2010, 21:56
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540962
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
nikalex2, получилось с MsQuery?
Насчёт Excel2Word - вот тут в конце есть информация, можно переделать.
...
Рейтинг: 0 / 0
24.03.2010, 22:13
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36540973
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Hugo121nikalex2, получилось с MsQuery?
Насчёт Excel2Word - вот тут в конце есть информация, можно переделать.

с MsQuery не разобрался ещё, я так понял эта примочка для создания запросов, надо help читать))) спасибо за ссылку, щас гляну)))
...
Рейтинг: 0 / 0
24.03.2010, 22:20
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36542703
nikalex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nikalex2
Участник
Всем ещё раз привет!!!

С экспортом из Excel в Word не разобрался :(
Но возник другой вопрос
Как применить код предложенный zchvv ,но чтобы если в листах есть формулы, то при экспорте эти формулы оставались???

Заранее благодарю!
...
Рейтинг: 0 / 0
25.03.2010, 16:02
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36542771
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Djon Player
Участник
nikalex2,

Если через MsQuery собирать, то формулы точно пропадут.
Чтобы не пропали надо тогда собирать путем копирования и вставки.
Правда при этом надо понимать, что некоторые формулы после такой операции могут переноситься некорректно, всё зависит от того, на какие элементы ссылаются эти формулы.
...
Рейтинг: 0 / 0
25.03.2010, 16:25
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36542809
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Через Union формулы тоже пропадают, как оказывается...
1. Можно собирать, как выше упоминалось, сперва выкинув ненужные строки. Или их выкинуть потом, в собранном.
2. Можно сперва преобразовать формулы в текст, затем вернуть назад. Тогда формулы не изменятся при переносе.
...
Рейтинг: 0 / 0
25.03.2010, 16:39
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36542998
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
Hugo121Через Union формулы тоже пропадают, как оказывается...
1. Можно собирать, как выше упоминалось, сперва выкинув ненужные строки. Или их выкинуть потом, в собранном.
2. Можно сперва преобразовать формулы в текст, затем вернуть назад. Тогда формулы не изменятся при переносе.формулы массива умирают как ни крути.
вообще смысла не вижу переносить формулы.. простые (сложение, вычитание) можно прям в запросе. что-то более - делать заново
...
Рейтинг: 0 / 0
25.03.2010, 17:41
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36543014
zchvv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zchvv
Участник
Я в параметрах Excel'я установил Вычисления=Вручную, и теперь формулы не пропадают.
...
Рейтинг: 0 / 0
25.03.2010, 17:50
| Ответить | Цитировать | Написать  
Экспорт данных в Excel
    #36543026
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
zchvv,

Тогда добавьте в код, в начале:

Код: plaintext
1.
2.
3.
4.
With Application
        .ScreenUpdating = False
        ac = .Calculation: .Calculation = xlCalculationManual
   End With
в конце:
Код: plaintext
1.
2.
3.
4.
    With Application
        .ScreenUpdating = True
        .Calculation = ac
    End With

Я всегда эти строки в код ставлю (если конечно не нужно иначе).
...
Рейтинг: 0 / 0
25.03.2010, 17:56
| Ответить | Цитировать | Написать  
25 сообщений из 63, страница 1 из 3
  1  все
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Экспорт данных в Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&tid=2178257]:
 0ms
get settings:
 8ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 168ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 225ms
total:  463ms
созд. / загр.: 463ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]