显示任意单元格的值

• 显示任意单元格的值

来自后台留言：

效果：

实现的方法也非常简单，把下面的代码粘贴到你想要实现功能的sheet页当中去就可以了。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)Sheets('Sheet2').Range('A1') = Target.ValueEnd Sub

顺便简单说说 Worksheet_SelectionChange 

Worksheet.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

效果：