如何find使用VBA进行范围select的单元名称

我想找出用户在Excel表格中select的单元格的名称。 看清楚下面的图片。 在示例中，我需要使用VBAmacros检索所有单元格名称（A1，B1，C1，D1，E1，F1）。

我能够找出有多less个单元格被选中，但是不知道如何检索它们的名字。

Answer 1

如果您希望将名称存储到数组中，则需要遍历范围内的所有单元格，并将每个单元格的地址存储到数组或集合中。 这里是一个示例，让你开始：

Public Sub TestIt() Dim addressArr() As String Dim i As Long addressArr = GetSelectedCells(Selection) For i = LBound(addressArr) To UBound(addressArr) MsgBox addressArr(i) Next i End Sub Public Function GetSelectedCells(selectedRng As Range) As String() Dim cellArr() As String Dim cell As Range Dim i As Long ReDim cellArr(0 To (selectedRng.Cells.Count - 1)) i = 0 'setup index for storing to array For Each cell In selectedRng cellArr(i) = cell.Address(False, False) 'modify the address here to get reference style i = i + 1 Next cell GetSelectedCells = cellArr End Function