Wie wählt man jede n-te Spalte in Excel aus?

Angenommen, Sie haben ein großes Arbeitsblatt mit Hunderten von Datenspalten. Und jetzt müssen Sie die Daten jeder 3. Spalte kopieren und in ein anderes neues Arbeitsblatt einfügen. Es wäre zeitaufwendig, jede n-te Spalte einzeln auszuwählen. Gibt es eine einfache Möglichkeit, dies zu tun?

Jede n-te Spalte mit VBA auswählen

Jede n-te Spalte mit Kutools für Excel auswählen

Jede n-te Spalte mit VBA auswählen

Es scheint keinen einfachen Weg außer VBA-Code zu geben, um dieses Problem zu lösen. Bitte folgen Sie den folgenden Schritten:

1. Markieren Sie den Bereich, aus dem Sie jede n-te Spalte auswählen möchten.

2. Klicken Sie auf Entwickler > Visual Basic oder drücken Sie Alt+F11, ein neues Microsoft Visual Basic for Applications-Fenster wird angezeigt. Klicken Sie auf Einfügen > Modul, um den folgenden Code in das Modul einzufügen:

Sub EveryOtherColumn()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox("Enter column interval", xTitleId, Type:=1)
For i = 1 To InputRng.Columns.Count Step xInterval + 1
    Set rng = InputRng.Cells(1, i)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireColumn.Select
End Sub

3. Klicken Sie dann auf , um den Code auszuführen, und ein Dialogfeld wird angezeigt, das Sie auffordert, einen Bereich auszuwählen, mit dem Sie arbeiten möchten. Siehe Screenshot:

4. Klicken Sie auf OK, und geben Sie dann die Anzahl der Intervalle im nächsten Dialogfeld ein. Geben Sie in diesem Fall 3 in das Feld ein. Siehe Screenshot:

5. Klicken Sie auf OK. Nun werden alle 3. Spalten in der Auswahl markiert. Siehe Screenshot:

Hinweis: Sie können die Zahl im zweiten KutoolsforExcel-Dialogfeld an Ihre Bedürfnisse anpassen.

Manchmal müssen Sie jedoch zwei Spalten mit zwei Intervallen auswählen. Der obige Code funktioniert nicht. Was sollten Sie tun?

Jede n-te Spalte mit Kutools für Excel auswählen

Kutools für Excel: Mit mehr als 300 praktischen Excel-Add-ins, kostenlos 30 Tage lang ohne Einschränkungen testen. Jetzt herunterladen.

Mit Kutools für Excel können Sie eine bestimmte Anzahl von Spalten in bestimmten Abständen auswählen. Bitte folgen Sie den folgenden Schritten:

1. Klicken Sie auf Kutools > Auswählen >Intervallzeilen/Spalten auswählen.

2. Ein Intervallzeilen/Spalten auswählen Dialogfeld wird angezeigt. Klicken Sie dann auf , um den benötigten Bereich auszuwählen, und wählen Sie Spalten aus Auswahlbereich, und geben Sie die gewünschte Zahl im Abstand von und Spalten Dropdown-Liste an. Hier wählen wir zwei Spalten aus jeder 3. Spalte aus. Siehe Screenshot:

3. Klicken Sie auf OK. Es werden zwei Spalten mit zwei Intervallen in der Auswahl markiert. Siehe Screenshot:

Hinweis: Wenn Sie im Popup-Dialogfeld 'Gesamte Spalten auswählen' aktivieren, werden die gesamten Spalten im Blatt ausgewählt. Siehe Screenshot:

Verwandte Artikel:

• Jede zweite oder n-te Zeile in Excel auswählen
• Jede zweite Zeile kopieren
• Jede zweite Zeile löschen
• Jede zweite Zeile ausblenden