| |
▼ゆーあ さん：
>お世話様です。
>HYPERLINK関数を使用し、xlsファイルを開く件ですが、
>お教え頂いた下記コードに、Unload UserForm2を追加すると、
>xlsファイルが開けることが確認出来ました。
ユーザーフォームがあったんですね。
このユーザーフォームはモーダルモードで開かれているのでしょうか？
もしそうであればモードレスフォームで開くとどうなるでしょうか？
(EXCELは開けても他に影響があるかもしれません)
あと、ハイパーリンク先のEXCELはマクロを実行したEXCELで開かれる必要があるのでしょうか？
新しいEXCELを開いてそちらで開いてもいいのであれば
Dim XLApp As Excel.Application
Set XLApp = CreateObject("Excel.Application")
XLApp.Workbooks.Open WK_Link
XLApp.Visible = True
Set XLApp = Nothing
で開いてみてはどうでしょうか？
ただし上記で開けるのはエクセルブックのみなので拡張子をチェックしてエクセルブックならば上記で、エクセルブック以外は
WSH.Run """" & WK_Link & """", 3
で開くようにする必要があります。
|
|
独覚
- 14/7/11(金) 15:27 -
