Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

3371 / 76735

←次へ　｜　前へ→


	【78995】Re:最前面

ＴＷ - 17/4/4(火) 7:44 -


	引用なし

	パスワード

γ さん、説明不足で申し訳ありません

batでエクセルを起動してます、会社でマクロ無効が標準設定なので
マクロ無効でも、マクロが動くようにしたつもりです。

BAT等作業用のファイルがフォルダに入れてあり、
フォルダを開いて、BATをクリックすると
フォルダの後ろになってしまいます。

他のアプリは開いていても、フォルダを開くので
その時フォルダが最前面なので、フォルダの後ろ
その他のアプリの前に開きます。

BATは

Spa = WScript.ScriptFullName
　Fpath = Left(Spa, InStrRev(Spa, "\") - 1)
　 OPFL = Fpath & "\sagyou.xlsm"
　 On Error Resume Next
　　Set ExlApp = GetObject(, "Excel.Application")
　　 If ExlApp Is Nothing Then
　　　Set ExlApp = CreateObject("Excel.Application")
　　 Else
　　End If
　ExlApp.Visible = True
　AppActivate ExlApp.Caption
　　ExlApp.DisplayAlerts = False
　　ExlApp.EnableEvents = False
　　ExlApp.Workbooks.Open OPFL
　　ExlApp.Run ("'" & OPFL & "'!Auto_Open")
　　ExlApp.EnableEvents = True

sagyouと言うエクセルを開きます。
このsagyouにマクロが複数有り仕事しますが
どうしても、最前面になりません。
アドバイスをよろしくお願いします

▼γ さん：
>>batでエクセルを起動してますが、色々調べても、
>>どうしても最前面に表示されません
>
>・どのようなbatなのか、
>・Excelよりも前面に出るアプリケーションは何か、
>などを説明されたらいかがですか？
>今のままだと説明不足で、回答のしようがないように思います。

0 hits

▼

【78976】最前面 にゃんた 17/4/3(月) 12:43