Note: The other languages of the website are Google-translated. Back to English

Wie lösche ich Zellen und fülle sie mit doppelten Werten in Excel?

Wenn Sie ein Arbeitsblatt haben, das zahlreiche zusammengeführte Zellen enthält, müssen Sie diese jetzt zusammenführen und die ursprünglichen Werte aus den zusammengeführten Zellen wie in den folgenden Screenshots automatisch ausfüllen. Wie können Sie diese Aufgabe schnell bewältigen?

Entfernen Sie die Zellen und füllen Sie sie mit dem Befehl Gehe zu Spezial mit doppelten Daten

Trennen Sie die Zellen und füllen Sie sie mit doppelten Daten mit VBA-Code

Trennen Sie die Zellen und füllen Sie sie mit einem Klick mit doppelten Daten


Pfeil blau rechte Blase Entfernen Sie die Zellen und füllen Sie sie mit dem Befehl Gehe zu Spezial mit doppelten Daten

Mit unserer Bandbreite an Gehe zu Spezial Befehl können Sie Zellen auflösen und die Werte ausfüllen. Diese Methode ist jedoch etwas mühsam. Führen Sie die folgenden Schritte aus:

1. Wählen Sie die Spalten aus, in denen Zellen zusammengeführt wurden.

2. Klicken Sie Startseite > Zusammenführen & zentrieren > Zellen entfernen. Siehe Screenshot:

3. Die zusammengeführten Zellen wurden nicht zusammengeführt und nur die erste Zelle wird mit den ursprünglichen Werten gefüllt. Und wählen Sie dann den Bereich erneut aus.

4. Dann klick Startseite > Suchen & Auswählen > Gehe zu Spezial. In dem Gehe zu Spezial Dialogfeld auswählen Rohlinge Möglichkeit. Siehe Screenshot:

5. Und dann klick OKwurden alle leeren Zellen im Bereich ausgewählt. Dann eingeben = und drücken Sie Up Pfeiltaste auf der Tastatur. Siehe Screenshot:

6. Dann drücken Strg + Eingabetaste Schlüssel, alle leeren Zellen wurden mit den ursprünglich zusammengeführten Daten gefüllt. Siehe Screenshot:


Pfeil blau rechte Blase Trennen Sie die Zellen und füllen Sie sie mit doppelten Daten mit VBA-Code

Mit dem folgenden VBA-Code können Sie die Zellen schnell trennen und die Werte auffüllen.

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 das folgende Makro in das Feld ein ModulFenster.

Sub UnMergeSameCell () 'Upadateby Extendoffice
Dim Rng As Range, xCell As Range xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Typ: = 8) Application.ScreenUpdating = False Application.DisplayAlerts = False für jedes Rng in WorkRng Wenn Rng.MergeCells, dann mit Rng.MergeArea .UnMerge .Formula = Rng.Formula End With End If Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub

3. Drücken Sie dann die Taste F5 Mit der Taste zum Ausführen dieses Codes wird ein Dialogfeld zur Auswahl eines Bereichs angezeigt, mit dem gearbeitet werden soll. Siehe Screenshot:

4. Klicken Sie OKDann wurden die zusammengeführten Zellen aufgelöst und die ursprünglich zusammengeführten Werte automatisch ausgefüllt.


Pfeil blau rechte Blase Trennen Sie die Zellen und füllen Sie sie mit einem Klick mit doppelten Daten

Mit unserer Bandbreite an Zelle entfernen Nutzen von Kutools for ExcelMit dieser Methode können Sie Zellen zusammenführen und mit doppelten Daten füllen. Diese Methode ist sehr einfach und praktisch.

Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen

Nach der Installation Kutools for Excelkönnen Sie wie folgt vorgehen:

1. Wählen Sie die Spalten aus, die Sie trennen möchten, und füllen Sie die Daten aus.

2. Klicken Sie Kutoolen > Zusammenführen & Teilen > Zellen entfernen und Wert füllen, siehe Screenshot:

3. Und die zusammengeführten Zellen wurden sofort zusammengeführt und mit den doppelten Werten gefüllt. Siehe Screenshots:


Pfeil blau rechte Blase Trennen Sie Zellen und füllen Sie doppelte Daten mit Kutools for Excel

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!

In Verbindung stehender Artikel:

Führen Sie benachbarte Zeilen mit denselben Daten in Excel zusammen


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

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!
officetab unten
Kommentare (47)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Vielen Dank für das Aufheben der Zusammenführung und das Duplizieren des VBA-Codes
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Brillant !! VBA-Code funktioniert einwandfrei. mein Problem mit dem Export in CSV behoben :)
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Die VBA hat super funktioniert, außer dass ich sie für eine 16-stellige Zahl verwendet habe und Excel die letzte Ziffer in eine "0" umwandelt. Irgendwelche Vorschläge für eine Problemumgehung dafür?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Beide Methoden funktionieren einwandfrei. Danke :-)
Dieser Kommentar wurde vom Moderator auf der Website minimiert
OMG, du hast mir gerade SO VIEL ZEIT gespart.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
das ist fantastisch. Lebensretter
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Das hat mir unzählige Stunden gespart, vielen Dank dafür. Mir ist eine Sache aufgefallen, auf die ich beim Go To Special Command gestoßen bin, die mich für eine Sekunde verwirrt hat. Ich musste innerhalb des Dokuments suchen, und die Strg+Enter-Funktion kopiert den Code, aber nicht den Wert. Ich empfehle (wenn Sie wie ich suchen möchten), die zusammengeführte Zeile zu kopieren und spezielle Werte einzufügen. Dadurch wird der Code entfernt und durchsuchbarer Text erstellt. Nochmals vielen Dank für diesen tollen Trick.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gute Arbeit. Aber die Function-Methode funktionierte zuerst gut auf den ersten 2288 Zeilen, dann ohne Fehler oder Benachrichtigung, machte einfach keine Zeilen darüber hinaus. Ich habe über 6000 Zeilen (Zeilen). Wenn ich manuell einen Bereich jenseits der 2288-Zeile auswähle, funktioniert die Function-Methode nicht. Leider mischt der Datenlieferant Zeilen in der Excel-Datenlieferung zusammen. Irgendwelche Vorschläge? Danke für die tollen Infos.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ihre Anweisungen sind so einfach wie mächtig !!! Ich schulde dir ein Abendessen.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Sir, Sie haben mein Leben gerettet, Sie sind der Grund, warum ich diese Seite mit einem Lesezeichen versehen habe :)!!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Extrem hilfreich! Vielen Dank!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Sehr hilfreich..! Vielen Dank.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Du hast meine Woche gemacht! 8)
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Vielen Dank das ist ein sehr hilfreicher Beitrag. Es spart mir wirklich viel Zeit
Dieser Kommentar wurde vom Moderator auf der Website minimiert
vielen dank für deine lösung...
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Fantastisch! Weiter so mit der guten Arbeit!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Das ist wirklich hilfreich, aber ich habe eine Frage. Gibt es eine Möglichkeit, den VBA-Code so zu ändern, dass leere verbundene Zellen übersprungen werden? Ich möchte nur, dass die Zelle nicht zusammengeführt und dupliziert wird, wenn ein anderer Wert als leer vorhanden ist. Ich bin sicher, es würde nicht viel mehr als ein oder zwei if/else-Anweisungen brauchen, ich bin einfach zu dumm, um es zu tun.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Sehr schöne Erklärung mit Screenshot .... vielen Dank ...
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Mein Leben gerettet! Vielen Dank!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gute. viel Zeit gespart Danke
Es sind noch keine Kommentare vorhanden
Mehr laden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL