excel如何打开和关闭光驱的宏代码
发布时间:2022-02-03 19:57:05
标签:excel,如何,打开,和,关闭,光驱,的,宏代码,用下
用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是:
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


猜你喜欢
- Win8系统自带有光盘刻录功能,结合海尔Q7一体机配置的DVD刻录光驱,我们可以轻松方便地完成各种音乐、视频以及数据光盘的刻录,具体的刻录步
- Win10电脑右击不显示nvidia控制面板?nvidia控制面板是设置显卡和提升显卡性能的重要工具,在正常的情况下右击一般都会显示nvid
- 苹果今天推送了os x10.11el capitan beta4,本次更新重点也是改善性能和用户体验,想要体验的朋友可以自行下载升级哦苹果今
- Win10 20H1预览版19008推送。下文中为大家带来了本次更新内容介绍与已知bug汇总。感兴趣的朋友不妨阅读下文内容,参考一下吧Win
- 现在距离微软在全球190个国家和地区正式发布Windows 10操作系统已经过去了几天的时间,而BI编辑Matt Weinberger却已经
- processing怎么导入图片?processing软件可以在编辑页面直接编辑,调整编辑器以及字体等等,还可以不断检查错误、使用复杂字体输
- 在我们日常工作中,有关查找的问题有非常多,一说到到查找,首先想到的肯定是VLOOKUP函数,如果能学好VLOOKUP函数,工作中的大部分的查
- Win10如何解决netwsw00.sys文件导致的蓝屏问题?最近一位Win10用户的电脑出现了蓝屏,用户检查后发现是由netwsw00.s
- 一、在Excel表格出现#DIV/0!错误信息在Excel表格中使用公式计算,有的时候出现#DIV/0!的错误信息,那么应该怎么去解决?解决
- PPT中有很多各种形状,那如何在ppt中插入各种形状的图片。首先,单击“视图”菜单下的“工具栏”选择“绘图”,在绘图工具的“自选图形”中选择
- 北京时间2021年 9月 15日凌晨1点,苹果召开了秋季发布会。和去年一样,苹果今年的秋季发布活动同样以线上直播的形式登场。本次发布会上苹果
- 很多朋友使用Word软件制作试卷等素材时都需要用到横线等图案,但是却不知如何在Word页面画出横线,下面小编就为大家介绍在word文档中怎么
- XP系统开始菜单上有很多选项.那具体是什么意思呢.我们可以分析一下本文和广大的电脑新手朋友分享的是电脑基础知识的入门课程,XP系统“开始菜单
- 平时工作中制作表格时,我们常常会插入一些图片,让表格更加生动,今天小编为大家介绍一下如何在excel表格中插入剪贴画。在excel菜单“插入
- 我们在使用win10系统电脑的时候,有些情况下可能需要找到我们的网络适配器进行相关的设置,但是有的小伙伴在设备管理器中并没有找到。对于这种问
- 新建PPT幻灯片有四种方法,各种方法各有优缺点。方法一、1.点击右键2.点击【新建幻灯片】 特点:简单单不快捷方法二点击工具栏中的【新建幻灯
- 复制粘贴是我们平常使用最多的一个功能,不仅常常应用于编辑文档,还有其他应用场景。但是近期有部分Win11用户反映自己电脑使用不了复制粘贴不了
- 在计算机的日常使用中,我们或多或少会遇到计算机的“蓝屏”故障。当我们在电脑上遇到“蓝屏”时,不要惊慌。今天,小编就为大家分享一下电脑蓝屏错误
- 相信很多人都有遇到打开wps文字出现乱码的问题,对于这样的问题,你们是如何解决的呢?不懂的朋友,下面就让小编告诉你 如何解决wps文字打开出
- eve手游中有一个刷取资源以及星币的玩法,就是异常空间玩法,那么异常掉落奖励的有什么呢,会掉落哪些道具呢,有许多玩家不知道异常掉落的奖励,这