掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
リモートからexe,excel起動 (ID:89051)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ローカルで下記のプログラムがあってこれを同じワークグループ違う端末から起動させたい。 exploreでリモートからこのexeを実行するとシートの変更は行っているようだが自動的にexcelが開かない。 初心者でわからないのですが、リモート操作場合、全く考え方を変えないといけないのでしょうか? ちなみにxlappをquitしていないのは、EXCEL開いた後でまだ手動で変更したいのでEXEだけ先に終了させています。 Public Sub Main() Dim xlApp As Excel.Application Dim bookOrg As Excel.Workbook Dim sheetOrg As Excel.Worksheet Dim Status As Boolean Dim Ret As Boolean If App.PrevInstance Then End MsgBox App.Path MsgBox CopyFile("c:\test.xls", App.Path & "\test.xls", False) Set xlApp = New Excel.Application Set bookOrg = xlApp.Workbooks.Open(App.Path, "\test.xls") bookOrg.Worksheets("testFormat").Copy before:=bookOrg.Worksheets("testFormat") Set sheetOrg = bookOrg.Worksheets("testFormat (2)") 'シートの内容変更 bookOrg.Application.Visible = True Set sheetOrg = Nothing Set bookOrg = Nothing Set xlApp = Nothing End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.