So wählen Sie automatisch einen nicht aufeinanderfolgenden Zeilen-/Spaltenbereich aus

Question

Ich habe ein Excel-Dokument, in dem ich einige hundert Zeilen (nicht notwendigerweise aufeinanderfolgende) markieren möchte, um diese dann in ein anderes Dokument (das im Übrigen als Quelldokument für ein Word-Adressaufkleber-Dokument dienen soll) zu kopieren.

Ich habe alles herausgefunden, wie das geht, bis auf den ersten Teil: das Auswählen der entsprechenden Zeilen.

Gibt es irgendwo einen Dialog, in dem ich eine Zeichenfolge wie "1-5, 7, 9-13, 24-28, 33" eingeben kann, woraufhin die angegebenen Zeilen ausgewählt werden? Oder muss ich dafür ein Makro verwenden?

BEARBEITEN: Beachten Sie, dass es mir um eine normale Auswahl geht. Ich möchte den mühsamen Prozess des STRG-Klickens Spalte für Spalte „automatisieren“, um die gewünschte Auswahl zu erreichen.

Answer 1

Dies sollte für Sie erledigt sein, vorausgesetzt, dass (im folgenden Code) A1 der Ort ist, an dem Sie die Daten ablegen.

Bitte beachten Sie, dass Zahlen als Zeilen und Zeichenfolgen als Spalten akzeptiert werden.

Option Explicit
Sub HighlightAllSortsOfMadness()

Dim values() As String

values = Split(Range("A1").Value, ",") 'A1 is rows and columns you specify, such as 1,4,6,7,B,D . Separate each with a comma, 


Dim result As String

Dim i As Integer

    For i = 0 To UBound(values)
        If values(i) = "" Then
            Exit For
        End If

    result = result & values(i) & ":" & values(i) & ","

    Next i

    Range(Left(result, Len(result) - 1)).Select

End Sub

Vor

Und nachdem ich das Makro ausgeführt habe

Answer 2

Wenn Sie die Buchstaben/Zahlen kennen, können Sie diese mit einer einfachen Formel auswählen: =B:B;D:D;G:G;I:I;K:K;N:P;

Mit B:B wird die gesamte Spalte ausgewählt. Mit N:P werden die gesamten Spalten von N bis einschließlich P ausgewählt.