[已解决]请问怎么监视Excel应该程序失去焦点和重新获得焦点？

一沫昔阳虹w

在Excel里面，打开其他应用程序，使Excel失去焦点时，并不会触发Application.WindowDeactivate和Application.WorkbookDeactivate事件。
要怎么才能监视到这种情况下，Excel应用程序失去焦点和重新获得焦点呢？

最佳答案

月排行榜 / 总排行榜

ghostjiao

2017-3-15 16:14

能出发的，但触发有可能和你想的不一样，图片中那样的调整大小才会触发

跳转到最佳答案楼层

一沫昔阳虹w

我可能用了假Excel，，发现WindowResize事件也触发不了，怎么调整窗体都触发不了事件！

1. Option Explicit
   
2. 
   
3. Public WithEvents app As Application
   
4. 
   
5. Sub go()
   
6.     Set app = Application
   
7. End Sub
   
8. 
   
9. Private Sub app_NewWorkbook(ByVal Wb As Workbook)
   
10. 
    
11. End Sub
    
12. 
    
13. Private Sub app_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    
14.     MsgBox 1
    
15. End Sub
    
16. 
    
17. Private Sub app_WindowResize(ByVal Wb As Workbook, ByVal Wn As Window)
    
18.     MsgBox "hello"
    
19. End Sub

复制代码

一沫昔阳虹w

哪位高手，看看呀，我是触发不了WindowResize事件了。莫非程序有bug

ghostjiao

能出发的，但触发有可能和你想的不一样，图片中那样的调整大小才会触发

一沫昔阳虹w

ghostjiao 发表于 2017-3-15 16:14
能出发的，但触发有可能和你想的不一样，图片中那样的调整大小才会触发

哦，原来这样的，和Word事件差别很大呀。Word调整窗口大小，就能触发。
这个调整窗口大小，不能需要什么去监视了。。

laoau138

一沫昔阳虹w 发表于 2017-3-16 10:02
哦，原来这样的，和Word事件差别很大呀。Word调整窗口大小，就能触发。
这个调整窗口大小，不能需要什么 ...

大侠好多天没有见过你了

一沫昔阳虹w

laoau138 发表于 2017-3-16 19:40
大侠好多天没有见过你了

不敢当啊，没时间逛论坛啊

laoau138

一沫昔阳虹w 发表于 2017-3-17 13:40
不敢当啊，没时间逛论坛啊

VBA改写单元格J10L10最多输入三个数查询跟随

http://www.excelpx.com/thread-428574-1-1.html

一沫昔阳虹w

laoau138 发表于 2017-3-17 16:57
VBA改写单元格J10L10最多输入三个数查询跟随

http://www.excelpx.com/thread-428574-1-1.html

朋友搞不了啦，还在搞其他东西，无暇他顾