题目
英语翻译
Private Sub Worksheet_Activate()
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range,Cancel As Boolean)
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range,Cancel As Boolean)
End Sub
Private Sub Worksheet_Calculate()
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
Private Sub Worksheet_Deactivate()
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
End Sub
Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable,ByVal TargetRange As Range)
End Sub
Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean)
End Sub
Private Sub Worksheet_PivotTableBeforeCommitChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean)
End Sub
Private Sub Worksheet_PivotTableBeforeDiscardChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long)
End Sub
Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)
End Sub
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
Private Sub Worksheet_Activate()
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range,Cancel As Boolean)
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range,Cancel As Boolean)
End Sub
Private Sub Worksheet_Calculate()
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
Private Sub Worksheet_Deactivate()
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
End Sub
Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable,ByVal TargetRange As Range)
End Sub
Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean)
End Sub
Private Sub Worksheet_PivotTableBeforeCommitChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean)
End Sub
Private Sub Worksheet_PivotTableBeforeDiscardChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long)
End Sub
Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)
End Sub
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
提问时间:2021-01-02
答案
Private Sub Worksheet_Activate() '工作表激活事件
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range,Cancel As Boolean) '工作表双击事件
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range,Cancel As Boolean) '工作表右击事件
End Sub
Private Sub Worksheet_Calculate() '工作表计算事件
End Sub
Private Sub Worksheet_Change(ByVal Target As Range) '工作变化事件 发生变化时候执行代码
End Sub
Private Sub Worksheet_Deactivate() '工作表从活动状态改变成非活动状态触发事件
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) '工作表超链接事件
End Sub
Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable,ByVal TargetRange As Range)'透视表发生后事件
End Sub
Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean '透视表发生前事件
可能最后2个透视表事件解释的不对 没怎么用过
这些代码意思就是
比如第一个激活事件就是当工作表处于当前操作界面时 执行代码 当然你问题里面没有代码 只是示范
双击事件 比如
你双击单元格了那么就执行代码
双击事件我早上刚写了一个你参考这个回答 看看
其他事件都差不多 就是进行某某操作时候 触发代码的意思 还有里面的参数不是一句话说的完的
你可以每个每个事件百度的到的~
好像数据透视表事件是在10里面才有的 我还用的03版的呢
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range,Cancel As Boolean) '工作表双击事件
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range,Cancel As Boolean) '工作表右击事件
End Sub
Private Sub Worksheet_Calculate() '工作表计算事件
End Sub
Private Sub Worksheet_Change(ByVal Target As Range) '工作变化事件 发生变化时候执行代码
End Sub
Private Sub Worksheet_Deactivate() '工作表从活动状态改变成非活动状态触发事件
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) '工作表超链接事件
End Sub
Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable,ByVal TargetRange As Range)'透视表发生后事件
End Sub
Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable,ByVal ValueChangeStart As Long,ByVal ValueChangeEnd As Long,Cancel As Boolean '透视表发生前事件
可能最后2个透视表事件解释的不对 没怎么用过
这些代码意思就是
比如第一个激活事件就是当工作表处于当前操作界面时 执行代码 当然你问题里面没有代码 只是示范
双击事件 比如
你双击单元格了那么就执行代码
双击事件我早上刚写了一个你参考这个回答 看看
其他事件都差不多 就是进行某某操作时候 触发代码的意思 还有里面的参数不是一句话说的完的
你可以每个每个事件百度的到的~
好像数据透视表事件是在10里面才有的 我还用的03版的呢
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
最新试题
- 1已知关于x的方程,x/3+a=x/2-1/6(x-6)无解,则a的值为多少?我知道答案,答案是a不等于1时,急
- 2甲乙两城相距75千米,在比例尺为1:2500000的地图上测得甲乙两城的图上距离是多少厘米
- 3如果两个等腰三角形的周长和面积都分别相等,那么这两个三角形一定全等吗?试用数学知识加以说明.
- 4baby For all My life
- 5负债的基本特征包括哪些
- 6英语翻译
- 7mn互为相反数,xy互为倒数,且mn均不为零Z的绝对值=4,求xy(m+n)-m/n+2xyz的值
- 8填空:Larry wasvery n_______ when she made a speech in front of somany people.
- 9ABCD是一个边长为6米的正方形模拟跑道,甲玩具从A出发顺时针行进,速度是每秒5厘米,乙玩具车从CD的中点
- 10三次函数对称中心怎么求?
热门考点