classof 发表于 2022-7-6 22:59:06

更改了图纸,但未更改

你好
我希望命令“缩放扩展”到所有打开的图纸。
所以我使用“windowstate=acmax”来更改活动图形。
我的问题是不要把注意力转移到另一个绘图上,在“应用程序.文档(i).WindowsState=acMax”上
 
子测试()
Dim i为整数
Dim计数为整数
 
计数=应用程序。文件。计数
i=0
 

应用文件(一)。窗口状态=acMax
应用缩放范围
i=i+1
循环直到i=计数
 
末端接头
 
请帮帮我。
非常感谢。

classof 发表于 2022-7-7 00:51:02

我解决了我的问题。。
 

应用文件(一)。使活动
 
之后
应用文件(一)。窗口状态=acMax
 
谢谢你。
页: [1]
查看完整版本: 更改了图纸,但未更改