带你入门VBA，第四讲（如何控制关于工作薄与工作表）

兰色幻想

以下是引用yigepure在2004-10-16 14:06:00的发言：

呵呵,谢了兰老师,gvntw,dongyf.的帮助

[em23][em17][em23]

不过我要是工作薄里有很多的sheet,一个一个的放不是很麻烦吗.有什么办法处理这样的事情呢

如果使用工作表共同事件，就在THISWORKBOOK中选取

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

End Sub

像上述事件就是，而同样是双击事件，下面的

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

End Sub

只是在某个工作薄中适用

工作表中的一些事件，在THISWORKBOOK中也有：如下面：

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

End Sub

[此贴子已经被作者于2004-10-16 14:30:31编辑过]

yigepure

如果使用工作表共同事件，就在THISWORKBOOK中选取

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

End Sub

兰老师,这上面的这段代码是实现什么作用的呀

还有对于workbook里面的这些事件你能不能把它们的事件名都说说呀.

有一些看不懂.

[em23]

yigepure

呵呵,兰老师可能有事不在线.算了.我也该出去走一走了.晚上再来继续学习

希望兰老师能回复我楼上提出的问题.

真是期待呀.

兰色幻想

以下是引用yigepure在2004-10-16 14:50:00的发言：

如果使用工作表共同事件，就在THISWORKBOOK中选取

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

End Sub

兰老师,这上面的这段代码是实现什么作用的呀

还有对于workbook里面的这些事件你能不能把它们的事件名都说说呀.

有一些看不懂.

[em23]

帮助里都有，很详细

wuaza

兰老师，你的帮助怎么跟我的不一样，我的是officeXP，而且也完全安装了，可在VBE里按帮助后只出现Visual Basic的帮助，而没有你的Excel Visual Basic参考，这是怎么回事啊。你的比我详细多了。

因为学编程是万万离不开详细的帮助的。

兰色幻想

以下是引用wuaza在2004-10-16 16:57:00的发言：

兰老师，你的帮助怎么跟我的不一样，我的是officeXP，而且也完全安装了，可在VBE里按帮助后只出现Visual Basic的帮助，而没有你的Excel Visual Basic参考，这是怎么回事啊。你的比我详细多了。

因为学编程是万万离不开详细的帮助的。

这儿有,看VBAXL10.CHM

http://club.excelhome.net/viewthread.php?tid=60629

wuaza

谢谢，你的是office2000吧，这个帮助文件跟2002版的有什么不同吗，它能自动响应F1吗（在excelxp里）？

yigepure

Sub AddOne()    

Workbooks.Add

End Sub

兰老师它这个添加工作薄的方法与你的不同,请问他这个代码是放在哪里呢?

兰老师再布几个作业来做一下吧.综合前一,二,三讲

[此贴子已经被作者于2004-10-16 18:41:27编辑过]

兰色幻想

以下是引用wuaza在2004-10-16 17:51:00的发言： 谢谢，你的是office2000吧，这个帮助文件跟2002版的有什么不同吗，它能自动响应F1吗（在excelxp里）？

你要你完全安装这个你电脑里应该都有，用帮助时有个小窍门：就是当一个问题不懂时不要去搜索，而是先找到（在属性框中或通过对象浏览器）该对象或属性或方法后，选取它，然后按F1，你要的帮助就会自动出来。

兰色幻想

以下是引用yigepure在2004-10-16 18:16:00的发言：

Sub AddOne()    

Workbooks.Add

End Sub

兰老师它这个添加工作薄的方法与你的不同,请问他这个代码是放在哪里呢?

兰老师再布几个作业来做一下吧.综合前一,二,三讲

新建工作薄没有不一样

关于事件程序，书上写的很复杂，你现在就样理解吧：在EXCEL中，事件程序是针对工作表或工作薄发生某种变动、改变时而引发程序的运行，如工作薄的关闭，打开，工作表上的右键单击，单元格的数值改变等等。和工作表或工作薄事件无关的程序都应放到模块中。