マクロ初心者です

マクロ初心者です。
ユーザーフォームのテキストボックスに入力した名前のパワーポイントファイルを開きたいのですが上手くいきません。どなたかご教授お願いします。
テキストボックスのオブジェクト名はtxtキロ程で、ファイルはデスクトップの▼▼▼というフォルダに入れてあります。
よろしくお願いします。

Private Sub cmd入力_Click()
Dim ファイル名 As String
ファイル名 = txtキロ程.Value
Dim ppApp As Object ’ PowerPoint.Application
Set ppApp = CreateObject(”PowerPoint.Application”)
ppApp.Visible = True
ppApp.Presentations.Open ”C:￥Users￥○○○○￥Desktop￥▼▼▼￥ ファイル名.pptm”
Set ppApp = Nothing
txtキロ程.Value = ""
End Sub

No.1 回答者： めぐみん_ 回答日時： 2018/01/27 08:15

検証は出来てませんが、とにかく変数名を文字列に入れてもダメですよ。

＞”C:￥Users￥○○○○￥Desktop￥▼▼▼￥ ファイル名.pptm”

文字列と変数を連結させて

”C:￥Users￥○○○○￥Desktop￥▼▼▼￥" & ファイル名 & ".pptm”

こうなるはずです。（変数に拡張子を含んでいない場合はです）

この回答へのお礼

ありがとうございます！
早速実践して見ます！ありがとうございました！

お礼日時：2018/01/27 09:55