Question

我正在尝试在Visual Studio中创建一个过程，以循环遍历未命名为Excel的范围。例如，用户选择“A1”＆amp; “A5”“A94”。在我的程序中，我可以看到range.count prorperty为值3，但是如果我创建一个Do循环，我不能获取所选范围的第二个单元格值，但我找到“A2”。我的程序是：

    Dim counter As Integer = 1
    Dim ActiveCell As Excel.Range

    Do
        ActiveCell = SelectedRange.Item(counter)
        ActiveCell.Select()
        MessageBox.Show(ActiveCell.Value2.ToString)
        counter = counter + 1
    Loop While counter <= SelectedRange.Count
    SelectedRange.Select()

Answer 1

这是一个简单的示例sub，它将每个选定单元格的值设置为1：

Sub EditSelection()
    Dim rng As Range

    For Each rng In Selection
        rng.Value = 1
    Next rng
End Sub

如果你在那之后还在苦苦挣扎，请告诉我

循环选定范围内的每个单元格

1 个答案: