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で多数のプログラムを一つの...
-
Vba 電卓 一文字消すボタン
-
ボタン
-
Excel VBA Application.caller...
-
ショートカットキーについて
-
プロシージャからイベントをコ...
-
アイコンとボタンの違い
-
C♯初心者で、四則演算の電卓を...
-
コマンドボタンやイメージにマ...
-
ボタンをマウスで押し続けたと...
-
if(wp & MK_ LBUTTON)
-
C#プログラムで、ボタンをショ...
-
ボタン(コントロール)を丸くしたい
-
ユーザーフォーム中の入力順番...
-
ユーザフォーム AfterUpdate処...
-
C#でFormのタイトルバーにボタ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
フォームの再読み込み
-
ユーザーフォームに別シートか...
-
VBA CommandButtonの文字ずれ
-
セルをマクロのボタンにしたい。
-
コマンドボタンやイメージにマ...
-
Excel VBA Application.caller...
-
VBAのボタンの位置が変わって困...
-
Access VBA でデータペーストを...
-
プロシージャからイベントをコ...
-
他のアプリケーションとの連携
-
閉じると「+」になり開くと「-...
-
C#で動的に作ったtextboxを消す。
-
ボタンをマウスで押し続けたと...
-
VBA でのボタンの移動について
-
CommandButtonのCaptionを変化...
-
ボタン
-
TextBoxでEnterキーを押すと、...
-
C♯初心者で、四則演算の電卓を...
おすすめ情報