excel如何打开和关闭光驱的宏代码

办公教程导读

收集整理了【excel如何打开和关闭光驱的宏代码】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含412字，纯文字阅读大概需要1分钟。

办公教程内容图文

 用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是：

1.按Alt+F11打开VBA编辑器。

2.在代码窗口中输入下列代码：

Private Declare Sub mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, _
ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long)

Sub OpenDefaultCDDVD()
'打开光驱
mciSendStringA "Set CDAudio Door Open", 0&, 0, 0
End Sub

Sub CloseDefaultCDDVD()
'关闭光驱
mciSendStringA "Set CDAudio Door Closed", 0&, 0, 0
End Sub

办公教程总结

以上是为您收集整理的【excel如何打开和关闭光驱的宏代码】办公软件教程的全部内容，希望文章能够帮你了解办公软件教程excel如何打开和关闭光驱的宏代码。
如果觉得办公软件教程内容还不错，欢迎将网站推荐给好友。