A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんな内容は、VBAの範囲を超えていて、APIの領分のようだ。
VBA初心者がやることではなかろう。ただしWEBには記事がある。WEB照会ぐらいして調べたらどうです。
それを書いておく。
Private Declare Function MciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpszCommand As String, ByRef lpszReturnString As String, ByVal cchReturn As Integer, ByVal hwndCallback As Integer) As Integer
Sub test02()
MciSendString "Set CDAudio Door Open Wait", "", 0, 0
End Sub
Sub test03()
MciSendString "Set CDaudio Door Closed", "", 0, 0
End Sub
クリックイベントで使うならイベントに挟んで使う。
一応小生のテストでは開閉した。
No.1
- 回答日時:
ドライブ文字("E:\")を適宜変更してください。
Sub Macro1()
Dim CdOpen As Object
Set CdOpen = CreateObject("Shell.Application")
On Error Resume Next
CdOpen.Namespace("E:\").Items.Item.InvokeVerb "取り出し(&J)"
On Error GoTo 0
Set CdOpen = Nothing
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 複数のブックに同じ列を表示させる方法 2 2022/07/20 23:49
- Excel(エクセル) VBA セルの値と同じ名前のシートにデータを貼り付けするやり方を教えてください 2 2022/05/17 16:26
- ブルーレイ・プレーヤー・レコーダー ブルーレイプレイヤーのディスクトレイの開閉不備 5 2023/06/26 07:54
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Visual Basic(VBA) VBAコードを張り付け後のエクセルの進め方 2 2023/02/07 18:24
- au(KDDI) URBANO L03の起動画面が「URBANO」ロゴのまま停止しています 3 2023/01/01 13:35
- Visual Basic(VBA) ExcelのVBAを使い、複数シートの同一箇所を、同一条件にて一括でソルバーを回す方法について 1 2022/04/23 11:49
- 高校 制服の着こなし 2 2023/07/31 12:55
- Gmail g mailで「すべて送受信」 4 2022/06/02 14:47
- Excel(エクセル) エクセル VBAでBook モジュールのプロシージァ(コード)に除外シートを設定したい 1 2023/01/11 15:53
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
VBA CommandButtonの文字ずれ
-
フォームの再読み込み
-
ユーザーフォームに別シートか...
-
セルをマクロのボタンにしたい。
-
ボタン
-
VB.net でトグルボタンを実現し...
-
VBAのボタンの位置が変わって困...
-
C#でExcel上にボタンを作成したい
-
Vba コマンドボタンイベントの...
-
C#プログラムで、ボタンをショ...
-
オプションボタンによっての表...
-
VBA でのボタンの移動について
-
CommandButtonのCaptionを変化...
-
ASP.Net ラベルの内容をすぐに...
-
プロシージャからイベントをコ...
-
コマンドボタンやイメージにマ...
-
Excel VBA Application.caller...
-
VB 電卓 数字キーを押して...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
フォームの再読み込み
-
ユーザーフォームに別シートか...
-
VBA CommandButtonの文字ずれ
-
セルをマクロのボタンにしたい。
-
Excel VBA Application.caller...
-
コマンドボタンやイメージにマ...
-
Access VBA でデータペーストを...
-
VBAのボタンの位置が変わって困...
-
ボタンをマウスで押し続けたと...
-
ボタン
-
C#プログラムで、ボタンをショ...
-
VBA でのボタンの移動について
-
閉じると「+」になり開くと「-...
-
ダウンロードダイアログをVB...
-
[Excel VBA]コマンドボタンの入...
-
ASP.Net ラベルの内容をすぐに...
-
プロシージャからイベントをコ...
-
CommandButtonのCaptionを変化...
おすすめ情報