Direkt zum Inhalt

 Wie füge ich externe Inhalte in Excel ein, die immer der Zielformatierung entsprechen?

Beim Kopieren und Einfügen von Daten aus anderen externen Anwendungen in das Arbeitsblatt fügt Excel die Daten mit der Standardformatierung ein, die standardmäßig verwendet wird. Wenn Sie die eingefügten Daten im eigenen Format Ihres verwendeten Arbeitsblatts benötigen, sollten Sie beim Einfügen die Option Zielformatierung an Ihre Bedürfnisse anpassen auswählen. Wenn Sie diese Option jedoch häufig anwenden müssen, kann ich Ihnen helfen, diese Option als Standard festzulegen, wenn Sie zum Einfügen von Daten Strg + V verwenden.

Fügen Sie externen Inhalt in das Arbeitsblatt ein und stimmen Sie die Zielformatierung immer mit den Excel-Optionen ab

Fügen Sie externen Inhalt in das Arbeitsblatt ein und stimmen Sie die Zielformatierung immer mit dem VBA-Code ab


Fügen Sie externen Inhalt in das Arbeitsblatt ein und stimmen Sie die Zielformatierung immer mit den Excel-Optionen ab

Damit Excel die Daten mit der Zielformatierung einfügt, können Sie Ihrem einen speziellen Befehl hinzufügen Quick Access Toolbar.

1. Klicken Sie Reichen Sie das > Optionen, und in der Excel-Optionen Dialogbox:

  • (1.) Klicken Sie auf Quick Access Toolbar im linken Bereich;
  • (2.) Dann wählen Sie Alle Befehle für Wählen Sie Befehle aus Dropdown-Liste;
  • (3.) Und dann scrollen Sie nach unten und wählen Sie Zielformatierung einfügen und abgleichen im Listenfeld;
  • (4.) Klicken Sie dann auf Hinzufügen >> Schaltfläche, um diesen Befehl zum hinzuzufügen Anpassen der Symbolleiste für den Schnellzugriff.

doc-match-destination-formatating-1

2. Klicken Sie nach dem Hinzufügen dieses Befehls auf OK Schaltfläche, um dieses Dialogfeld zu schließen.

3. Und jetzt die Zielformatierung einfügen und abgleichen wurde hinzugefügt Anpassen der Symbolleiste für den Schnellzugriff, siehe Screenshot:

doc-match-destination-formatating-2

Und wenn Sie die Daten aus einer anderen Anwendung einfügen, müssen Sie nur auf klicken Zielformatierung einfügen und abgleichen Knopf im Quick Access Toolbarwird der Inhalt in das Blatt eingefügt, das der Zielformatierung Ihres Arbeitsblatts entspricht.

Hinweis: Diese Methode wird nicht auf Excel 2007 angewendet.


Fügen Sie externen Inhalt in das Arbeitsblatt ein und stimmen Sie die Zielformatierung immer mit dem VBA-Code ab

Sie können auch die Formatierung des Übereinstimmungsziels als Standardoption zum Einfügen festlegen, wenn Sie Strg + V mit dem folgenden VBA-Code verwenden.

1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.

VBA-Code: Legen Sie die Formatierung der Übereinstimmungsziele als Standardpaste fest

Sub PasteWithDestinationFormatting()
ActiveCell.PasteSpecial (xlPasteValues)
End Sub

3. Speichern und schließen Sie diesen Dialog und drücken Sie Alt + F8 Schlüssel zum Öffnen der Makro Dialog. In dem Makro Wählen Sie im Dialogfeld den in Schritt 2 erstellten Codenamen aus und klicken Sie auf Optionen Knopf, dann in der erschien Makrooptionen Dialog eingeben v für Tastenkombination Abschnitt, siehe Screenshot:

doc-match-destination-formatating-3

4. Dann klick OK der Makrooptionen Dialog, und schließen Sie die Makro Dialogbox.

Und jetzt, wenn Sie Ihre Daten aus einer externen Anwendung in das Arbeitsblatt mit einfügen Strg + Vwerden die Daten eingefügt als Formatierung des Ziel-Ziels standardmäßig.


In Verbindung stehender Artikel:

Wie setze ich Einfügewerte als Standard einfügen, wenn ich Strg + V in Excel verwende?


Demo: Externen Inhalt in Excel einfügen entspricht immer der Zielformatierung

Kutools for Excel: Mit mehr als 300 praktischen Excel-Add-Ins können Sie es innerhalb von 30 Tagen ohne Einschränkung testen. Jetzt herunterladen und kostenlos testen!

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
On "Paste external content to worksheet always match destination formatting with VBA code". After "4. Then click OK in the Macro Options dialog, and close the Macro dialog box". The code would take effect only after saving/closing your worksheet.
This comment was minimized by the moderator on the site
Tried the close and save method. Still running into the same issue that Suneet was.
This comment was minimized by the moderator on the site
Hey, the macro for paste is not working. When I hit CTRL+v, it says: Run-time error '1004': PasteSpecial method of Range class failed
This comment was minimized by the moderator on the site
I'm getting this same error
This comment was minimized by the moderator on the site
Hello, guys,
If you want to paste the contents from website, you should apply the following VBA code.

Sub PasteWithDestinationFormatting()
Dim xRg As Range
Set xRg = Application.InputBox("Please select a cell to paste: ", "Kutools for Excel", , , , , , 8)
If xRg Is Nothing Then Exit Sub
xRg.Range("A1").Activate
ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, DisplayAsIcon:=False
End Sub

After pasting this code into the code module, and then go to the Macro dialog box to set the shortcut.
From now, when pasting contents from other applications, such as Word, website, a prompt box will pop out to remind you select a cell to put the pasting contents, and the contents will be pasted as Match Destination Formatting by default.

Hope it can help you! Thank you!
This comment was minimized by the moderator on the site
What a dick
This comment was minimized by the moderator on the site
That worked, but now I have to double click, or else the Kutools message comes up. Any solution?
This comment was minimized by the moderator on the site
Works for me, just in case somebody needs it.

Sub PasteWithDestinationFormatting()
ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, DisplayAsIcon:=False
End Sub
This comment was minimized by the moderator on the site
it works thanks
This comment was minimized by the moderator on the site
The problem I see after enabling this macro, that works nicely btw,is that my Undo button is greyed out and CTRL+z doesn't work anymore...
This comment was minimized by the moderator on the site
Same, I also cannot use CTRL+Z or and the Undo button is grayed out after using control +Z. But CTRL +V works now to allow me to copy and paste from Google Docs to Excel and have it match the destination format, saving me hundreds of clicks. Thanks!
This comment was minimized by the moderator on the site
i dont know how to thank you for this. its finally solved THANKYOU SOMUCH
This comment was minimized by the moderator on the site
OH MY GOODNESS !!!! YOU LITERALLY ARE A LIFE SAVER!
This comment was minimized by the moderator on the site
This worked for me. Thanks. You just saved me a few hundred clicks a day.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations