如何自動選擇非連續範圍的行/列

如何自動選擇非連續範圍的行/列

我有一個 Excel 文檔,我想在其中選擇幾百行(不一定是連續的),以便將它們複製到另一個文檔中(該文檔將順便用作 Word 地址標籤文檔的源文檔)。

我已經弄清楚瞭如何執行此操作的所有內容,除了第一部分:選擇適當的行。

是否有某個對話方塊可以在其中輸入字串,例如“1-5, 7, 9-13, 24-28, 33”,然後選擇指定的行?或者我必須使用某種宏?

編輯:請注意,我所追求的是常規選擇。我想「自動化」按住 CTRL 鍵單擊一列又一列的艱鉅過程,以實現所需的選擇。

答案1

這應該可以為您完成,假設(在下面的程式碼中)A1 是您放置資料的位置。

請注意,它將接受數字作為行,字串作為列

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

在此輸入影像描述

運行巨集後

在此輸入影像描述

答案2

如果您知道字母/數字,則可以使用簡單的公式來選擇它們: =B:B;D:D;G:G;I:I;K:K;N:P;

B:B 將選擇整列。 N:P 將選擇從 N 到 P 的整個列(包括在內)。

相關內容