ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обработка книг MS Excel
13 сообщений из 13, страница 1 из 1
Обработка книг MS Excel
    #33708933
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
Делаю перед импортом обработку книги (удалить/добавить стольцы и прочее).
Не подскажете как сделать так чтобы книгу привести скажем так, к стандратному виду. Чтобы не было автофильтров , спец формул и прочего.
А то то там то ся вылезают ошибки, для специфических таких книг.
...
Рейтинг: 0 / 0
05.05.2006, 09:43:27
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33708939
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
автофильтр с листа мона снять так
ActiveSheet.AutoFilterMode = False
ну и так далее - т.е. все ручками.
зы
а что такое спецформулы ?
...
Рейтинг: 0 / 0
05.05.2006, 09:45:33
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33708973
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
big-dukeавтофильтр с листа мона снять так
ActiveSheet.AutoFilterMode = False
ну и так далее - т.е. все ручками.
зы
а что такое спецформулы ?

Да я вкурсе как можно что руками взять, но я же не могу заранее знать, на каком листе какие еще меня неожиданности могут поджидать.

Под спец.формулами подрузамевал следующее))
В листе идет обработка значений через формулы эксель. все шло хорошо. пока не попался лист в котором для листа в настройках было отключение пересчет формул...Т.е. я в коде ставлю формулу, а она не считается, нашел сделал , чтоб в листах такая опция не встречалась, думал все..

Теперь встретился автофильтр. Может есть какой то варинат, по отключению. Всех таких вещей и приведению листа к виду как после только что установленного офиса)
...
Рейтинг: 0 / 0
05.05.2006, 09:56:40
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33708998
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
имхо тока методом исключения.
Можно же на каждом листе принудительно отключить автофильтр.
...
Рейтинг: 0 / 0
05.05.2006, 10:01:50
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709021
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
big-dukeимхо тока методом исключения.
Можно же на каждом листе принудительно отключить автофильтр.

Да можно конечно, только вот 10 в какой степени, будет таких исключений)))
...
Рейтинг: 0 / 0
05.05.2006, 10:07:06
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709026
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
сделайте новую книгу и кидайте в нее через cells.copy обработанные данные.
Или это все нужно сделать до начала обработки ?
...
Рейтинг: 0 / 0
05.05.2006, 10:08:45
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709039
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
big-dukeсделайте новую книгу и кидайте в нее через cells.copy обработанные данные.
Или это все нужно сделать до начала обработки ?

Появилась идея в этом направлении.

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

cells.copy вообще быстро работает на больших объемах?
И какие у нее параметры , а то через Ф1 пусто почему то?
...
Рейтинг: 0 / 0
05.05.2006, 10:13:05
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709103
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
большие объемы это скока ? Что за комп, скока мозгов ?
cells - это range.
так что cells.copy тоже что и range("A1").copy

...
Рейтинг: 0 / 0
05.05.2006, 10:26:08
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709104
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
big-dukeбольшие объемы это скока ? Что за комп, скока мозгов ?
cells - это range.
так что cells.copy тоже что и range("A1").copy

Ну будем исходить из 60 000 самого плохо варианта так сказать ))

Не подскажете сразу,скопировать весь лист?
...
Рейтинг: 0 / 0
05.05.2006, 10:27:12
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709203
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
что то в этом роде
Код: plaintext
1.
2.
3.
Workbooks.Add
ThisWorkbook.ActiveSheet.Cells.Copy
ActiveWorkbook.ActiveSheet.Paste
...
Рейтинг: 0 / 0
05.05.2006, 10:41:40
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33709423
Logayn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Logayn
Гость
Код: plaintext
1.
2.
LastList = Sheets.Count
Worksheets(NameList).Copy After:=Worksheets(LastList)' копирование, лист становится последним
Worksheets(LastList +  1 ).Name = "NameNewList"    'имя нового листа
...
Рейтинг: 0 / 0
05.05.2006, 11:23:05
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33710418
Думающий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Думающий
Участник
Если я все правильно понимаю, то такое копирование даст мне все теже проблемы в новой книге, нет?
...
Рейтинг: 0 / 0
05.05.2006, 14:38:54
| Ответить | Цитировать | Написать  
Обработка книг MS Excel
    #33711396
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
Да, такое копирование тебе ничего не даст.
Можно попробовать копировать только значения. Для ячеек с формулами будут скопированы результатирующие значения. Сами формулы пропадут.
Код: plaintext
1.
2.
3.
4.
' сначала пересчитать все формулы на листе принудительно, на случай если выключен пересчет
Workbooks("Source").Worksheets("Sheet1").Calculate 
' а теперь собственно копирование.
Workbooks("Source").Worksheets("Sheet1").UsedRange.Copy
Workbooks("Destination").Worksheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteValues
...
Рейтинг: 0 / 0
05.05.2006, 18:53:46
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обработка книг MS Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&fpage=331&tid=2184899]:
 0ms
get settings:
 9ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 40ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 240ms
total:  384ms
созд. / загр.: 384ms
x
x
Закрыть


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