Сохранить книгу excel как значения - Word и Excel - помощь в работе с программами

Как сохранить все листы только как значения?

Если у вас есть книга, содержащая несколько формул, теперь вам нужно распространить этот файл среди других пользователей, вы не хотите, чтобы формулы отображались, а отображались только значения. Обычно мы можем быстро сохранить рабочий лист как значения, скопировав и вставив данные только как значения. Но как вы могли сохранить все листы только как значения, не копируя и не вставляя их по одному?

Сохраняйте все листы как значения только с кодом VBA

Сохраняйте все листы как значения только с кодом VBA

Следующий код VBA может помочь вам быстро сохранить все листы как значения (без формул) и сохранить все форматирование ячеек. Пожалуйста, сделайте так:

1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.

Код VBA: сохранить все листы только как значения:

Sub Saveasvalue()
'Updateby Extendoffice
    Dim wsh As Worksheet
    For Each wsh In ThisWorkbook.Worksheets
        wsh.Cells.Copy
        wsh.Cells.PasteSpecial xlPasteValues
    Next
    Application.CutCopyMode = False
End Sub

3, Затем нажмите F5 ключ для запуска этого кода, и вся книга была сохранена только как значения, все формулы были удалены сразу, оставив только значения с форматированием ячеек.

Внимание: Прежде чем применять код, вы можете сначала сохранить копию книги.

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Комментарии (17)

Оценок пока нет. Оцените первым!

Источник

Как в эксель убрать формулу и оставить значение

Работа с формулами в Экселе позволяет значительно облегчить и автоматизировать различные вычисления. Вместе с тем, далеко не всегда нужно, чтобы результат был привязан к выражению. Например, при изменении значений в связанных ячейках, изменятся и итоговые данные, а в некоторых случаях это не нужно. Кроме того, при переносе скопированной таблицы с формулами в другую область значения могут «потеряться». Ещё одним поводом их спрятать может служить ситуация, когда вы не хотите, чтобы другие лица видели, как проводятся в таблице расчеты. Давайте выясним, какими способами можно удалить формулу в ячейках, оставив только результат вычислений.

Процедура удаления

К сожалению, в Excel нет инструмента, который моментально убирал бы формулы из ячеек, а оставлял там только значения. Поэтому приходится искать более сложные пути решения проблемы.

Способ 1: копирование значений через параметры вставки

Скопировать данные без формулы в другую область можно при помощи параметров вставки.

«Главная»

«Копировать»

«Буфер обмена»

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

Способ 2: копирование специальной вставкой

Если вам нужно сохранить исходное форматирование, но вы не хотите тратить время на ручную обработку таблицы, то существует возможность для этих целей использовать «Специальную вставку».

Копируем тем же способом, что и прошлый раз содержимое таблицы или диапазона.
Выделяем всю область вставки или её левую верхнюю ячейку. Делаем щелчок правой кнопкой мыши, тем самым вызывая контекстное меню. В открывшемся списке выбираем пункт «Специальная вставка». Далее в дополнительном меню жмем на кнопку «Значения и исходное форматирование», которая размещается в группе «Вставить значения» и представляет собой пиктограмму в виде квадрата, где изображены цифры и кисточка.

После этой операции данные будут скопированы без формул, но при этом сохранится исходное форматирование.

Способ 3: удаление формулы из исходной таблицы

До этого мы говорили, как убрать формулу при копировании, а теперь давайте выясним, как её удалить из исходного диапазона.

Производим копирование таблицы любым из тех методов, о которых шел разговор выше, в пустую область листа. Выбор конкретного способа в нашем случае значения иметь не будет.
Выделяем скопированный диапазон. Щелкаем по кнопке «Копировать» на ленте.

Выделяем первоначальный диапазон. Щелкаем по нему правой кнопкой мыши. В контекстном списке в группе «Параметры вставки» выбираем пункт «Значения».

После того, как данные были вставлены, можно удалить транзитный диапазон. Выделяем его. Вызываем контекстное меню кликом правой кнопки мыши. Выбираем в нем пункт «Удалить…».

После выполнения указанных действий все ненужные элементы будут удалены, а формулы из исходной таблицы исчезнут.

Способ 4: удаление формул без создания транзитного диапазона

Можно сделать ещё проще и вообще не создавать транзитный диапазон. Правда в этом случае нужно действовать особенно внимательно, ведь все действия будут выполняться в границах таблицы, а это значит, что любая ошибка может нарушить целостность данных.

«Копировать»

Ctrl+C

Таким образом, все данные будут скопированы и тут же вставлены, как значения. После этих действий формул в выделенной области не останется.

Способ 5: использование макроса

Для удаления формул из ячеек можно также использовать макросы. Но для этого нужно сначала активировать вкладку разработчика, а также включить саму работу макросов, если они у вас не активны. Как это сделать, можно узнать в отдельной теме. Мы же поговорим непосредственно о добавлении и использовании макроса для удаления формул.

«Разработчик»

«Visual Basic»

«Код»

Запускается редактор макросов. Вставляем в него указанный ниже код:

Sub Удаление_формул()
Selection.Value = Selection.Value
End Sub

После этого закрываем окно редактора стандартным способом, нажав на кнопку в правом верхнем углу.

Возвращаемся к листу, на котором расположена интересующая нас таблица. Выделяем фрагмент, где расположены формулы, которые нужно удалить. Во вкладке «Разработчик» жмем на кнопку «Макросы», размещенную на ленте в группе «Код».

После этого действия все формулы в выделенной области будут удалены, а останутся только результаты вычислений.

Способ 6: Удаление формулы вместе с результатом

Впрочем, бывают случаи, когда нужно удалить не только формулу, но и результат. Сделать это ещё проще.

«Очистить содержимое»

Delete

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

Отблагодарите автора, поделитесь статьей в социальных сетях.

Удаление формул

При удалении формулы результат формулы также удаляется. Если вы не хотите удалять значение, вместо него можно удалить только формулу.

Удаление формулы

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

Нажмите клавишу DELETE.

Удаление формулы с сохранением результатов

Для этого нужно скопировать формулу, а затем вставить ее в ту же ячейку с помощью параметра “вставить значения”.

Выделите ячейку или диапазон ячеек, содержащих формулу.
Если формула является формулой массива, необходимо сначала выделить все ячейки в диапазоне ячеек, содержащих формулу массива:

Щелкните ячейку в формуле массива.

На вкладке Главная в группе Редактирование нажмите кнопку Найти и выделить, а затем выберите команду Перейти.

Нажмите кнопку Дополнительный.

Нажмите кнопку Текущий массив.

На вкладке Главная в группе буфер обмена нажмите кнопку Копировать .

На вкладке Главная в группе буфер обмена щелкните стрелку под кнопкой Вставить , а затем выберите команду Вставить значения.

Удаление формулы массива

Чтобы удалить формулу массива, убедитесь, что выделять все ячейки в диапазоне ячеек, содержащих формулу массива. Для этого:

Щелкните ячейку в формуле массива.

Нажмите кнопку Дополнительный.

Нажмите кнопку Текущий массив.

Нажмите клавишу DELETE.

Удаление формулы с сохранением результатов

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

Щелкните главная > Копировать (или нажмите клавиши CTRL + C).

На вкладке главная > щелкните стрелку под кнопкой Вставить > Вставить значения.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community, попросить помощи в сообществе Answers community, а также предложить новую функцию или улучшение на веб-сайте Excel User Voice.

Примечание: Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Была ли информация полезной? Для удобства также приводим ссылку на оригинал (на английском языке).

Как убрать формулу в Excel

Excel – это многофункциональный табличный редактор, который обладает большими возможностями. В нем имеется возможность производить определенные вычисления при помощи формул, данные формулы вписываются в соответствующие ячейки и в любой момент доступны для просмотра и редактирования. Некоторым пользователям может потребоваться сохранить итоговый документ без формул, для них важно, чтобы сохранился только результат вычислений, а не вся формула. Возможно, что нужно просто скрыть формулу от других пользователей. Для сохранения только результатов вычисления понадобится:

— Программа Excel(данная программа входит в пакет офисных программ Microsoft Office 2016, которую вы можете заказать со скидкой в нашем интернет-магазине).

Инструкция

Если вам требуется скрыть формулу только в определенной ячейке таблицы, то кликните по нужной ячейке и в строке функций отобразится данная формула (строка функций находится под панелью инструментов).
Щелчком правой кнопки мышки по данной ячейке вызовите контекстное меню и выберите пункт «Копировать». Выбранная ячейка должна выделиться пунктирным прямоугольником. Повторно вызовите контекстное меню для данной ячейки и укажите опцию «Специальная вставка». Будет загружено дополнительное диалоговое окно, в котором будут представлены различные варианты вставки. Из предложенных вариантов выберите «Значения» или «Значения и форматы чисел», подтвердите вставку нажатием на кнопку ОК. Опция «Специальная вставка»

Видео: Копирование формул в Excel, замена формул числовыми значениями

Как удалить в ячейке формулу, оставив значения?

Иногда формула в ячейке нужна лишь на короткое время – только для получения результата. А затем уже не нужна ни сама формула, ни ячейки, на которые она ссылается. Но вот беда – если удалить ячейки, то формула “ломается”, как это говорится. Т.е. в ячейке получается либо #ЗНАЧ! либо #ССЫЛКА! . Или Вам надо просто зафиксировать значение, полученное в результате работы формулы. Т.е. чтобы формулы там не было, а было только значение. Как ни странно, но делается это проще простого:

Выделяете ячейку/несколько ячеек с формулами – Копируете – Правая кнопка мыши – Специальная вставка – Значения

Вот и все. Больше формул нет.
Так же подобное можно сделать при помощи кода VBA:

Sub Formulas_To_Values() Selection.Value = Selection.Value End Sub

Для использования кода переходим в редактор VBA( Alt + F11 ) –Insert –Module и вставляем приведенный код. Чтобы выполнить код надо на листе нажать сочетание клавиш Alt + F8 , выбрать нужный код и нажать Выполнить
Данный код заменяет формулы в выделенном диапазоне на значения. Только необходимо учитывать, что выделенный диапазон должен быть неразрывным. Иначе код выдаст ошибку. А такой код

Sub All_Formulas_To_Values() ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value End Sub

заменит все формулы на листе в значения. При этом будут разорваны все связи на данном листе. Это стоит учитывать. Кстати, иногда именно для этого и применяют подобный код.

И в качестве бонуса ниже приведен код, который заменит все формулы на всех листах активной книги в значения:

Sub All_Formulas_To_Values_In_All_Sheets() Dim wsSh As Worksheet For Each wsSh In Sheets wsSh.UsedRange.Value = wsSh.UsedRange.Value Next wsSh End Sub

А этот код поможет заменить формулы на значения только в видимых ячейках(просматриваются выделенные ячейки):

Sub All_Formulas_To_Values_OnlyVisible() Dim rRng As Range, rArea As Range If Selection.Count = 1 Then Set rRng = ActiveCell Else Set rRng = Selection.SpecialCells(12) End If For Each rArea In rRng.Areas rArea.Value = rArea.Value Next rArea End Sub

КАК БЫСТРО ВЫЗЫВАТЬ:
Вообще данную команду можно вывести на Быструю панель и использовать в одно нажатие тогда, когда нужно.

2010 ExcelФайл– Параметры– Настройка. Выбрать команды из:Все команды. Находите команду Вставить значения и добавляете;
2007 ExcelМеню– Параметры Excel– Настройка. Выбрать команды из:Все команды. Находите команду Вставить значения и добавляете;
2003 Excel : Сервис– Настройка– вкладка Команды– категория Правка– Вставить значения.

Теперь у Вас появится значок на Быстрой панели.

ДОБАВИТЬ В КОНТЕКСТНОЕ МЕНЮ ЯЧЕЕК:
Если один раз выполнить код:

Sub Add_PasteSpecials() Dim cbb Set cbb = Application.CommandBars(“Cell”).FindControl(ID:=370) If Not cbb Is Nothing Then cbb.Delete ‘удаляем пункт, если он был уже добавлен ранее Application.CommandBars(“Cell”).Controls.Add ID:=370, before:=4 End Sub

то в контекстном меню мыши появится команда – “Вставить значения”. Она полностью дублирует стандартную, только вызвать её быстрее – одно нажатие и все.

Статья помогла? Поделись ссылкой с друзьями!

Как убрать формулу в Excel

Инструкция

Если вам требуется скрыть формулу только в определенной ячейке таблицы, то кликните по нужной ячейке и в строке функций отобразится данная формула (строка функций находится под панелью инструментов).
Щелчком правой кнопки мышки по данной ячейке вызовите контекстное меню и выберите пункт «Копировать». Выбранная ячейка должна выделиться пунктирным прямоугольником. Повторно вызовите контекстное меню для данной ячейки и укажите опцию «Специальная вставка». Будет загружено дополнительное диалоговое окно, в котором будут представлены различные варианты вставки. Из предложенных вариантов выберите «Значения» или «Значения и форматы чисел», подтвердите вставку нажатием на кнопку ОК. Опция «Специальная вставка»

Видео: Копирование формул в Excel, замена формул числовыми значениями

Как в эксель убрать формулу и оставить значение

Добрый день,
У меня есть необходимость на горомадных листах удалить все значения которые введены вручную, но при этом оставить все формулы которые есть на листе. (слишком большой объем работы для ручного удаления)

Формулы и значения введены в перемешку и приходится выискивать и вручную удалять числовые значения для того чтобы оставить формулы. В принципе, подойдет способ решения при котором все числовые значения или пусты ячейки заменялись бы на “0”, главное чтобы при этом все формулы оставались на своих местах. На крайняк подойдет способ при котором, посредством условного форматирования, подсвечивались бы все формулы, либо все числовые значения.

В интернетах и на форуме ответа нет. Заранее спасибо. Роюсь в поисках ответа.

В интернетах и на форуме ответа нет. Заранее спасибо. Роюсь в поисках ответа. 808

Сообщение Добрый день,
У меня есть необходимость на горомадных листах удалить все значения которые введены вручную, но при этом оставить все формулы которые есть на листе. (слишком большой объем работы для ручного удаления)

В интернетах и на форуме ответа нет. Заранее спасибо. Роюсь в поисках ответа. Автор – 808
Дата добавления – 22.11.2011 в 17:44

Есть таблица с формулами, значения подгружаются из других таблиц, файлов и т.д. Конечный файл содержит один лист с формулами. Для отправки по почте необходим только этот лист. Только значения.

При копировании в другой файл (лист) «только значения» , форматирование съезжает, постоянно приходится править. Не вариант. Пробовала разные способы копирования, в итоге все равно приходится много править , на печать выходит некорректно.

Хотела просто через «Сохранить как» или перевести копию этого файла, так чтобы сохранились значения ячеек без всех связей и формул. Никак не могу найти в справке как же заменить сразу во всем файле все формулы на значения.

Сообщение Есть таблица с формулами, значения подгружаются из других таблиц, файлов и т.д. Конечный файл содержит один лист с формулами. Для отправки по почте необходим только этот лист. Только значения.

Как убрать формулы из ячеек в Excel и оставить только значения

Удалить формулы в Excel можно множеством способов, каждый из которых сильно зависит от поставленной задачи. Как правило, при этом требуется сохранить в ячейках какие-то значения. Вариантов два:

это значения, вычисленные этими формулами,
сам текст формул.

Помимо вопроса о том, что оставить в ячейках после удаления формул, могут быть и другие вводные, такие как:

Где удалять формулы:
- в диапазоне,
- во всем листе,
- во всей книге.
Эта статья даст ответы на все вопросы выше.

Удалить формулы и сохранить данные

Наиболее распространенная задача — когда нужно оставить в ячейке результат формулы, а саму формулу удалить. В понимании Excel результат формулы является значением ячейки.

Так вот, чтобы перевести формулы в значения, нужно:
1. Выделить нужный диапазон ячеек (или одну ячейку, всю строку, столбец или весь лист).
2. Скопировать выделенное.
3. Вставить процедурой вставки «как значения».
Можно сделать это клавишами мыши или клавиатуры — суть процедуры от этого не меняется.

С помощью мыши

Не самый быстрый (так как работает только одна рука), но самый удобный и понятный способ. Выделяем, копируем и в контекстном меню (вызывается нажатием правой кнопки мыши по выделенному диапазону) команду со скриншота:

Команда «Вставить как значения» в командном меню вставки в Excel

С помощью клавиатуры (сочетания клавиш)

Копирование делается в соседний столбец или другую книгу. Я предпочитаю этот способ, хоть он и экономит лишь секунды.
1. Выделяем диапазон:
  - мышью, если это столбец, строка или лист,
  - сочетаниями Ctrl+Shift+стрелки или Shift+стрелки, если ячейки или диапазоны ячеек.
2. Копируем сочетанием Ctrl+C.
3. Перемещаемся стрелками к диапазону, куда нужно вставить данные, и/или нажимаем Ctrl+Tab для перехода в другую книгу.
4. Вызываем контекстное меню клавишей на клавиатуре. Иногда ее нет, но обычно на клавиатурах она расположена рядом с правым ALT.
5. Стрелками перемещаемся к команде (Вниз-вниз-вправо).
6. Нажимаем Enter.
Может показаться, что тут целых 6 шагов и это долго, но попробуйте приловчиться и сравнить работу на больших диапазонах ячеек — мышью будет точно дольше.

Перевод формул в их текст (без сохранения результирующих значений)

Иногда требуется для демонстрационных целей преобразовать ячейки, оставив текст формул. В таких случаях полезной будет процедура замены.

Выделяем диапазон формул, жмем Ctrl+H («эйч», англ.), чтобы запустить диалоговое окно «Найти и заменить» и в соответствующих окошках вбиваем значения.

Апостроф в результате замены не будет виден, и формулы будут выглядеть идентично их написанию, однако восприниматься программой будут как текст.

В видимых ячейках, пропуская скрытые фильтром

Вот здесь при использовании стандартных решений уже могут возникнуть проблемы. Процедура вставки «как значения» даст сбой и повредит данные, если в копируемом диапазоне есть отфильтрованные строки.

Вот код VBA-процедуры, который позволяет обойти проблему:

Он отработает на отлично, как и та же процедура надстройки. В синтаксисе кода присутствует проверка ячеек на предмет того, скрыты ли они.

Удаляем формулы только в отфильтрованных строках, пропуская скрытые

Удалить формулы на листе / во всех листах

Когда нужно быстро избавиться от всех формул на листе или во всей книге, также могут помочь соответствующие простенькие процедуры, написанные на VBA:

Ими можно воспользоваться без внедрения в свои файлы, подключив надстройку !SEMTools.

Удаляем формулы со всего листа с !SEMTools

Удаление формул надстройкой !SEMTools

Быструю замену формул на значения в выделенном диапазоне без необходимости копирования и особой вставки я реализовал в своей надстройке для Excel !SEMTools.

Для тех, кто не готов разбираться в VBA, после установки !SEMTools запуск процедуры доступен в два клика из соответствующего меню в группе «УДАЛИТЬ«. Функционал относится к бесплатным возможностям !SEMTools (работают без ограничений в любой версии).

Удалить формулы и сохранить значения в Excel с !SEMTools

Хотите так же быстро удалять формулы в Excel?
!SEMTools ускорит эту и сотни других задач!

Источник

Сохранить файл со значениями вместо формул

tati_2000

Дата: Четверг, 07.11.2013, 10:08 |
Сообщение № 1

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

Ранг: Новичок

Сообщений: 12

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

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

Excel 2010

Ответить

китин

Дата: Четверг, 07.11.2013, 10:17 |
Сообщение № 2

Группа: Модераторы

Ранг: Экселист

Сообщений: 6973

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

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

Excel 2007;2010;2016

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

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Сообщение отредактировал китин — Четверг, 07.11.2013, 10:19

Ответить

Pelena

Дата: Четверг, 07.11.2013, 10:17 |
Сообщение № 3

Группа: Админы

Ранг: Местный житель

Сообщений: 18797

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

Замечаний:
±

Excel 2016 & Mac Excel

Посмотрите здесь, возможно поможет

«Черт возьми, Холмс! Но как??!!»
Ю-money 41001765434816

Ответить

RAN

Дата: Четверг, 07.11.2013, 10:18 |
Сообщение № 4

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

Ранг: Экселист

Сообщений: 5645

Скопировать лист в новую книгу, выделить все, скопировать, вставить значения, сохранить.

Быть или не быть, вот в чем загвоздка!

Ответить

tati_2000

Дата: Четверг, 07.11.2013, 12:38 |
Сообщение № 5

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

Ранг: Новичок

Сообщений: 12

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

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

Excel 2010

Скопировать лист в новую книгу, выделить все, скопировать, вставить значения, сохранить.

тогда форматирование съезжает, каждый день по новой править формат….

Ответить

tati_2000

Дата: Четверг, 07.11.2013, 12:40 |
Сообщение № 6

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

Ранг: Новичок

Сообщений: 12

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

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

Excel 2010

данные.изменить связи.разорвать связь.по идее формулы и связи должны уйти,все остальное остаться.

пробовала, значения пропадают, вернее некорректно, в общем ошибок много возникает

Ответить

SkyPro

Дата: Четверг, 07.11.2013, 12:49 |
Сообщение № 7

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

Ранг: Старожил

Сообщений: 1206

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

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

2010

[vba]

Код

Sub shValues()
Application.ScreenUpdating = False
        ActiveSheet.Copy After:=sheets(sheets.Count)
        Cells.Copy
        Cells.PasteSpecial Paste:=xlPasteValues
ActiveSheet.Move
Application.ScreenUpdating = True
End Sub

[/vba]

Запускать на том листе, который нужно отправлять.
Если подойдет — можно будет допилить переименование и сохранение. Пока не стал с этим заморачиваться.

skypro1111@gmail.com

Сообщение отредактировал SkyPro — Четверг, 07.11.2013, 12:54

Ответить

китин

Дата: Четверг, 07.11.2013, 12:56 |
Сообщение № 8

Группа: Модераторы

Ранг: Экселист

Сообщений: 6973

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

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

Excel 2007;2010;2016

вернее некорректно, в общем ошибок много возникает

каких ошибок?я очень часто отправляю скопированные файлы,разорвав связи.некорректной работы что то не замечал

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

RAN

Дата: Четверг, 07.11.2013, 13:30 |
Сообщение № 9

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

Ранг: Экселист

Сообщений: 5645

тогда форматирование съезжает, каждый день по новой править формат….

Значит не так делаете.

Сергей
[vba]

Код

Sub shValues()
     Application.ScreenUpdating = False
     ActiveSheet.Copy
     ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
     ActiveWorkbook.Save
     Application.ScreenUpdating = True
End Sub

[/vba]

Быть или не быть, вот в чем загвоздка!

Ответить

SkyPro

Дата: Четверг, 07.11.2013, 13:31 |
Сообщение № 10

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

Ранг: Старожил

Сообщений: 1206

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

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

2010

Ну да
Я просто рекордером записал и убрал лишнее.

skypro1111@gmail.com

Ответить

tati_2000

Дата: Четверг, 07.11.2013, 13:38 |
Сообщение № 11

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

Ранг: Новичок

Сообщений: 12

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

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

Excel 2010

Посмотрите здесь, возможно поможет

Спасибо. То что надо. Жаль только по диапазонам ячеек (хотя конечно это целесообразней) , всем файлом нельзя. Но это в разы лучше чем форматировать каждый раз. Очень благодарна.

Ответить

poiuytr

Дата: Среда, 20.08.2014, 13:33 |
Сообщение № 12

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

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

Сообщений: 1

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

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

Excel 2000 и ранее

у меня работает. форматирование не пропадает. эксель 97-2003
китин, спасибо.

Ответить

Liam

Дата: Пятница, 22.08.2014, 19:30 |
Сообщение № 13

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

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

Сообщений: 3

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

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

Excel 2010

форматирование не пропадает. эксель 2007

Ответить

Источник

Преобразование формул в значения

Формулы – это хорошо. Они автоматически пересчитываются при любом изменении исходных данных, превращая Excel из «калькулятора-переростка» в мощную автоматизированную систему обработки поступающих данных. Они позволяют выполнять сложные вычисления с хитрой логикой и структурой. Но иногда возникают ситуации, когда лучше бы вместо формул в ячейках остались значения. Например:

Вы хотите зафиксировать цифры в вашем отчете на текущую дату.
Вы не хотите, чтобы клиент увидел формулы, по которым вы рассчитывали для него стоимость проекта (а то поймет, что вы заложили 300% маржи на всякий случай).
Ваш файл содержит такое больше количество формул, что Excel начал жутко тормозить при любых, даже самых простых изменениях в нем, т.к. постоянно их пересчитывает (хотя, честности ради, надо сказать, что это можно решить временным отключением автоматических вычислений на вкладке Формулы – Параметры вычислений).
Вы хотите скопировать диапазон с данными из одного места в другое, но при копировании «сползут» все ссылки в формулах.

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

Способ 1. Классический

Этот способ прост, известен большинству пользователей и заключается в использовании специальной вставки:

Выделите диапазон с формулами, которые нужно заменить на значения.
Скопируйте его правой кнопкой мыши – Копировать (Copy).
Щелкните правой кнопкой мыши по выделенным ячейкам и выберите либо значок Значения (Values):

либо наведитесь мышью на команду Специальная вставка (Paste Special), чтобы увидеть подменю:

Из него можно выбрать варианты вставки значений с сохранением дизайна или числовых форматов исходных ячеек.

В старых версиях Excel таких удобных желтых кнопочек нет, но можно просто выбрать команду Специальная вставка и затем опцию Значения (Paste Special — Values) в открывшемся диалоговом окне:

Способ 2. Только клавишами без мыши

При некотором навыке, можно проделать всё вышеперечисленное вообще на касаясь мыши:

Копируем выделенный диапазон Ctrl+C
Тут же вставляем обратно сочетанием Ctrl+V
Жмём Ctrl, чтобы вызвать меню вариантов вставки
Нажимаем клавишу с русской буквой З или используем стрелки, чтобы выбрать вариант Значения и подтверждаем выбор клавишей Enter:

Способ 3. Только мышью без клавиш или Ловкость Рук

Этот способ требует определенной сноровки, но будет заметно быстрее предыдущего. Делаем следующее:

Выделяем диапазон с формулами на листе
Хватаем за край выделенной области (толстая черная линия по периметру) и, удерживая ПРАВУЮ клавишу мыши, перетаскиваем на пару сантиметров в любую сторону, а потом возвращаем на то же место
В появившемся контекстном меню после перетаскивания выбираем Копировать только значения (Copy As Values Only).

После небольшой тренировки делается такое действие очень легко и быстро. Главное, чтобы сосед под локоть не толкал и руки не дрожали

Способ 4. Кнопка для вставки значений на Панели быстрого доступа

Ускорить специальную вставку можно, если добавить на панель быстрого доступа в левый верхний угол окна кнопку Вставить как значения. Для этого выберите Файл — Параметры — Панель быстрого доступа (File — Options — Customize Quick Access Toolbar). В открывшемся окне выберите Все команды (All commands) в выпадающем списке, найдите кнопку Вставить значения (Paste Values) и добавьте ее на панель:

Теперь после копирования ячеек с формулами будет достаточно нажать на эту кнопку на панели быстрого доступа:

Кроме того, по умолчанию всем кнопкам на этой панели присваивается сочетание клавиш Alt + цифра (нажимать последовательно). Если нажать на клавишу Alt, то Excel подскажет цифру, которая за это отвечает:

Способ 5. Макросы для выделенного диапазона, целого листа или всей книги сразу

Если вас не пугает слово «макросы», то это будет, пожалуй, самый быстрый способ.

Макрос для превращения всех формул в значения в выделенном диапазоне (или нескольких диапазонах, выделенных одновременно с Ctrl) выглядит так:

Sub Formulas_To_Values_Selection()
'преобразование формул в значения в выделенном диапазоне(ах)
    Dim smallrng As Range
    For Each smallrng In Selection.Areas
        smallrng.Value = smallrng.Value
    Next smallrng
End Sub

Если вам нужно преобразовать в значения текущий лист, то макрос будет таким:

Sub Formulas_To_Values_Sheet()
'преобразование формул в значения на текущем листе
    ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
End Sub

И, наконец, для превращения всех формул в книге на всех листах придется использовать вот такую конструкцию:

Sub Formulas_To_Values_Book()
'преобразование формул в значения во всей книге
    For Each ws In ActiveWorkbook.Worksheets
        ws.UsedRange.Value = ws.UsedRange.Value
    Next ws
End Sub

Код нужных макросов можно скопировать в новый модуль вашего файла (жмем Alt+F11 чтобы попасть в Visual Basic, далее Insert — Module). Запускать их потом можно через вкладку Разработчик — Макросы (Developer — Macros) или сочетанием клавиш Alt+F8. Макросы будут работать в любой книге, пока открыт файл, где они хранятся. И помните, пожалуйста, о том, что действия выполненные макросом невозможно отменить — применяйте их с осторожностью.

Способ 6. Для ленивых

Если ломает делать все вышеперечисленное, то можно поступить еще проще — установить надстройку PLEX, где уже есть готовые макросы для конвертации формул в значения и делать все одним касанием мыши:

В этом случае:

всё будет максимально быстро и просто
можно откатить ошибочную конвертацию отменой последнего действия или сочетанием Ctrl+Z как обычно
в отличие от предыдущего способа, этот макрос корректно работает, если на листе есть скрытые строки/столбцы или включены фильтры
любой из этих команд можно назначить любое удобное вам сочетание клавиш в Диспетчере горячих клавиш PLEX

Ссылки по теме

Что такое макросы, как их использовать, копировать и запускать
Как скопировать формулы без сдвига ссылок
Как считать в Excel без формул

Источник

Удалить формулы и сохранить данные
- С помощью мыши
- С помощью клавиатуры (сочетания клавиш)
Перевод формул в их текст (без сохранения результирующих значений)
- В видимых ячейках, пропуская скрытые фильтром
- Удалить формулы на листе / во всех листах
- Удаление формул надстройкой !SEMTools

это значения, вычисленные этими формулами,
сам текст формул.

Помимо вопроса о том, что оставить в ячейках после удаления формул, могут быть и другие вводные, такие как:

Где удалять формулы:
- в диапазоне,
- во всем листе,
- во всей книге.
Нужно ли удалять формулы в скрытых/отфильтрованных строках.

Эта статья даст ответы на все вопросы выше.

Удалить формулы и сохранить данные

Наиболее распространенная задача — когда нужно оставить в ячейке результат формулы, а саму формулу удалить. В понимании Excel результат формулы является значением ячейки.

Так вот, чтобы перевести формулы в значения, нужно:

Выделить нужный диапазон ячеек (или одну ячейку, всю строку, столбец или весь лист).
Скопировать выделенное.
Вставить процедурой вставки “как значения”.

Можно сделать это клавишами мыши или клавиатуры — суть процедуры от этого не меняется.

С помощью мыши

Не самый быстрый (так как работает только одна рука), но самый удобный и понятный способ. Выделяем, копируем и в контекстном меню (вызывается нажатием правой кнопки мыши по выделенному диапазону) команду со скриншота:

Команда “Вставить как значения” в командном меню вставки в Excel

С помощью клавиатуры (сочетания клавиш)

Копирование делается в соседний столбец или другую книгу. Я предпочитаю этот способ, хоть он и экономит лишь секунды.

Пошагово:

Выделяем диапазон:
- мышью, если это столбец, строка или лист,
- сочетаниями Ctrl + Shift + стрелки или Shift + стрелки, если ячейки или диапазоны ячеек.
Копируем сочетанием Ctrl + C.
Перемещаемся стрелками к диапазону, куда нужно вставить данные, и/или нажимаем Ctrl + Tab для перехода в другую книгу.
Вызываем контекстное меню клавишей на клавиатуре. Иногда ее нет, но обычно на клавиатурах она расположена рядом с правым Alt.
Стрелками перемещаемся к команде (Вниз-вниз-вправо).
Нажимаем Enter.

Может показаться, что тут целых 6 шагов и это долго, но попробуйте приловчиться и сравнить работу на больших диапазонах ячеек — мышью будет точно дольше.

Перевод формул в их текст (без сохранения результирующих значений)

Иногда требуется для демонстрационных целей преобразовать ячейки, оставив текст формул. В таких случаях полезной будет процедура замены.

Выделяем диапазон формул, жмем Ctrl + H (“эйч”, англ.), чтобы запустить диалоговое окно “Найти и заменить” и в соответствующих окошках вбиваем значения

Апостроф в результате замены не будет виден, и формулы будут выглядеть идентично их написанию, однако восприниматься программой будут как текст

В видимых ячейках, пропуская скрытые фильтром

Вот здесь при использовании стандартных решений уже могут возникнуть проблемы. Процедура вставки “как значения” даст сбой и повредит данные, если в копируемом диапазоне есть отфильтрованные строки.

Вот код VBA-процедуры, который позволяет обойти проблему:

Sub remFormulas()
    Dim cell As Range
    For Each cell In Selection
        If Not (cell.EntireRow.Hidden = True Or cell.EntireColumn.Hidden = True) Then
            cell.Value2 = cell.Value2
        End If
    Next cell
End Sub

Он отработает на отлично, как и та же процедура надстройки. В синтаксисе кода присутствует проверка ячеек на предмет того, скрыты ли они.

Удаляем формулы только в отфильтрованных строках, пропуская скрытые

Удалить формулы на листе / во всех листах

Когда нужно быстро избавиться от всех формул на листе или во всей книге, также могут помочь соответствующие простенькие процедуры, написанные на VBA:

Sub удалитьФормулыСоВсегоЛиста()
ActiveSheet.UsedRange.Value2 = ActiveSheet.UsedRange.Value2
End Sub

Sub удалитьФормулыИзВсейКниги()
Dim w As Worksheet
For Each w In Worksheets
  With w.UsedRange
    .Value = .Value
  End With
Next w
End Sub

Ими можно воспользоваться без внедрения в свои файлы, подключив надстройку !SEMTools.

Удаляем формулы со всего листа с !SEMTools

Удаление формул надстройкой !SEMTools

Быструю замену формул на значения в выделенном диапазоне без необходимости копирования и особой вставки я реализовал в своей надстройке для Excel !SEMTools.

Для тех, кто не готов разбираться в VBA, после установки !SEMTools запуск процедуры доступен в два клика из соответствующего меню в группе «УДАЛИТЬ». Функционал относится к бесплатным возможностям !SEMTools (работают без ограничений в любой версии).

Удалить формулы и сохранить значения в Excel с !SEMTools

Хотите так же быстро удалять формулы в Excel?
!SEMTools ускорит эту и сотни других задач!

Источник