Замена формулы на текст

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Замена формулы на текст (Формулы/Formulas)

Derwu

Дата: Четверг, 24.04.2014, 07:42 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2002

Доброе утро!

Есть ячейка, содержащая формулу, после рассчета в ней видно число.
Я хочу сохранить файл под таким именем, но просто скопировать ячейку в окно "Сохранить как" не получается. Приходится вставлять ее в браузер, а потом уже копировать в окошко сохранения.
Возможно ли преобразовать эту формулу в текст так, чтобы она копировалась и вставлялась как текст?

Макросы почему-то стали "запись невозможна", поэтому и вопрос...

Ответить

AlexM

Дата: Четверг, 24.04.2014, 08:50 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

Репутация: 1129 ±

Замечаний: 0% ±

Excel 2003

Данные - Макрос - Безопасность.
Установить средний уровень безопасности.
Перезапустить Excel.

Цитата Derwu, 24.04.2014 в 07:42, в сообщении № 1

Приходится вставлять ее в браузер

Можно копировать - Вставить Специальной вставкой "Значения" в любую ячейку - Копировать число, выделив его в строке формул - Вставить в окно "Сохранить как"

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Ответить

Derwu

Дата: Пятница, 25.04.2014, 05:02 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2002

Цитата AlexM, 24.04.2014 в 08:50, в сообщении № 2

это самое простое, но долго...

Цитата AlexM, 24.04.2014 в 08:50, в сообщении № 2

Данные - Макрос - Безопасность.
Установить средний уровень безопасности.
Перезапустить Excel.

Макросы заработали, спасибо

Только не получается, значение предыдущее выводится, не обновляется. Сейчас еще попробую, если нет - прибегу с вопросом про VB

Ответить

AlexM

Дата: Пятница, 25.04.2014, 07:59 | Сообщение № 4

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

Репутация: 1129 ±

Замечаний: 0% ±

Excel 2003

Тут ответ есть

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Ответить

AlexM

Дата: Пятница, 25.04.2014, 12:09 | Сообщение № 5

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

Репутация: 1129 ±

Замечаний: 0% ±

Excel 2003

Можно не копировать значение ячейки через буфер обмена. Поручить все макросу.[vba]

Код

Sub SaveXLSfile()
    Dim strNewName As String
    Application.DisplayAlerts = False
    strNewName = ThisWorkbook.Path & "\" & ActiveCell.Value2 & ".xls"
    'Application.Dialogs(xlDialogSaveAs).Show strNewName '*1
    ActiveWorkbook.SaveAs strNewName, xlNormal '*2
    Application.DisplayAlerts = True
End Sub

[/vba]*1 - вывод диалога сохранения файла, можно задать папку для сохранения.
*2 - сохранение файла в папку, в которой находится файл с макросом. Диалога сохранения файла не будет.
Файл сохраняется с именем соответствующее значению активной ячейки. В ячейке может быть как формула, так и константа.

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Ответить

Замена формулы на текст (Формулы/Formulas)

Страница 1 из 1
1