显示任意单元格的值

来自后台留言：

效果：

实现的方法也非常简单，把下面的代码粘贴到你想要实现功能的sheet页当中去就可以了。Private Sub Worksheet_SelectionChange(ByVal Target As Range)Sheets('Sheet2').Range('A1') = Target.ValueEnd Sub

顺便简单说说 Worksheet_SelectionChangeWorksheet.SelectionChange 事件 (Excel)当工作表上的选定区域发生改变时发生此事件。语法表达式.SelectionChange (Target)表达式 一个代表 Worksheet 对象的 变量。参数名称必需/可选数据类型说明Target必需Range新选定的区域。示例本示例滚动工作簿窗口，直至选定区域位于窗口的左上角。例：Private Sub Worksheet_SelectionChange(ByVal Target As Range) With ActiveWindow .ScrollRow = Target.Row .ScrollColumn = Target.Column End With End Sub效果：