[已解决]怎么让特定的表最先显示

城市weige

我的EXCEL中现在有7个SHEET，现在我只想在每次打开时都是自动显示SHEET2，无论最后关闭时，是从那个表里关闭，下次打开时都会初始化为从SHEET2打开。

最佳答案

月排行榜 / 总排行榜

mxg825

2011-12-11 23:11

按ALT+F11
双击：ThisWorkbook，把下面的代码放进去，保存工作薄
Private Sub Workbook_Open()
SheetS("Sheet2").Select
End Sub

跳转到最佳答案楼层

菜鸟锐

vb不会。进来顶贴！！！

城市weige

菜鸟锐 发表于 2011-12-11 22:58
vb不会。进来顶贴！！！

好呀，过来顶你。你帮我解决问题先

菜鸟锐

城市weige 发表于 2011-12-11 23:01
好呀，过来顶你。你帮我解决问题先

我帮你QQ联系一下hytsky，他会VB。看一下他懂不懂。请留意他的回帖。谢谢！
顺带联系EP班组管理员OMouse，他会，请留意他的回帖。谢谢

班组管理员OMouse让我告诉你：

双击thisworkbook，输入以下内容即可：
Private Sub Workbook_Open()
Sheet2.Select
End Sub

这个是我们论坛的管理员给的答案，有权威性。可以采用。

我本人是VB白痴。义务帮忙联系懂得人帮你。你要谢管理员OMouse。谢谢

mxg825

按ALT+F11
双击：ThisWorkbook，把下面的代码放进去，保存工作薄
Private Sub Workbook_Open()
SheetS("Sheet2").Select
End Sub

菜鸟锐

班组管理员OMouse让我告诉你：

双击thisworkbook，输入以下内容即可：
Private Sub Workbook_Open()
Sheet2.Select
End Sub

这个是我们论坛的管理员给的答案，有权威性。可以采用。

我本人是VB白痴。义务帮忙联系懂得人帮你。你要谢管理员OMouse。谢谢

0Mouse

用工作簿事件即可。
Alt+F11，双击ThisWorkbook，输入以下内容：

1. 
   
2. Private Sub Workbook_Open()
   
3.     Sheets("sheet2").Select
   
4. End Sub

复制代码

附件： 选择表2.rar (5.51 KB, 下载次数: 2)

2011-12-11 23:17 上传

点击文件名下载附件
选择表2

城市weige

0Mouse 发表于 2011-12-11 23:17
用工作簿事件即可。
Alt+F11，双击ThisWorkbook，输入以下内容：
附件：

谢谢帮助。知道了。高人就是厉害。

菜鸟锐

0Mouse 发表于 2011-12-11 23:17
用工作簿事件即可。
Alt+F11，双击ThisWorkbook，输入以下内容：
附件：

你要给管理员OMouse设置最佳，我把他从床上QQ起来帮你的。很负责尽心啊！】
我跟他混EP的

0Mouse

5楼朋友的答案完全正确！看好了！ok！