![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 21.04.2011
Сообщений: 128
|
![]()
Сделал макрос на импорт данных. Как вернуть первоначальный вида док-та?
|
![]() |
![]() |
![]() |
#2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
не сохранять после импорта)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 21.04.2011
Сообщений: 128
|
![]()
Это не удобно, если прошло время идёт автосахронение.
хотелось бы через средства VBA да, не чего халявного в этом мире нет))) |
![]() |
![]() |
![]() |
#4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
трудно осознать "глубину Ваших глубин".
открываете файл и тут же сохраняете с новым именем (все это можно макросом сделать на автомате). таким образом и исходный постоянно один и тот же и импортированные данные пристроены.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 21.04.2011
Сообщений: 128
|
![]()
Спасибо) Это один из способов, но всё же хочется добить этот вариант, на форумах видел обсуждения по этому поводу, но не чего конкретного небыло
|
![]() |
![]() |
![]() |
#6 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Так и Вы ничего конкретного не показали.
Можно сперва взять данные в публичный массив, потом из массива выгрузить назад на лист. Или сделать копию листа, потом испорченный лист удалить, копию переименовать.
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#7 |
Форумчанин
Регистрация: 21.04.2011
Сообщений: 128
|
![]()
в Word усть такой макрос
Sub DoUndo() While uc > 0 ActiveDocument.Undo uc = uc - 1 Wend End Sub и еще добавляем глобальную переменню: Dim uc As Integer Запуск макроса DoUndo откатывает все действия произведенные нашим макросом для это лишь необходимо каждому действию добавить uc = uc + 1 Мне нужно что-то наподобии, только в Exel |
![]() |
![]() |
![]() |
#8 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
Application.Undo
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
![]() |
#9 |
Форумчанин
Регистрация: 21.04.2011
Сообщений: 128
|
![]()
Application.Undo http://msoffice.nm.ru/faq/macros/mis...eous.htm#faq62
Этот макрос отменяет одну команду, а если у меня в макросе много команд? |
![]() |
![]() |
![]() |
#10 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
Вы в uc посчитайте сколько изменений внесли а затем:
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Док станция для ноутбуков | misher | Компьютерное железо | 0 | 31.03.2011 16:54 |
как вернуть звук? | Дініс | Компьютерное железо | 12 | 27.08.2009 10:13 |
Как вернуть Swithboard? | Skolot | Microsoft Office Access | 4 | 08.06.2009 09:45 |
SOS. Не могу открыть, сохранить док.ворд 2007 | ola-ola | Microsoft Office Word | 3 | 17.03.2009 21:57 |
Как вернуть избранное | Умелец | Свободное общение | 1 | 29.05.2007 13:03 |