Excel公示和宏代码

excel宏 实现点击复制

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Target.Copy End Sub 

创建超链接公式

=HYPERLINK("#"&"Sheet2"&"!A2",C2) 

#表示在当前工作薄
&为了链接Sheet2而加入的连接符号 
"Sheet2"想要连接到的工作表 
"!A2"想要连接到的单元格 
C2超链接显示的名称
THE END