Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel: как сохранить формулы (ссылки), но без данных? / 13 сообщений из 13, страница 1 из 1
23.01.2014, 11:09
    #38535310
S70
S70
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
Коллеги,

добрый день. Есть такая задача. Большая модель в экселе (от 500 файлов и больше). Естественно, листов в каждом файле – пара десятков. Файлы и листы завязаны на ссылки между собой. Четкого первого слоя с данными – нет, все распылено по файлам и листам. Как сделать так, чтобы связи и формулы остались, а данных не было? Т.е. оставить, например вид, который получается по «Ctrl+~» (см. скриншот). Поиск мест где живут исходные данные – практически неразрешимая задача за конечное время.
Фактически, надо чтобы люди могли изучить структуру связей, но без доступа к данным.

Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 11:13
    #38535314
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
S70,

Только черзе коды VBA. Других путей не знаю.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 11:16
    #38535319
S70
S70
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
The_Prist,
в смысле - "через коды"?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 11:23
    #38535329
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
Хм....Да в прямом. В офис встроен язык программирования - VBA. Через него и делается. Пишется код, который делает необходимые действия.
В общих чертах можно почитать здесь: Что такое макрос и где его искать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 12:03
    #38535382
S70
S70
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
The_Prist,

)))))))) я имею представление о VBA )))))))))))))))))))
Понятно, что программным способом.
Делать-то как? В лоб: писать код "занулить ячейки с ... по ..."
или есть кокой-то более изящный способ? Я об этом.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 12:16
    #38535409
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
S70,

Я не понял, что значит "занулить". Заменить значения ячеек с формулами, на текст формул для всего листа можно так:
Код: vbnet
1.
2.
3.
4.
5.
6.
Sub VisualFormula()
    Dim avFrm
    avFrm = ActiveSheet.UsedRange.Formula
    ActiveSheet.UsedRange.NumberFormat = "@"
    ActiveSheet.UsedRange.Value = avFrm
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 13:53
    #38535552
S70
S70
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
The_Prist,

"занулить" - это было к одному из вариантов действий. Типа ищем ячейки с числами без формул и их обнуляем.
У Вас решение более интересное, хотя не факт, что подойдет, поскольку тогда навигация между формулами = файлами потеряется. По "Ctrl+[" переход не сделаешь. Но, все равно - спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 14:11
    #38535585
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
S70,

А переход по Ctrl+[ возможен исключительно внутри формул. Со значениями Вы так не сделаете. Поэтому выбирайте - либо формулы и возможность перехода, либо значения.
Ну или свой обработчик перехода по связям делайте.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 14:26
    #38535605
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
Если хотите сохранить только формулы, но удалить значения, то все проще:
Код: vbnet
1.
2.
3.
4.
Sub ClearNums()
    Cells.SpecialCells(xlCellTypeConstants).Value = Empty
    ActiveWindow.DisplayFormulas = True
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 14:27
    #38535606
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
На коленке писал, забыл добавить строку, если ячеек без формул не окажется на листе:
Код: vbnet
1.
2.
3.
4.
Sub ClearNums()
    On Error Resume Next: Cells.SpecialCells(xlCellTypeConstants).Value = Empty
    ActiveWindow.DisplayFormulas = 0
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2014, 14:49
    #38535653
S70
S70
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
The_Prist,

Оооо... Думаю, поможет. Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2014, 13:55
    #38536865
DV68
DV68
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
S70...Типа ищем ячейки с числами без формул и их обнуляем...
Без макроса можно так:
F5 - выделить - константы - оставляем галочку на "числа" - ок - Delete.
Правда на каждом листе отдельно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.08.2014, 15:05
    #38710922
sash2589
sash2589
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel: как сохранить формулы (ссылки), но без данных?
DV68 чувак респект тебе!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel: как сохранить формулы (ссылки), но без данных? / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 166ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2173905]:
 0ms
get settings:
 11ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 55ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 2ms
others: 14ms
total:  166ms
x
x
Закрыть


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