[已解决]Excel链接到工作表

武林长风

当点击B3单元格选择一小自动连接到一小工作表，选择二小自动连接到二小工作表，……求帮忙 新建文件夹.rar (2.45 KB, 下载次数: 15)

2014-7-18 10:39 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

兰色幻想

2014-7-18 11:07

自动跳转.rar (6.14 KB, 下载次数: 20)

2014-7-18 11:07 上传

点击文件名下载附件

跳转到最佳答案楼层

兰色幻想

自动跳转.rar (6.14 KB, 下载次数: 20)

2014-7-18 11:07 上传

点击文件名下载附件

武林长风

感谢兰版。

易安1

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2. Dim wk As Worksheet
   
3. If Target.Address = "$B$3" Then
   
4. For Each wk In Worksheets
   
5.     If wk.Name = Target.Value Then
   
6.         wk.Activate
   
7.     End If
   
8. Next
   
9. End If
   
10. End Sub

复制代码

易安1

写好 去吃饭了 回来已解决兰班大大V5