powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / excel разбивка одного листа-таблицы на много листов
32 сообщений из 32, показаны все 2 страниц
excel разбивка одного листа-таблицы на много листов
    #36027551
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
всем привет!
с vb в тессном контакте не состою, отсюда пару вопросов
есть файл экселя с листом, на котором таблица 17*1000
во 2й столбце находятся различные названия - по этому стобцу буду строить критерий отбора

задача в плане порядка действий мне ясна: двигаемся по 2му столбцу сверху вниз, как только находим отличное от предыдущего слово - кидаем его на новый лист (заранее все элементы 2го столбца уже отсортированы)
только нужно все эти листы создать в новом файле, что также для меня пока не понятно

кто чем может - помогите, даже краткие названия функций помогут, тк будет хотя бы направление куда копать и разбираться
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36027600
Korcar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проблема в создании новой книги или в чем?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36027626
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
и в этом тоже

но для начала хотелось бы понять как (с помощью чего) разбить лист на другие листы, а потом можно и в новую книгу их запихнуть
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36027813
Korcar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как только находим отличное от предыдущего слово - кидаем его на новый лист
так и разбить, создавая предварительно новый лист

а по созданию экселевких книг программно: поищите по фору. здесь куча примеров
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36027834
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
)))) отличный ответ

попробем так

простые вопросы:
нужно сделать цикл, который будет двигаться по столбцу - вопрос: как переменная (счетчик цикла) в экселе обзывается, полагаю что-то вроде cell(x,y)?

новый лист создаем Windows("имя").Activate?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36029954
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ребят ну помогите, хотя бы пример макроса маленькой таблицы по листам выложите
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36030094
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
rongerme,
в чем суть этой работы?
Вам надо раздать кому-то файлы с отфильтрованными записями или это учебное задание?
Вам не отвечают потому, что само задание кажется глупым.
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36030332
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
понятно,
от учебы я уже далек, это для оптимизации моей работы
эта таблица постоянно обновляется, раньше я все ручками с фильтром делал, но в скором времени собираюсь в отпуск и заменяющий человек ... в общем не может он запомнить порядок нажатия стольких кнопок_)
поэтому решил я как-то подготовиться, поэтому и попросил помощи,
если такая легкая задача, помогли бы, друзья)

вот соседняя тема с точностью до наоборот из многих листов сделать 1 - и отвечают же люди
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36030333
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
забыл ответить на вопрос, да файл этот необходимо потом отдать на дальнейшую обработку
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36030540
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36030729
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я наверное повторюсь в какой раз, но все же если хотите чтобы вам быстрее помогли - покажите людям что вы заботитесь об их времени и вообще стараетесь что-то делать сами.
Сделайте книгу в Экселе, в которой есть пример исходных данных, опишите как должно проходить на этом примере работа макроса, попробуйте в примере учесть все нюансы. В этой же книге приведите пример листов - того как должно получиться.
Потом укажите свои мысли, что уже сделано, что не получается.
Выложите файл сюда.

Если не хотите делать всего вышеописанного - тогда возможно вознаграждение назначить, тоже может ускорить ваши поиски, но работать придется уже с кем-нибуть одним, он вероятно задаст вам еще больше вопросов, потом вы подумаете, что лучше бы я поступил по первому сценарию и уже давно бы имел 5 бесплатных идей, чем одну и за деньги.

вообщем дерзайте, мне кажется задача очень простая - просто как то вы ее не подали правильно, не сформировали у людей уверенности, что вы обращаетесь с уважением

З.ы : пример не реальный должен быть а максимально простой для восприятия. Если сегодня в течении дня выложите, то я точно отвечу, подхватил грип - решил отлежаться один день.
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031022
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не могу выложить файлы тут - прав не хватает, если можно - может попробуем на почту?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031206
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
rongermeне могу выложить файлы тут - прав не хватает, если можно - может попробуем на почту?
Ок, только 1 маленький файл с тестовым примеров, а то ты так говоришь файлы как будто всю прогу собираешься мне прислать
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031217
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Deggasadrongermeне могу выложить файлы тут - прав не хватает, если можно - может попробуем на почту?
Ок, только 1 маленький файл с тестовым примеров, а то ты так говоришь файлы как будто всю прогу собираешься мне прислать

"прогу" читать как "базу". клинит меня - видимо грип
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031241
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad,

нет) просто 2 файла - 1 начальная книга, 2й - то, что на выходе
отправил, надеюсь, дойдет
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031262
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
rongermeDeggasad,

нет) просто 2 файла - 1 начальная книга, 2й - то, что на выходе
отправил, надеюсь, дойдет

пока нет ничего, если получу сюда положу.
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031360
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031361
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031702
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все равно как то не почувствовал, что вы старались (2 файла и никаких комментариев, в одном из них непойми откуда взятый код, столбцы в итогом файле и исходном по разному расположены, должно ли так быть непонятно, и еще куча всего), но пример вам набросал

Диапазон сортировать не обязательно, мне показалось так более надежней
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031703
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031962
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad,

спасибо, просто, я удалял все лишнее из файла, чтобы сократить размер (ограничение в 100)
тот макрос - он рабочий, возможно не в этой версии) но он раскидывает только по листам в этой же книге, и в том же порядке, что и изначальная таблица,
а вот конечный макрос должен новую книгу создавать

ваш создает - сейчас изучу и пойму, что я делал не так

а вот с порядком придется повозиться, возможно я через макрорекодер сначала выставлю все начальные столбцы в нужном порядке, а потом прогоню макросом

как думаете - норм выход из положения?
думается, что если по строчкам перекидывать - будет сложновато

еще раз сорри, если показалось, что я лентяй) просто я пытался максимально быстро скинуть пример чего нужно сделать
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36031993
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можете снача столбцы поменять.
Можете и каждую ячейку отдельно заполнять.
Если много данных лучше первое, но если все таки выберите второе, то
вместо строки

Код: plaintext
 myWB.Sheets(shName).Range("a" & newRow & ":m" & newRow).Value = .Range("b" & iRow & ":n" & iRow).Value

Код: plaintext
1.
2.
 myWB.Sheets(shName).Range("a" & newRow).Value = .Range("b" & iRow).Value
 myWB.Sheets(shName).Range("b" & newRow).Value = .Range("d" & iRow).Value
 .... и так далее для всех столбцов
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36035438
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
c этим разобрался

но возникла проблема
я хочу сохранить в отдельном файле:
ActiveWorkbook.SaveAs Filename:= _
ActiveWorkbook.Path & "\" & Trim(Range("A7").Value) & ".xls" ...
как в Range("A7").Value убрать кавычки?
replacom что-то не получилось
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36037088
Korcar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а если значение предварительно записать в строковую переменную?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36038391
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
rongermec этим разобрался

но возникла проблема
я хочу сохранить в отдельном файле:
ActiveWorkbook.SaveAs Filename:= _
ActiveWorkbook.Path & "\" & Trim(Range("A7").Value) & ".xls" ...
как в Range("A7").Value убрать кавычки?
replacom что-то не получилось

Какие кавычки?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #36048339
rongerme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad

Какие кавычки?
да в значении были кавычки "фвофвф"
а файл сохранить с такими названиями нельзя
решил проблему replace (..., ch(34), " ")
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
excel разбивка одного листа-таблицы на много листов
    #37125389
lxpin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Можете ли подсказать пожалуйста?

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

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


Спасибо!
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #37125606
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
lxpin,

что именно у вас не получается ?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #37125817
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
rongerme,
может пригодится (комментарии в коде)...
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #37127641
lxpin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
big-duke,

Да, собственно вот все это и не получается :)
Я в VBA не то чтобы на многое способен.

У меня один лист и 100 столбцов, и, допустим, 10 строк.

Хочу чтобы было 99 листов - на каждом по первому столбцу из оригинала, и вторыми по очереди шли столбцы из этой большой таблицы.

99 листов - потому что из 100 первый столбик - наименования, а остальные 99 - значения.
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #37127934
lxpin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Или так:
Как можно транспонировать всю книгу?
...
Рейтинг: 0 / 0
excel разбивка одного листа-таблицы на много листов
    #37128544
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
lxpin,
зачем всю книгу? Не надо всю книгу...
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Dim wsFrom as Worksheet, wb as Workbook

Set wsFrom = ThisWorkbook.Workshhets( 1 ) ' лист который размножаем
For i =  2  to  100 
  set wb = Workbooks.add(xlWBATWorksheet) ' добавить новую книгу с одним листом
' да здравствует копипаст!
  wsFrom.Columns( 1 ).Copy wb.Worksheets( 1 ).Range("A1")
  wsFrom.Columns(i).Copy wb.Worksheets( 1 ).Range("B1")

  wb.SaveAs ThisWorkbook.Path & "\workbook_" & i ' сохраняем в папке с этой книгой
  wb.Close                                       ' закрывем
  Set wb = Nothing                               ' освобождаем память

Next i
Set wsFrom = Nothing
...
Рейтинг: 0 / 0
32 сообщений из 32, показаны все 2 страниц
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / excel разбивка одного листа-таблицы на много листов
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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