使用以下VBA代码将不规则单元格选择添加到现有选择中:
Sub AddToSelection()
    Dim cell As Range
    
    '选择要添加的不规则单元格
    Set cell = Range("C2,D5:E6,F9:H10")
    
    '将其添加到现有选择中
    Union(Selection, cell).Select
End Sub
请注意,此代码将选择添加到当前活动工作表的当前选择中。 您可以根据需要修改代码以适应特定的工作簿和工作表。