EXCELの二重起動をふせぐには？ (ID:118522)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 よろしくお願いします。 ExcelをVBで起動したいんですが、すでにExcelが起動している場合どうすればいいでしょうか？ Sub Excel() Dim xlsApp As Object Dim xlsBook As Object Dim xlsSheet As Object Set xlsApp = CreateObject("Excel.Application") Set xlsBook = xlsApp.Workbooks.Open(FilePath) Set xlsSheet = xlsBook.WorkSheets(1) xlsApp.Visible = True End Sub これを呼び出すたびに新しいEXCELが立ち上がってしまします。 どなたか教えていただけないでしょうか？