用vba可以模拟按下键盘按键的效果。
在excel中可以使用Application对象的SendKeys方法或者直接使用VBA中的SendKeys语句模拟按下键盘中的按键的效果。
SendKeys[……]
阅读全文>>>关注和分享Excel以及Office系列软件的方方面面,致力于提高中国的办公软件的使用水平
利用WshNetwork对象的RemovePrinterConnection方法可以将本地电脑上连接的远程打印机移除。
代码如下:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Sub QQ1722187970() Dim WshNetwork As Object Dim oPrinter As Object Set WshNetwork = CreateObject("WScript.Network") With WshNetwork Set oPrinter = .EnumPrinterConnections For i = 0 To oPrinter.Count - 1 Step 2 sPath = oPrinter(i + 1) '判断是不是远程打印机 If sPath Like "*\\*" Then '是的话强制断开连接 .RemovePrinterConnection sPath, True, True End If Next i End With End Sub |
[……]
阅读全文>>>在 如何用vba列出电脑上所有的打印机名称和端口? 和在如何用vba获取电脑上连接的默认打印机名称?
两篇文章中我们分别介绍了如何获取电脑上当前的默认打印名称和列举当前电脑上的所有打印机。
但是用[……]
阅读全文>>>在vba中可以用脚本对象WshNetwork的EnumPrinterConnections方法枚举所有本地电脑上已经安装的打印机的名称和端口。
代码如下:
[crayon-5df42a74f05370[……]
用vba获取本地电脑上连接的默认打印机的名称可以使用Application对象的ActivePrinter属性。
代码如下:
1 2 3 |
Sub QQ1722187970() MsgBox "当前默认的打印机名称为" & Excel.Application.ActivePrinter End Sub |
[……]
阅读全文>>>