Direkt zum Inhalt

Wie kann die automatische Nummerierung bei doppelter Spaltenüberschrift in der Excel-Tabelle verhindert werden?

Wenn Sie in Excel die doppelte Spaltenüberschrift in die Tabelle eingeben, wird automatisch eine Nummer hinzugefügt, genau wie Name, Name1, Name2, und die Nummer kann nicht entfernt werden, wie der folgende Screenshot zeigt. Um die automatische Nummerierung bei doppelter Spaltenüberschrift in der Tabelle zu verhindern, können Sie der doppelten Überschrift ein abschließendes Leerzeichen hinzufügen. Hier ist ein VBA-Code, der Ihnen helfen kann, den Header zu wiederholen und nachgestellte Leerzeichen automatisch hinzuzufügen, damit sie unterschiedlich aussehen, aber gleich aussehen.
automatische Vervollständigung aus einer anderen Liste

Nachgestellte Leerzeichen automatisch zur Kopfzeile hinzufügen

Hinweis: Die in diesem Lernprogramm bereitgestellten Methoden wurden in Excel 2021 getestet, es kann in verschiedenen Excel-Versionen zu Abweichungen kommen.


Nachgestellte Leerzeichen automatisch zur Kopfzeile hinzufügen

1. Geben Sie die Überschriften ein, die Sie in einer Spalte wiederholen möchten, und drücken Sie dann Andere + F11 zu aktivierende Tasten Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Insert > Modul um ein neues Modul in der zu erstellen Microsoft Visual Basic für Applikationen Fenster, kopieren Sie dann den folgenden Code und fügen Sie ihn ein.

VBA: Wiederholen und nachgestellte Leerzeichen hinzufügen

Sub repeat()
'UpdatebyExtendoffice20220927
    Dim xRg As Range
    Dim saveRg As Range
    Dim xIndex As Integer
    Dim xCount As Integer
    Dim k As Integer
    Dim xStr As String
    Set xRg = Application.InputBox("Select the cells that you want to repeat", "kte", , , , , , 8)
    xIndex = Application.InputBox("Enter the repeat times", "kte")
    Set saveRg = Application.InputBox("Select a cell to output", "kte", , , , , , 8)
    xStr = ""
    xCount = xRg.Cells.Count * xIndex
    Set saveRg = saveRg.Range("a1").Resize(1, xCount)
    k = 0
    For i = 1 To xIndex
        For j = 1 To xRg.Cells.Count
            k = k + 1
            saveRg.Cells(k).Value = xRg.Cells(j).Value + xStr
        Next
        xStr = xStr + " "
    Next
End Sub

 automatische Vervollständigung aus einer anderen Liste

3 Klicken Führen Sie automatische Vervollständigung aus einer anderen Liste Schaltfläche im Menüband oder drücken F5 Taste, um den Code zu aktivieren, wählen Sie im ersten Popup-Dialogfeld die Überschriften aus, die Sie wiederholen möchten. Klicken OK.
automatische Vervollständigung aus einer anderen Liste

4. Geben Sie im zweiten Popup-Dialog die gewünschten Wiederholungszeiten ein. Klicken OK.
automatische Vervollständigung aus einer anderen Liste

5. Wählen Sie eine Zelle aus, für die Sie die wiederholten Überschriften ausgeben möchten. Klicken OK.
automatische Vervollständigung aus einer anderen Liste

Jetzt wurden die Überschriften wiederholt und mit nachgestellten Leerzeichen hinzugefügt.
automatische Vervollständigung aus einer anderen Liste

6. Wählen Sie die Kopfzeilen aus und kopieren Sie sie, indem Sie drücken Ctrl + C, und fügen Sie sie durch Drücken von wieder in die gewünschte Tabelle ein Ctrl + V.

Jetzt können Sie sehen, dass die Tabelle doppelte Spaltenüberschriften ohne Nummerierung hat.
automatische Vervollständigung aus einer anderen Liste


Sonstige Operationen (Artikel)

So finden Sie den maximalen oder minimalen absoluten Wert und behalten das Zeichen in Excel
Manchmal möchten Sie vielleicht die Maximal- oder Minimalwerte ihrer absoluten Werte finden, aber ihr Vorzeichen beibehalten, wenn Sie das Ergebnis zurückgeben, wie der folgende Screenshot zeigt.

Wie behält man den führenden Apostroph bei der Eingabe in Excel?
Wie wir wissen, können Sie, wenn Sie eine Zahl in einen Text umwandeln möchten, vorne ein Apostroph-Symbol eingeben: '123, und die Zahl wird in einen Text umgewandelt und der Apostroph ausgeblendet.

Wie erzwinge ich das Öffnen als schreibgeschützt in Excel?
Manchmal möchten Sie, dass andere Benutzer, die Ihre freigegebenen Arbeitsmappen öffnen, vorsichtig sind, wenn sie die freigegebenen Arbeitsmappen bearbeiten. Sie können eine schreibgeschützte Eingabeaufforderung erstellen, um sie zu warnen ...

Wie verhindert man, dass Excel Daten in CSV automatisch formatiert?
Hier ist eine CSV-Datei, die das Datum im Textformat 12. Mai 20 enthält, aber beim Öffnen über Excel automatisch im Datumsformat gespeichert wird ...


  • 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 und Speichern von Daten; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen und Summe / Durchschnitt... 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 ...
  • Lieblingsformeln und schnell einfügen, Bereiche, Diagramme und Bilder; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • 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...
  • Pivot-Tabellengruppierung nach Wochennummer, Wochentag und mehr ... Entsperrte, gesperrte Zellen anzeigen durch verschiedene Farben; Markieren Sie Zellen mit Formel / Name...
kte tab 201905
  • 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
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations