![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Поменяйте так:
If FName <> "False" Then либо уберите тип: Dim FName не знаю, дома работало...
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#12 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
![]() |
![]() |
![]() |
![]() |
#13 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
![]()
Hugo121
А как сделать, что бы не создавать новую книгу, а копировалось там, где и макрос. Дело в том, что книга, куда все преобразовывается, имеет др. имя и идет в связке с другой, а так мне придется каждый раз, переименовывать |
![]() |
![]() |
![]() |
#14 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Тогда последние 5 строчек кода должны быть такими:
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 07.09.2010 в 17:19. |
![]() |
![]() |
![]() |
#15 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
![]()
Во, супер!!!
И еще последний ? и перейдем ко второй части, сам не смогу. Я добавил в конце макроса, код, что бы закрывался автоматом Код:
Нельзя ли, в макросе, не прописывать имя("1.xls")?? |
![]() |
![]() |
![]() |
#16 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Тогда конец такой (впрочем, Dim можно в начало перенести):
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#17 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
![]()
Все, отлично!!!
2-я часть ? У меня часто бывает, что два, разных по имени, файла оригинала и втулить их надо в один, как выше ты сделал, только второй, под первым, в те же столбцы, только через одну, пустую строчку, скрин! |
![]() |
![]() |
![]() |
#18 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Ну так тут особо ничего переделывать не надо - ставим открытие и весь код в цикл, а выгрузку не в Cells(1,1), а в Cells(переменная,1). Ну а переменной добавляем в цикле UBound(a).
Сам или я вечером? Сейчас уже убегаю. Да, а выход из цикла будет и так после отказа открывать очередной файл.
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#19 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
![]()
Не получилось, стирается инфа столбца "С", первого оригинала
Код:
Последний раз редактировалось valerij; 07.09.2010 в 21:37. |
![]() |
![]() |
![]() |
#20 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Про "стирается" я забыл сказать - там из-за объединённых ячеек я третий столбец в конце удалял. Надо это дело из цикла вынести в конец.
В общем код такой, на два захода, вставляем в эту книгу (с новой там надо тогда флаг что ли ставить, сложнее будет): Код:
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Из программы выгружается отчет (плохо), его нужно преобразовать в другой вид (хорошо) | Anutik | Microsoft Office Excel | 4 | 23.09.2009 11:42 |
Сохранял один код, а открывается другой | fs444 | Общие вопросы C/C++ | 7 | 18.08.2009 18:52 |
переделать один документ в другой | Tirendus | Microsoft Office Excel | 4 | 16.04.2009 11:59 |
преобразовать два формата даты в один | olimpus | Microsoft Office Excel | 2 | 18.09.2008 09:16 |