Microsoft Access 掲示板

フォーム上のボタンから「ペイント」アプリを立ち上げたい

2 コメント
views
4 フォロー

win11
access2013

フォーム上にコマンドボタンを作成して
クリックするとペイントアプリを立ち上がると
仕事効率が改善されます。

できる方法があるのであればご指導お願い致します。

スズ
作成: 2022/01/21 (金) 07:24:02
通報 ...
1

C:\Windows\System32フォルダに入っているなら、

Private Sub コマンド_Click()
    Dim pe As Long
    pe = Shell("mspaint.exe", vbNormalFocus)
End Sub

でいけると思います。

2
スズ 2022/01/21 (金) 15:55:59 7c53a@f1e80

mae さん

ありがとうございました。
助かりました。