Wie füge ich eine bestimmte Anzahl von Spalten in festen Abständen in Excel ein?
Bei Ihrer täglichen Verwendung von Excel können Sie auf eine Situation stoßen, die Sie benötigen Fügen Sie weitere Spalten zwischen den vorhandenen Spalten hinzu. Sie können die Spalten natürlich einzeln mit der Funktion Einfügen einfügen. Aber wenn Sie mit großen Datenmengen konfrontiert sind und nach jeder zweiten oder n-ten Spalte drei Spalten einfügen müssen, ist die Einfügefunktion anscheinend nicht effektiv. Wie können Sie die Aufgabe also schnell erledigen? In diesem Tutorial werden wir über zwei einfache Methoden zur Lösung des Problems sprechen.
Fügen Sie in festen Abständen mit VBA-Code eine bestimmte Anzahl leerer Spalten in den Datenbereich ein
Wir können das Folgende verwenden VBA-Code um nach jeder n-ten Spalte eine bestimmte Anzahl leerer Spalten einzufügen. Bitte gehen Sie wie folgt vor.
1. Drücken Sie die Taste Alt + F11 Tasten in Excel, und es öffnet sich die Microsoft Visual Basic für Applikationen Fenster.
2 Klicken Insert > Modul und fügen Sie das folgende Makro in das ein Modul Fenster.
VBA-Code: Fügen Sie in festen Abständen eine bestimmte Anzahl von Spalten in die Daten ein
Sub InsertColumnsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xColumns As Integer
Dim xColumnsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xColumnsCount = WorkRng.Columns.Count
xInterval = Application.InputBox("Enter column interval. ", xTitleId, 1, Type:=1)
xColumns = Application.InputBox("How many columns to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Column + xInterval
xNum2 = xColumns + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xColumnsCount / xInterval)
xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xColumns - 1)).Select
Application.Selection.EntireColumn.Insert
xNum1 = xNum1 + xNum2
Next
End Sub
3. Drücken Sie die Taste F5 Schlüssel, um diesen Code auszuführen. Eine Eingabeaufforderung erscheint, um Sie daran zu erinnern, die auszuwählen Datenreichweite in die Sie leere Spalten einfügen möchten.
4. Klicken Sie auf die OK Taste. Ein weiteres Eingabeaufforderungsfeld erscheint, bitte eingeben die Anzahl der Spaltenintervalle der Spaltenintervall eingeben Box.
5. Klicken Sie weiter auf OK Taste. Die dritte Eingabeaufforderung erscheint, bitte angeben die Anzahl der Spalten, die Sie in jedem Intervall einfügen möchten in der BOx.
6. Klicken Sie auf die OK Schaltfläche, um das Ergebnis zu erhalten.
Fügen Sie mit einer erstaunlichen Funktion in festen Intervallen eine bestimmte Anzahl leerer Spalten in den Datenbereich ein
Wenn Sie die VBA-Codemethode nicht verwenden möchten, ist die Leere Zeilen und Spalten einfügen Merkmal von Kutools for Excel ist die perfekte Lösung für Sie. Mit dieser Funktion können Sie mit nur wenigen Klicks die bestimmte Anzahl von Spalten in festgelegten Intervallen in den Datenbereich einfügen.
Vor der Bewerbung Kutools for Excel, laden Sie es bitte zuerst herunter und installieren Sie es.
1. Wählen Sie zuerst den vorhandenen Datenbereich aus. Dann klick Kutoolen > Insert > Leere Zeilen und Spalten einfügen.
2. Das Leere Zeilen und Spalten einfügen Dialogfeld erscheint. Sie können den Datenbereich, den Sie in Schritt 1 ausgewählt haben, im Feld „Bereich“ sehen. Wählen Sie das Leere Spalten Option in der Einfügetyp Sektion. Und spezifizieren die Anzahl der Spaltenintervalle und Spalten, die Sie in jedem Intervall einfügen möchten. Hier gebe ich 1 und 3 separat ein.
3. Klicken Sie auf die OK Taste, um die Einstellung abzuschließen und das Ergebnis zu erhalten.
Note: Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms haben möchten, klicken Sie bitte, um es herunterzuladen, und wenden Sie dann den Vorgang gemäß den obigen Schritten an.
Wie füge ich schnell eine Zeile basierend auf dem aktuellen Datum in Excel ein?
Angenommen, es gibt ein Blatt mit einer Zeile mit Datumsangaben, und jetzt möchte ich eine Zeile direkt zum aktuellen Datum einfügen, die sich beim täglichen Öffnen der Arbeitsmappe automatisch ändert. Gibt es einen Trick, der es in Excel lösen kann?
Wie fügt man in Excel immer eine leere Zeile unten statt oben ein?
Wie wir alle wissen, wird beim Einfügen einer leeren Zeile in ein Arbeitsblatt die leere Zeile immer über der ausgewählten Zeile oder Zelle eingefügt. Manchmal müssen Sie jedoch die Zeile unter der ausgewählten Zelle oder Zeile einfügen. Wie können Sie diesen Job in Excel lösen?
Wie fügt man eine leere neue Zeile automatisch per Befehlsschaltfläche in Excel ein?
In vielen Fällen müssen Sie möglicherweise eine leere neue Zeile an einer bestimmten Position Ihres Arbeitsblatts einfügen. In diesem Artikel zeigen wir Ihnen, wie Sie automatisch eine leere neue Zeile einfügen, indem Sie in Excel auf eine Befehlsschaltfläche klicken.
Wie füge ich eine leere Zeile nach einem bestimmten Text in Excel ein?
Wenn Sie nach einem bestimmten Text leere Zeilen einfügen möchten, wie im folgenden Screenshot gezeigt, wie können Sie schnell und einfach damit umgehen, ohne sie einzeln manuell einzufügen?
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%
- 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...
- 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!