摘要:
打开Excle,点击“文件”------“最近使用的文件”,如下图:根据上图可以看到,最近使用的文件数目为11个,那么是怎么实现的呢?具体代码如下:Public Sub 最近使用的文件清单数() '最近使用的文件清单数 Application.RecentFiles.Maximum = 11 MsgBox "最近使用的文件清单数设置为:11"End Sub 阅读全文
posted @ 2017-08-11 10:12
OLIVER_QIN
阅读(430)
评论(0)
推荐(0)
摘要:
打开的Excle如何使用VBA查看当前窗口的宽与高呢?代码如下:Sub 查看宽度与高度() Dim myWidth As Double Dim myHeigth As Double myWidth = Application.Width myHeigth = Application.Height MsgBox "当前窗口的宽与高 " _ & vbCrLf & "... 阅读全文
posted @ 2017-08-11 09:25
OLIVER_QIN
阅读(604)
评论(0)
推荐(0)
浙公网安备 33010602011771号