摘要： 用下面的宏代码可以打开或关闭电脑中默认的光驱。方法是：
1.按Alt F11打开VBA编辑器。
2.在代码窗口中输入下列代码：
如何快速将VBA代码转换为注释
在调试VBA代码时，有时需要将代码转换为注释，以避免执行代码。对于少量的代码，只需在其前面添加英文的单引号（’）即可，对于大段的代码，最快捷的方式是用“编辑”工具栏中的相关命令，方法如下： 1.选择需要转换为注释的所有代码。 2.在“编辑”工具栏中单击&ldq
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 VBA设置图表动态数据源实例教程
Excel图表的数据源通常为一个连续区域，但有时会遇到图表数据源区域不连续，且需要动态改变的情况。例如下面的某公司人员基本情况汇总表，B列为部门名称，C至S列分别为“性别”、“年龄”、“学历”、“职称”等不同类别数据的汇总，
