MacとWin版のエクセルVBAでプロジェクトエクスプローラ内で右クリックしたときのメニューの違い 右がMac版で左がWindows版のとき。Mac版の場合、なぜかファイルのインポートとファイルのエクスポートがない。 |
Application.VBE.ActiveVBProject.VBComponents("UserForm1").Export ("UserForm1.frm")をイミディエイトウインドウに書くか、マクロに記述して実行すればいい。(このとき注意がいる。)
Sub
export_all_module()
Dim module_count As Long 'モジュールの個数
Dim i As Long 'For文のカウンタとして使用
With
Application.VBE.ActiveVBProject.VBComponents
module_count =
.count
For
i = 1 To module_count
Select Case .Item(i).Type
Case3
'ユーザフォームのとき
.Item(i).Export (.Item(i).Name + ".frm")
Case
1
'標準モジュールのとき
.Item(i).Export (.Item(i).Name + ".bas")
Case
Else
'それ以外
.Item(i).Export (.Item(i).Name + ".cls")
End Select
Next
End With
End Sub
実行、というのもありです。Application.VBE.ActiveVBProject.VBComponents.Import
("UserForm1.frm")
をイミディエイトウインドウか標準モジュールのメソッドにでも書いて実行する。
モジュールのタイプ | 拡張子 |
---|---|
フォームモジュール |
frm |
標準モジュール |
bas |
クラスモジュール、その他のモジュール(ThisWorkbook、Sheetなど) |
cls |