我在单元格D10中有一个数据验证列表。当用户选择一个值时,我希望将该值复制到同一工作表上的其他单元格中。
当我尝试时
Range("G10").value= Range("D10").value
没有返回任何内容。
由于D10是一个数据验证列表,我也尝试了
Range("G10").value=Range("D10").validation.value
(来自在线找到的示例代码(,但仍然没有返回任何内容。
这对我有效:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$10" Then
Range("G10").Value = Range("D10").Value
End If
End Sub
它必须放置在包含数据验证单元格的工作表的代码中。我猜你没有用$来识别手机。