Как вставить все, кроме формул в Excel?

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

Вставка всех элементов, кроме формул, с помощью кода VBA
Вставка всех элементов, кроме формул, с помощью удивительного инструмента

Вставка всех элементов, кроме формул, с помощью кода VBA

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

1. Нажмите клавиши Alt + F11 одновременно, чтобы открыть окно Microsoft Visual Basic Application.

2. В окне Microsoft Visual Basic Application нажмите Вставить > Модуль.

3. Затем скопируйте и вставьте приведенный ниже код VBA в окно Модуля.

VBA: вставить все, кроме формул

Sub PasteSP()
	With Application.Selection
		.PasteSpecial XlPasteType.xlPasteValues
		.PasteSpecial XlPasteType.xlPasteComments
		.PasteSpecial XlPasteType.xlPasteFormats
	End With
	Application.CutCopyMode = False
End Sub

4. Вернитесь к листу, выберите диапазон, который вы хотите скопировать за исключением формул, и нажмите клавиши Ctrl + C для копирования, затем щелкните по пустой ячейке, куда вы хотите поместить результат. См. скриншот:

5. Перейдите снова в окно Microsoft Visual Basic Application и нажмите клавишу F5 для запуска кода.

Вы можете видеть, что формулы были удалены из вставленных данных, но другое форматирование сохранилось.

Примечание: Комментарии будут включены вместе со значениями и форматами, если выбранные ячейки содержат комментарии.

Вставка всех элементов, кроме формул, с помощью удивительного инструмента

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

1. Выберите ячейки, которые вы хотите скопировать за исключением формул, и нажмите Kutools > Формула > Точная копия. См. скриншот:

2. В диалоговом окне Точная копия формулы установите флажок Копировать форматирование, а затем нажмите кнопку ОК.

3. В следующем диалоговом окне выберите пустую ячейку для размещения результатов, а затем нажмите кнопку ОК.

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

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

Примечание: Комментарии не копируются этим методом.

Связанная статья:

• Как скопировать столбец и вставить только уникальные записи в Excel?