Vba 从Excel中的其他工作表获取选定单元格的范围

Vba 从Excel中的其他工作表获取选定单元格的范围,vba,excel,excel-2003,Vba,Excel,Excel 2003,我正在尝试设置Excel,以便将第一个工作表中选定的单元格值设置为在其他工作表中双击的单元格值。到目前为止,我的代码如下所示: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim c As Range For Each c In Sheet1.Range("M11:M24") If IsEmpty(c) Then c.Value = Target

我正在尝试设置Excel,以便将第一个工作表中选定的单元格值设置为在其他工作表中双击的单元格值。到目前为止,我的代码如下所示:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)



Dim c As Range

For Each c In Sheet1.Range("M11:M24")
    If IsEmpty(c) Then
        c.Value = Target.Value
        Exit For
    End If
Next c
End Sub
这样做的目的是将m11:m24范围内的第一个空单元格设置为另一个工作表中双击单元格的内容。但我想要的不是一个静态的M11:M24范围,而是让用户通过单击第一个工作表中的单元格来选择它,移动到另一个工作表,双击该工作表中的单元格,并让值显示在第一个工作表中选定的单元格中。我想我可以设置一个变量来保存第一个工作表中选择的单元格,然后从另一个工作表中访问该单元格。但是如果Excel中有内置的功能,我更愿意只选择所选的单元格


有没有办法在Excel中获取选定的单元格/区域?

我很容易就解决了这个问题。代码是:

Sheet1.Activate
ActiveCell.Value = Target.Value
如果你想做一个完整的选择,试试看

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    Sheet1.Activate

    Dim r As Range
    Set r = Selection

    r.Value = Target.Value

End Sub