操作ブックとフォームのみ表示してフォームのコードがあるマクロブックを非表示にしたい

Question

Excel2013以降の環境下に置いて
例えば
b.xlsmブックにフォームを作成し、フォーム自体はボタン等を配置して別のa.xlsxブックを操作するコードを書きました。
この時にb.xlsmブックのみ非表示にしたいんです。

Application.Visible = False

このコードは操作したいa.xlsxブックも非表示になるため使えません。

Answer 1

自分は強引ですが、
ブックの縦･横を小さくして、
常にフォームの後ろにいるよう
フォームのリサイズイベントで調整
でなんとかしてますね。

Comments

[warabimochi]

ブックの大きさとかフォームの大きさとか結構制限かかりそうですね。

Answer 2

非表示にするならb.xlsmのWorkbook_Open辺りに

    Dim tWindow As Window
    For Each tWindow In ThisWorkbook.Windows
        tWindow.Visible = False
    Next
    UserForm1.show vbModeless

を入れればいいんじゃないでしょうか。

ただ、アドイン(xlam)で作ればいいんじゃないかと思ったりもします。

(修正 2021/03/28)
上記コードに「UserForm1.show vbModeless」と記載する場所を追加
と追記

Comments

[warabimochi]

ありがとうございました。
私の環境だと
windows(thisworkbook.Name).Visible=False
で上手くいきました。