| |
おはようございます。
返信が遅くなり大変申し訳ございません！
>別インスタンスのApplicationを作成して
>そこから開けばいいと思います。
>但し、自分のブックは編集できませんよ。
>例
>Private xlApp As Application
>
>Private Sub CommandButton1_Click()
> Dim strFname As String
> strFname = Application.GetOpenFilename
> If strFname = "False" Then Exit Sub
> If xlApp Is Nothing Then
> Set xlApp = New Application
> xlApp.Visible = True
> End If
> xlApp.Workbooks.Open strFname
>End Sub
上記のサンプルコードを試してみたところ、
私のイメージ通りの動きが実現できました！
また、自分のブックが操作できないということでしたが、
画面下のタスクバーをクリックし、
自分のブックをアクティブにすると操作は可能でした。
サンプルコードの内部をもう一度確認し、自分のものにしたいと思います。
とても助かりました。
ありがとうございました！
|
|
savex
- 08/6/2(月) 8:31 -
