개폐 Microsoft Excel에서 VBA를 사용하여 CD-ROM 트레이

Posted on: 2020年11月12日 2020年11月12日
Tags: general-topics-in-vba

아래 매크로를 사용하여 CD-ROM 트레이 / 도어를 열고 닫을 수 있습니다. Sub mciSendStringA Lib “winmm.dll”선언 (ByVal lpstrCommand As String, _ ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, _ ByVal hwndCallback As Long)

Sub OpenCDTray()

mciSendStringA "Set CDAudio Door Open", 0&, 0, 0

End Sub

Sub CloseCDTray()

mciSendStringA "Set CDAudio Door Closed", 0&, 0, 0

End Sub