clsIHCButtonクラスについて

 [モジュールの取込み、書出し、削除...]ボタンです。

メソッドの定義
Public Sub Add(ByVal CB As CommandBar _
                               , ByVal Before As Long)

引数CBで指定されるコマンドバーに[モジュールの取込み、書出し、削除...]ボタンを貼付けます。
Public Sub Delete()
[モジュールの取込み、書出し、削除...]ボタンをAddメソッドの引数CBで指定したコマンドバーから削除します。
Private Sub m_CBE_Click(ByVal CommandBarControl As Object, handled As Boolean, CancelDefault As Boolean)
[モジュールの取込み、書出し、削除...]ボタンが押下された時に呼び出されます。


メソッドの詳細

Add
Public Sub Add(ByVal CB As CommandBar _
                               , ByVal Before As Long)


メソッドの説明:
引数CBで指定されるコマンドバーに [モジュールの取込み、書出し、削除...]ボタンを貼付けます。
in引数:
CB: [モジュールの取込み、書出し、削除...]ボタンを貼付けるコマンドバーを指定します。
Before: [モジュールの取込み、書出し、削除...]ボタンを貼付ける場所を指定します。

発生する実行時エラー:
1000:すでにAddされてた場合

※1:それ以外の場合はVBA標準の実行時エラーが発生します。(例えば、引数CBがNothingだった場合)
※2:実行時エラーが発生した場合、ボタンの貼付けはしません。
Delete
Public Sub Delete()

メソッドの説明:
 Addメソッド後に呼び出した場合、 [モジュールの取込み、書出し、削除...]ボタンを
Addメソッド の引数CBで指定したコマンドバーから削除し、
再度、Addメソッドを呼び出す事が出来るようにな ります。
 既に削除済みの場合、Addメソッドを呼び出す前だった場合は、何も起こりません。

m_CBE_Click
Private Sub m_CBE_Click(ByVal CommandBarControl As Object, handled As Boolean, CancelDefault As Boolean)

メソッドの説明:
 "モジュールの取込み、書出し、削除...”を押したときの処理です。