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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 06.11.2012, 15:41   #1
Smile7
Новичок
Джуниор
 
Регистрация: 06.11.2012
Сообщений: 2
По умолчанию Как добавить листы при работе макроса?

Здравствуйте, в прикрепленном xls файле есть макрос. Он генерирует все возожные комбинации, из цифр взятых с 4:2 - 23:3. Проблема в том, что если увеличить колличество строк, например до 4:2 - 23:10 - не хватает трок на одном листе (~65 тыс.). Подскажите, пожалуйста, как сделать, чтобы макрос при недостаточном количестве строк на листе добавлял новый лист, если и его не достаточно, то еще один и так далее.
Спасибо!
Вложения
Тип файла: rar post.rar (38.9 Кб, 8 просмотров)
Smile7 вне форума Ответить с цитированием
Старый 06.11.2012, 20:07   #2
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Используйте 2007, 2010 Excel.
Цитата:
Размер листа 1 048 576 строк и 16 384 столбца
Ширина столбца 255 знаков
Общее количество знаков в ячейке 32 767 знаков

(с) Excel 2007 help
Думаю, хватит.
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499

Последний раз редактировалось VictorM; 06.11.2012 в 20:10.
VictorM вне форума Ответить с цитированием
Старый 06.11.2012, 20:28   #3
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

была тут задача, комбинировал я книжки по полкам, VictorM, 1 048 576 строк - не хватало (несколько раз). я выкладывал комбинации правее на том же листе.

Smile7, не знаете как лист добавить? Сделайте вручную, запишите на "магнитофон", изучайте код, там все гораздо проще, чем перебирать все возможные комбинации. Sheets.add after:=sheets(sheets.count)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 09.11.2012, 13:57   #4
Smile7
Новичок
Джуниор
 
Регистрация: 06.11.2012
Сообщений: 2
По умолчанию

Спасибо всем за ответы.
Игорь, "магнитофон" вещь хорошая, но он он объктивно годится только для простых задач. Тут же сложнее, например строка, которую вы написали выше добавляет лист после выполнения макроса, а не во время его выполнения, если не хватает листов. Возможно я не туда его "впихнул", но результат такой. Насчет "все гораздо проще", не понял о чем вы, если нужно именно перебор всех комбинаций.
Smile7 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Транспонирование множества данных из разных книгах или из разных листов на 1 лист посредством макроса Тантана Microsoft Office Excel 6 18.12.2014 13:04
Зависание при работе с HttpWebRequest при обращении к некоторым сайтам Mishiko C# (си шарп) 0 16.08.2012 12:24
не хватает ОП при вызове imagecreatefromjpeg SkrudjMakdak PHP 5 10.08.2011 16:36
При запуске ругается:"не хватает памяти..." kim_klim Свободное общение 3 19.01.2011 15:39