Ouvrir et fermer le tiroir CD-ROM à l’aide VBA dans Microsoft Excel
Avec les macros ci-dessous, vous pouvez ouvrir et fermer le plateau / porte du CD-ROM. Declare 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