Перейти до основного матеріалу

Як обмежити лише вставлення значень (запобігти форматуванню) в Excel?

Зазвичай ми вставляємо скопійовані дані лише одночасним натисканням клавіш Ctrl + V. І це вставить скопійовані значення разом із усіма форматуваннями комірок. Якщо вам просто потрібно вставити лише значення та обмежити форматування комірки, наступні методи можуть вам допомогти.

Обмежте лише вставлення значень (запобігання форматуванню) за допомогою функції вставлення значень
Обмежте лише вставлення значень (запобігання форматуванню) за допомогою коду VBA
Обмежити вставлення значень лише за допомогою Kutools для Excel

Обмежте лише вставлення значень (запобігання форматуванню) за допомогою функції вставлення значень

Найпростіший спосіб обмежити лише вставлення значень - це вставлення скопійованих даних як значень лише в Excel.

1. Після копіювання даних клацніть правою кнопкою миші клітинку призначення, до якої ви вставите дані.

2 Потім натисніть на Цінності кнопка під кнопкою Параметри вставки розділу в меню, що клацне правою кнопкою миші. Дивіться знімок екрана:

Ви можете бачити, що лише значення скопійованих комірок вставляються в комірки призначення.

Обмежте лише вставлення значень (запобігання форматуванню) за допомогою коду VBA

Наступний код VBA допомагає вставляти лише значення скопійованих комірок та обмежувати всі форматування комірок. Будь ласка, виконайте наступне.

1. прес інший + F11 клавіші одночасно, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікно, двічі клацніть на ThisWorkbook в Проекти права панель, щоб відкрити ThisWorkbook вікно коду. Потім скопіюйте та вставте наведений нижче код VBA у вікно.

Код VBA: забороняється вставляти значення лише в Excel

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    Target.PasteSpecial xlPasteValues
    Application.CutCopyMode = True
End Sub

3 Натисніть кнопку інший + Q одночасно, щоб закрити вікно Microsoft Visual Basic for Applications.

Тепер скопіюйте свої дані та перейдіть до робочого аркуша призначення. Лише один клік або клацання правою кнопкою миші на цільовій комірці негайно вставить значення скопійованих комірок без будь-якого форматування.

Обмежити вставлення значень лише за допомогою Kutools для Excel

Kutools для Excel"s Діапазони копіювання Утиліта допомагає легко вставляти лише значення вибраного діапазону або декількох вибраних діапазонів в Excel. Будь ласка, виконайте наступне.

Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.

1. Виберіть діапазон або кілька діапазонів, утримуючи Ctrl клавішу, а потім натисніть Кутулс > Діапазони копіювання. 

2 В Скопіюйте кілька діапазонів діалоговому вікні, виберіть лише Цінності опція в Вставити спеціально , а потім клацніть на OK кнопки.

примітки: Ви можете перевірити обидва або один із Включаючи висоту рядка і Включаючи ширину стовпця варіанти, як вам потрібно.

3. У наступному Скопіюйте кілька діапазонів діалоговому вікні, виберіть порожню комірку для вставки скопійованих комірок, а потім клацніть на OK кнопки.

Потім вставляються лише значення всіх вибраних комірок у діапазоні або декількох діапазонах.

  Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї програми, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.

Статті по темі:

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями  |   Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул   |  Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок   |  Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів:  12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис

Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (14)
No ratings yet. Be the first to rate!
bengiz30
bengiz30
This comment was minimized by the moderator on the site
Hello, there are a problem here, values are automatically paste when you click on the cell
Reply
0
0
Rafael
Rafael
This comment was minimized by the moderator on the site
Hi, any chance to add this feature only in some sheets?
Reply
0
0
Hei-KO
Hei-KO
This comment was minimized by the moderator on the site
Hallo,
ich habe eine Excel-Datei (100 Tabellenregister) für die ich eine Formel gesucht habe, die es erlaubt, beim Kopieren nur Werte einfügen, möglich zu machen.

Ausschneiden+Drag&Drop habe ich bereits per Makro ausgeschaltet. Ich habe jetzt im Netz folgenden Code gefunden, den ich in
"Diese Arbeitsmappe" geschrieben habe:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End Sub

(Der Code verursacht, dass ich nach kopieren, den Inhalt sofort als Wert in eine angeklickte Zelle kopiert bekomme)
Das funktioniert sehr gut, jedoch habe ich noch ein Problem dabei:

Wenn ich Werte aus einer Zelle kopiere, kann ich diese auch in geschützte
Zellen kopieren und das soll nicht sein. In vielen geschützten Zellen stehen Formeln die nicht überschrieben werden sollen.

Kann mir jemand helfen, wie ich den Code erweitern oder ändern kann, dass er es nur erlaubt in nicht geschützte Zellen zu kopieren?

Gruß Heiko
Reply
0
0
syazahisham91@gmail.com
This comment was minimized by the moderator on the site
Hi! for Kutools 'Copy Ranges', I realized there is limit on number of columns that can be copy at a time. I am working with 7,500 columns. I select 7,500 columns as the range, but it can only copy and paste partial of what I had selected, not all. I am planning to copy all these columns in one go and paste. Is there any way I can do that ? just to speed things up. Any help would highly be appreciated. Thanks!
Reply
Report
0
0
Dean
Dean
This comment was minimized by the moderator on the site
Hi, is there code for working with ctrl+v. This code paste automatically when selecting cell. I found module code below link but couldn't find code for workbook like this.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Reply
0
0
Adriana
Adriana     Dean
This comment was minimized by the moderator on the site
It's sad no one answers. I need this information too.
Reply
0
0
Travis
Travis
This comment was minimized by the moderator on the site
This code was great, but it was pasting items in the system clipboard that were copied from other programs. I put it in an 'If' statement which does nothing, unless Excel cells are actually in Cut or Copy mode. i.e. moving border around the cell(s).

Application.CutCopyMode has three modes: False = Not in Cut or Copy mode. | xlCopy = In Copy mode. | xlCut = In Cut mode.

'If in Cut or Copy mode, Paste Values Only
'If Not in Cut or Copy mode, skip and do nothing.

On Error Resume Next
If Not Application.CutCopyMode = False Then
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End If

This was a bit of a bugger for me to figure out. Hope it helps someone else.
-Travis (IT Professional since 1996)
Reply
0
0
Nikki
Nikki     Travis
This comment was minimized by the moderator on the site
This addition was a great help! Thank you so much for posting!
Reply
0
0
Gav
Gav     Travis
This comment was minimized by the moderator on the site
Hi Travis, Thank you very much for posting this.
I never respond to posts but i appreciate you posting this answer.
Reply
0
0
Dean
Dean     Gav
This comment was minimized by the moderator on the site
Hi Travis, is there code for working with ctrl+v. This code paste automatically when selecting cell. I found module code below link but couldn't find code for workbook like this. I hope what I have requested is possible.
https://www.extendoffice.com/documents/excel/2545-excel-set-paste-values-as-default.html
Reply
0
0
Eduardo
Eduardo     Dean
This comment was minimized by the moderator on the site
Dean, it is very useful! Thanks!
Reply
0
0
Me
Me
This comment was minimized by the moderator on the site
Thank you so much!! It works well and its so useful for the project that I am working on.
Reply
0
0
Bram Verschoren
Bram Verschoren
This comment was minimized by the moderator on the site
This works for me:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End Sub
Reply
0
0
Wishmaster
Wishmaster
This comment was minimized by the moderator on the site
Would this work on Worksheet level only? I am trying to restrict this only on one worksheet (not entire workbook), but it seems there is a problem.
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations