★ExcelVBA ~ ユーザーフォームだけの表示にして、他のExcelファイルを開いても最前面に固定する方法
  
※まだ書きかけです。すみません。
※間違ってたらすみません。
※メモ書きなので、自分でも意味不明な箇所も多いです。ごめんなさい。
  
  

ユーザーフォームだけの表示にして最前面に固定する方法

● (01)Sheet1「にActiveXコントロールとして」のコマンドボタンを作成
※間違った、「フォームコントロールとして」のコマンドボタンを作らないでください。
(ほんとはどっちでもいいのですが、とりあえず。)

名前はいじらず。
つまりオブジェクト名は「CommandButton1」のまま。
ボタンのプロパティのCaptionを「CommandButton1」から「フォームを開く」に変更する。

そのボタンのコードは以下。

  

● (02)ユーザーフォームを作成してコマンドボタンを2つ作成。

新規のユーザーフォームを作成して、そこにコマンドボタンを2つ作成します。

1つ目のボタンは
オブジェクト名は「CommandButton1」のままにします。
Captionは「このフォームを閉じる」に変更します。

2つ目のボタンは、
オブジェクト名を「CommandButton2」に変更。
Captionを「Excelファイルを開く」に。

ユーザーフォームのモジュールに以降のコードたちを単純に全部コピペ。

一応念のために、
デザイン画面でそれぞれのコマンドボタンをダブルクリックして、
コードが「ちゃんとボタンと紐付け状態にあるか?」だけ確認します。
ダブルクリックしてそれぞれのコードが見えたら紐付けされてます。

  

● (03)「Private Sub CommandButton2_Click()」の内容変更。

o_OtherApp.Workbooks.Open "D:\1\test7890.xlsm"

のコードの

"D:\1\test7890.xlsm"

を、自分が開きたいファイルパスに書き換えます。

将来的には、ダイアログボックスやドロップダウンでファイルを指定する形に変えればいいと思います。

なお、本サンプルでは、このボタンからファイルを開かないとダメです。
ダブルクリックで直接他のExccelファイルを開いてしまうと、
質問者さまが言うところの、「ユーザーフォームのThisWorkbook」が表示されてしまいますので。

  

● (04)標準モジュールを作成して以下のコードをコピペ

以下の2行だけでいいです。

  
  

ひとまず以上で、作成完了です。

  

● 使い方

いったんファイルを上書きして閉じて、再度開いてみてください。

Sheet1の「フォームを開く」を押します。
ユーザーフォームが「最前面で固定」で開きます。

ユーザーフォームの「Excelファイルを開く」でExcelファイルを開きます。

ユーザーフォームが常に最前面に固定されて、後で開いたExcelファイルを編集できます。

閉じるときは注意が必要です。

後で開いたExcelファイルは普通に閉じていいですが、
ユーザーフォームのブックは必ず「このフォームを閉じる」を押して
ThisWorkbookの表をしてから普通に閉じます。
でないと、ロックがかかったままおかしなことになります。