ito_blog
2005年1月27日木曜日
全てのコードウィンドウがオープン
'大勝利ですぞ!これで全てのコードウィンドウがオープンできます
Function testopen()
Dim c As Object
For Each c In VBE.VBProjects(1).VBComponents
c.CodeModule.CodePane.Show
Next
End Function
やったー!!!勝利の秘訣はVBEだったよー、CurrentProjectとかAllFormsとか役にたたなかったよー(泣
0 件のコメント:
コメントを投稿
次の投稿
前の投稿
ホーム
登録:
コメントの投稿 (Atom)
0 件のコメント:
コメントを投稿