Direkt zum Inhalt

Wie kann ich mich darauf beschränken, nur Werte in Excel einzufügen (Formatierung verhindern)?

Normalerweise fügen wir kopierte Daten ein, indem wir gleichzeitig die Tasten Strg + V drücken. Dadurch werden die kopierten Werte zusammen mit der gesamten Zellenformatierung eingefügt. Wenn Sie nur die Werte einfügen und die Zellenformatierung einschränken müssen, können Ihnen die folgenden Methoden helfen.

Beschränken Sie sich darauf, nur Werte einzufügen (Formatierung verhindern) mit der Funktion zum Einfügen von Werten
Beschränken Sie sich darauf, nur Werte mit VBA-Code einzufügen (Formatierung verhindern)
Beschränken Sie das Einfügen von Werten nur mit Kutools für Excel


Beschränken Sie sich darauf, nur Werte einzufügen (Formatierung verhindern) mit der Funktion zum Einfügen von Werten

Eine einfache Möglichkeit, das Einfügen von Werten einzuschränken, besteht darin, die kopierten Daten nur in Excel als Werte einzufügen.

1. Klicken Sie nach dem Kopieren der Daten mit der rechten Maustaste auf die Zielzelle, in die Sie die Daten einfügen möchten.

2. Klicken Sie dann auf Werte Knopf unter dem Einfügeoptionen Abschnitt im Kontextmenü. Siehe Screenshot:

Sie können sehen, dass nur Werte kopierter Zellen in die Zielzellen eingefügt werden.


Beschränken Sie sich darauf, nur Werte mit VBA-Code einzufügen (Formatierung verhindern)

Mit dem folgenden VBA-Code können Sie nur Werte kopierter Zellen einfügen und die gesamte Zellenformatierung einschränken. Bitte gehen Sie wie folgt vor.

1. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Doppelklicken Sie auf das Fenster DiesesWorkbook der Projekt rechter Bereich zum Öffnen der DiesesWorkbook Codefenster. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das Fenster ein.

VBA-Code: Beschränken Sie das Einfügen von Werten nur in 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. Drücken Sie die Taste Andere + Q Tasten gleichzeitig, um das Fenster Microsoft Visual Basic für Applikationen zu schließen.

Kopieren Sie nun Ihre Daten und wechseln Sie zum Zielarbeitsblatt. Mit nur einem Klick oder Rechtsklick auf die Zielzelle werden die Werte der kopierten Zellen ohne sofortige Formatierung eingefügt.


Beschränken Sie das Einfügen von Werten nur mit Kutools für Excel

Kutools für Excel 's Bereiche kopieren Mit dem Dienstprogramm können Sie einfach nur Werte eines ausgewählten Bereichs oder mehrerer ausgewählter Bereiche in Excel einfügen. Bitte gehen Sie wie folgt vor.

Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.

1. Wählen Sie einen Bereich oder mehrere Bereiche aus, während Sie die Taste gedrückt halten Ctrl Schlüssel, dann klicken Sie Kutoolen > Bereiche kopieren

2. In dem Mehrere Bereiche kopieren Wählen Sie im Dialogfeld nur die Werte Option in der Inhalte einfügen Klicken Sie dann auf OK .

Note: Sie können beide oder einen der überprüfen Einschließlich Reihenhöhe und dem Einschließlich Spaltenbreite Optionen nach Bedarf.

3. Im nächsten Mehrere Bereiche kopieren Wählen Sie im Dialogfeld eine leere Zelle zum Einfügen der kopierten Zellen aus und klicken Sie dann auf OK .

Dann werden nur Werte aller ausgewählten Zellen in einem Bereich oder mehreren Bereichen eingefügt.

  Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.


In Verbindung stehende Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien    VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste    Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln    Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung


Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (14)
No ratings yet. Be the first to rate!
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
This comment was minimized by the moderator on the site
Hi, any chance to add this feature only in some sheets?
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
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!
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
This comment was minimized by the moderator on the site
It's sad no one answers. I need this information too.
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)
This comment was minimized by the moderator on the site
This addition was a great help! Thank you so much for posting!
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.
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
This comment was minimized by the moderator on the site
Dean, it is very useful! Thanks!
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.
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
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.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations