質問

シートをコピーして新規Bookで保存するマクロを作成しています。
このシートには「クリックするとユーザーフォームを開く」ボタンをつけているのですが、コピー先のBookにユーザーフォームをコピーすることができません。
(全て自動化したいので、両方のBookをVBEで開いてドラッグでコピーするようなことは考えていません。)
良い方法がありましたら、アドバイスください。
よろしくお願いします。

通報する

回答 (1件)

フォームをエクスポートして新しいブックにインポートすればOKです。
下はユーザーフォームのMyFormをC:\myform.frmにエクスポーとして新しいブックにインポートする例です。

Dim newBook As Workbook
ThisWorkbook.VBProject.VBComponents.Item("MyForm").Export "C:\myform.frm"
Set newBook = Workbooks.Add
newBook.VBProject.Import "C:\myform.frm"

このQ&Aは役に立ちましたか?6 件

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

新しく質問する

注目の記事

コサージュを使いこなすには・・・

コサージュの基本的な付け方から、TPOに合わせたコサージュの選び方についてまとめました。


新しく質問する

このカテゴリの人気Q&Aランキング

毎日見よう!教えて!gooトゥディ

べんりQ&A特集