本ページには広告が含まれています。
目次
キャプション文字やリスト等をすべて取得します。
- 構文
- Integer = GETITEM( ID, 種別, 番号, リストビュー列, ディセーブルフラグ, 最大取得数 )
- 引数
- ID (Integer)必須
- Windowを識別するID
- 種別 (#getitem)必須
- (複数指定可)
- ITM_BTN
- ボタン、チェックボックス、ラジオボタン
- ITM_LIST
- リストボックス、コンボボックス
- ITM_TAB
- タブコントロール
- ITM_MENU
- メニュー
- ITM_TREEVIEW
- ツリービュー(ITM_TREEVEWでも可)
- ITM_LISTVIEW
- リストビュー(ITM_LSTVEWでも可)
- ITM_EDIT
- エディトボックス
- ITM_STATIC
- スタティク
- ITM_STATUSBAR
- ステータスバー
- ITM_TOOLBAR
- ツールバー
- ITM_LINK
- リンク文字
- ITM_ACCCLK
- アクセシビリティ経由:クリック可能な物
- ITM_ACCCLK2
- アクセシビリティ経由:クリック可能な物(選択可のテキストも含める)
- ITM_ACCTXT
- アクセシビリティ経由:スタティク文字
- ITM_ACCEDIT
- アクセシビリティ経由:エディト内文字
- ITM_FROMLAST
- アクセシビリティ経由(ITM_ACC*)指定時に後ろからサーチする
- ITM_BACK
- アクセシビリティ経由(ITM_ACC*)指定時にアクティブにしない
- 番号 (Integer = 0)省略可
- ITM_LIST、ITM_TREEVIEW、ITM_LISTVIEW複数存在時は左上からの順番を指定(-1にて全コントロール取得)
- リストビュー列 (Integer = 0)省略可
- リストビュー指定時のリストビューの列を指定(-1にてカラム名取得)
- ディセーブル (Boolean = False)省略可
- FALSE
- ディセーブルな物も取得(デフォルト)
- TRUE
- ディセーブルな物はを取得しない
- 最大取得数 (Integer = 0)省略可
- アクセシビリティ経由(ITM_ACC*)指定時に取得する数を制限する
- 戻り値
取得した数を返す(For In 構文にて指定された場合は各要素を返す)
取得した情報は配列変数のALL_ITEM_LIST[ ]に格納される(配列はゼロから)
GETITEM関数で取得できる全項目を取得
GETITEM関数で取得できるすべてのキャプション文字を取得します。結果は実行したUWSファイルと同じディレクトリのGETITEM.logに出力されます。
OPTION LOGPATH = "GETITEM.log"
OPTION LOGFILE = 6
FOR sec = 3 TO 1 STEP -1
FUKIDASI(sec + "秒後にアクティブなウィンドウの情報を取得します。")
SLEEP(1.000)
NEXT
DIM ID = GETID(GET_ACTIVE_WIN)
PRINT "DIM ID = GETID(<#DBL>" + STATUS(ID, ST_TITLE) + "<#DBL>, <#DBL>" + STATUS(ID, ST_CLASS) + "<#DBL>)"
PRINT
FUKIDASI("「" + STATUS(ID, ST_TITLE) + "」…取得中")
DIM array[] = "BTN", "LIST", "TAB", "MENU", "TREEVIEW", "LISTVIEW", "EDIT", "STATIC", "STATUSBAR", "TOOLBAR", "LINK", "ACCCLK", "ACCCLK2", "ACCEDIT", "FROMLAST", "BACK"
FOR item IN array
PRINT "//////////////////////////////"
PRINT "// " + item + ""
PRINT "//////////////////////////////"
DIM num = GETITEM(ID, EVAL("ITM_" + item), -1)
PRINT "GETITEM(ID, ITM_" + item + ", -1) = " + num
FOR i = 0 TO num - 1
PRINT "CLKITEM(ID, <#DBL>" + ALL_ITEM_LIST[i] + "<#DBL>, CLK_" + item + ")"
NEXT
PRINT
NEXT
取得例
メモ帳
DIM ID = GETID("無題 - メモ帳", "Notepad")
//////////////////////////////////////////////////
// ITM_BTN
//////////////////////////////////////////////////
GETITEM(ID, ITM_BTN, -1) = 5
ALL_ITEM_LIST[0] = "1 行上"
ALL_ITEM_LIST[1] = "1 行下"
ALL_ITEM_LIST[2] = "最小化"
ALL_ITEM_LIST[3] = "最大化"
ALL_ITEM_LIST[4] = "閉じる"
//////////////////////////////////////////////////
// ITM_LIST
//////////////////////////////////////////////////
GETITEM(ID, ITM_LIST, -1) = 0
//////////////////////////////////////////////////
// ITM_TAB
//////////////////////////////////////////////////
GETITEM(ID, ITM_TAB, -1) = 0
//////////////////////////////////////////////////
// ITM_MENU
//////////////////////////////////////////////////
GETITEM(ID, ITM_MENU, -1) = 30
ALL_ITEM_LIST[0] = "ファイル\新規"
ALL_ITEM_LIST[1] = "ファイル\新しいウィンドウ"
ALL_ITEM_LIST[2] = "ファイル\開く"
ALL_ITEM_LIST[3] = "ファイル\上書き保存"
ALL_ITEM_LIST[4] = "ファイル\名前を付けて保存"
ALL_ITEM_LIST[5] = "ファイル\ページ設定"
ALL_ITEM_LIST[6] = "ファイル\印刷"
ALL_ITEM_LIST[7] = "ファイル\メモ帳の終了"
ALL_ITEM_LIST[8] = "編集\元に戻す"
ALL_ITEM_LIST[9] = "編集\切り取り"
ALL_ITEM_LIST[10] = "編集\コピー"
ALL_ITEM_LIST[11] = "編集\貼り付け"
ALL_ITEM_LIST[12] = "編集\削除"
ALL_ITEM_LIST[13] = "編集\Bing で検索"
ALL_ITEM_LIST[14] = "編集\検索"
ALL_ITEM_LIST[15] = "編集\次を検索"
ALL_ITEM_LIST[16] = "編集\前を検索"
ALL_ITEM_LIST[17] = "編集\置換"
ALL_ITEM_LIST[18] = "編集\行へ移動"
ALL_ITEM_LIST[19] = "編集\すべて選択"
ALL_ITEM_LIST[20] = "編集\日付と時刻"
ALL_ITEM_LIST[21] = "書式\右端で折り返す"
ALL_ITEM_LIST[22] = "書式\フォント"
ALL_ITEM_LIST[23] = "表示\ズーム\拡大"
ALL_ITEM_LIST[24] = "表示\ズーム\縮小"
ALL_ITEM_LIST[25] = "表示\ズーム\既定の倍率に戻す"
ALL_ITEM_LIST[26] = "表示\ステータス バー"
ALL_ITEM_LIST[27] = "ヘルプ\ヘルプの表示"
ALL_ITEM_LIST[28] = "ヘルプ\フィードバックの送信"
ALL_ITEM_LIST[29] = "ヘルプ\バージョン情報"
//////////////////////////////////////////////////
// ITM_TREEVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_TREEVIEW, -1) = 0
//////////////////////////////////////////////////
// ITM_LISTVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_LISTVIEW, -1) = 0
//////////////////////////////////////////////////
// ITM_TOOLBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_TOOLBAR, -1) = 5
ALL_ITEM_LIST[0] = "ファイル"
ALL_ITEM_LIST[1] = "編集"
ALL_ITEM_LIST[2] = "書式"
ALL_ITEM_LIST[3] = "表示"
ALL_ITEM_LIST[4] = "ヘルプ"
//////////////////////////////////////////////////
// ITM_ACCCLK
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCCLK, -1) = 2
ALL_ITEM_LIST[0] = "1 行上"
ALL_ITEM_LIST[1] = "1 行下"
//////////////////////////////////////////////////
// ITM_EDIT
//////////////////////////////////////////////////
GETITEM(ID, ITM_EDIT, -1) = 1
ALL_ITEM_LIST[0] = ""
//////////////////////////////////////////////////
// ITM_STATIC
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATIC, -1) = 1
ALL_ITEM_LIST[0] = ""
//////////////////////////////////////////////////
// ITM_STATUSBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATUSBAR, -1) = 5
ALL_ITEM_LIST[0] = ""
ALL_ITEM_LIST[1] = "1 行、1 列"
ALL_ITEM_LIST[2] = "100%"
ALL_ITEM_LIST[3] = "Windows (CRLF)"
ALL_ITEM_LIST[4] = "UTF-8"
//////////////////////////////////////////////////
// ITM_ACCTXT
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCTXT, -1) = 4
ALL_ITEM_LIST[0] = "1 行、1 列"
ALL_ITEM_LIST[1] = "100%"
ALL_ITEM_LIST[2] = "Windows (CRLF)"
ALL_ITEM_LIST[3] = "UTF-8"
サクラエディタ
DIM ID = GETID("(無題)3 - サクラエディタ32bit 2.4.2.6048", "TextEditorWindowWP177")
//////////////////////////////////////////////////
// ITM_BTN
//////////////////////////////////////////////////
GETITEM(ID, ITM_BTN, -1) = 7
ALL_ITEM_LIST[0] = "1 行上"
ALL_ITEM_LIST[1] = "1 行下"
ALL_ITEM_LIST[2] = "1 列左"
ALL_ITEM_LIST[3] = "1 列右"
ALL_ITEM_LIST[4] = "最小化"
ALL_ITEM_LIST[5] = "最大化"
ALL_ITEM_LIST[6] = "閉じる"
//////////////////////////////////////////////////
// ITM_LIST
//////////////////////////////////////////////////
GETITEM(ID, ITM_LIST, -1) = 0
//////////////////////////////////////////////////
// ITM_TAB
//////////////////////////////////////////////////
GETITEM(ID, ITM_TAB, -1) = 3
ALL_ITEM_LIST[0] = "(無題)1"
ALL_ITEM_LIST[1] = "(無題)2"
ALL_ITEM_LIST[2] = "(無題)3"
//////////////////////////////////////////////////
// ITM_MENU
//////////////////////////////////////////////////
GETITEM(ID, ITM_MENU, -1) = 26
ALL_ITEM_LIST[0] = "\新規作成" + CHR(10) + " Ctrl+N"
ALL_ITEM_LIST[1] = "\上書き保存" + CHR(10) + " Ctrl+S"
ALL_ITEM_LIST[2] = "\名前を付けて保存..." + CHR(10) + " Shift+Ctrl+S"
ALL_ITEM_LIST[3] = "\元に戻す" + CHR(10) + " Ctrl+Z" + CHR(10) + " Ctrl+_" + CHR(10) + " Ctrl+_(PC-98)"
ALL_ITEM_LIST[4] = "\やり直し" + CHR(10) + " Ctrl+Y"
ALL_ITEM_LIST[5] = "\移動履歴: 前へ" + CHR(10) + " Alt+P"
ALL_ITEM_LIST[6] = "\移動履歴: 次へ" + CHR(10) + " Alt+N"
ALL_ITEM_LIST[7] = "\検索..." + CHR(10) + " Ctrl+F"
ALL_ITEM_LIST[8] = "\次を検索" + CHR(10) + " F3"
ALL_ITEM_LIST[9] = "\前を検索" + CHR(10) + " Shift+F3"
ALL_ITEM_LIST[10] = "\置換..." + CHR(10) + " Ctrl+R"
ALL_ITEM_LIST[11] = "\検索マークの切替え" + CHR(10) + " Ctrl+F3"
ALL_ITEM_LIST[12] = "\Grep..." + CHR(10) + " Ctrl+G"
ALL_ITEM_LIST[13] = "\アウトライン解析..." + CHR(10) + " F11"
ALL_ITEM_LIST[14] = "\タイプ別設定一覧..." + CHR(10) + " Ctrl+4"
ALL_ITEM_LIST[15] = "\タイプ別設定..." + CHR(10) + " Ctrl+5"
ALL_ITEM_LIST[16] = "\共通設定..." + CHR(10) + " Ctrl+6"
ALL_ITEM_LIST[17] = "\コマンド一覧" + CHR(10) + " Shift+F1"
ALL_ITEM_LIST[18] = "\ファイル"
ALL_ITEM_LIST[19] = "\編集"
ALL_ITEM_LIST[20] = "\変換"
ALL_ITEM_LIST[21] = "\検索"
ALL_ITEM_LIST[22] = "\ツール"
ALL_ITEM_LIST[23] = "\設定"
ALL_ITEM_LIST[24] = "\ウィンドウ"
ALL_ITEM_LIST[25] = "\ヘルプ"
//////////////////////////////////////////////////
// ITM_TREEVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_TREEVIEW, -1) = 0
//////////////////////////////////////////////////
// ITM_LISTVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_LISTVIEW, -1) = 0
//////////////////////////////////////////////////
// ITM_TOOLBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_TOOLBAR, -1) = 8
ALL_ITEM_LIST[0] = "ファイル"
ALL_ITEM_LIST[1] = "編集"
ALL_ITEM_LIST[2] = "変換"
ALL_ITEM_LIST[3] = "検索"
ALL_ITEM_LIST[4] = "ツール"
ALL_ITEM_LIST[5] = "設定"
ALL_ITEM_LIST[6] = "ウィンドウ"
ALL_ITEM_LIST[7] = "ヘルプ"
//////////////////////////////////////////////////
// ITM_ACCCLK
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCCLK, -1) = 35
ALL_ITEM_LIST[0] = "SplitterWndClass"
ALL_ITEM_LIST[1] = "SakuraView177"
ALL_ITEM_LIST[2] = "VSplitBoxWnd"
ALL_ITEM_LIST[3] = "HSplitBoxWnd"
ALL_ITEM_LIST[4] = "1 行上"
ALL_ITEM_LIST[5] = "1 行下"
ALL_ITEM_LIST[6] = "1 列左"
ALL_ITEM_LIST[7] = "1 列右"
ALL_ITEM_LIST[8] = "新規作成" + CHR(10) + " Ctrl+N"
ALL_ITEM_LIST[9] = "開く(ドロップダウン)"
ALL_ITEM_LIST[10] = "上書き保存" + CHR(10) + " Ctrl+S"
ALL_ITEM_LIST[11] = "名前を付けて保存..." + CHR(10) + " Shift+Ctrl+S"
ALL_ITEM_LIST[12] = "元に戻す" + CHR(10) + " Ctrl+Z" + CHR(10) + " Ctrl+_" + CHR(10) + " Ctrl+_(PC-98)"
ALL_ITEM_LIST[13] = "やり直し" + CHR(10) + " Ctrl+Y"
ALL_ITEM_LIST[14] = "移動履歴: 前へ" + CHR(10) + " Alt+P"
ALL_ITEM_LIST[15] = "移動履歴: 次へ" + CHR(10) + " Alt+N"
ALL_ITEM_LIST[16] = "検索..." + CHR(10) + " Ctrl+F"
ALL_ITEM_LIST[17] = "次を検索" + CHR(10) + " F3"
ALL_ITEM_LIST[18] = "前を検索" + CHR(10) + " Shift+F3"
ALL_ITEM_LIST[19] = "置換..." + CHR(10) + " Ctrl+R"
ALL_ITEM_LIST[20] = "検索マークの切替え" + CHR(10) + " Ctrl+F3"
ALL_ITEM_LIST[21] = "Grep..." + CHR(10) + " Ctrl+G"
ALL_ITEM_LIST[22] = "アウトライン解析..." + CHR(10) + " F11"
ALL_ITEM_LIST[23] = "タイプ別設定一覧..." + CHR(10) + " Ctrl+4"
ALL_ITEM_LIST[24] = "タイプ別設定..." + CHR(10) + " Ctrl+5"
ALL_ITEM_LIST[25] = "共通設定..." + CHR(10) + " Ctrl+6"
ALL_ITEM_LIST[26] = "コマンド一覧" + CHR(10) + " Shift+F1"
ALL_ITEM_LIST[27] = "開く(ドロップダウン)"
ALL_ITEM_LIST[28] = "開く"
ALL_ITEM_LIST[29] = "CTabWnd"
ALL_ITEM_LIST[30] = "(無題)1"
ALL_ITEM_LIST[31] = "(無題)2"
ALL_ITEM_LIST[32] = "(無題)3"
ALL_ITEM_LIST[33] = "上位"
ALL_ITEM_LIST[34] = "下位"
//////////////////////////////////////////////////
// ITM_EDIT
//////////////////////////////////////////////////
GETITEM(ID, ITM_EDIT, -1) = 0
//////////////////////////////////////////////////
// ITM_STATIC
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATIC, -1) = 2
ALL_ITEM_LIST[0] = ""
ALL_ITEM_LIST[1] = "Alt+F1"
//////////////////////////////////////////////////
// ITM_STATUSBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATUSBAR, -1) = 8
ALL_ITEM_LIST[0] = "Alt+F1"
ALL_ITEM_LIST[1] = "1 行 1 桁"
ALL_ITEM_LIST[2] = "CRLF"
ALL_ITEM_LIST[3] = ""
ALL_ITEM_LIST[4] = "UTF-8"
ALL_ITEM_LIST[5] = ""
ALL_ITEM_LIST[6] = "挿入"
ALL_ITEM_LIST[7] = "100 %"
//////////////////////////////////////////////////
// ITM_ACCTXT
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCTXT, -1) = 6
ALL_ITEM_LIST[0] = "Alt+F1"
ALL_ITEM_LIST[1] = "1 行 1 桁"
ALL_ITEM_LIST[2] = "CRLF"
ALL_ITEM_LIST[3] = "UTF-8"
ALL_ITEM_LIST[4] = "挿入"
ALL_ITEM_LIST[5] = "100 %"
Microsoft Visual Basic for Applications
DIM ID = GETID("Microsoft Visual Basic for Applications - Book1 - [Module1 (コード)]", "wndclass_desked_gsk")
//////////////////////////////////////////////////
// ITM_BTN
//////////////////////////////////////////////////
GETITEM(ID, ITM_BTN, -1) = 48
ALL_ITEM_LIST[0] = "プロパティ/メソッドの一覧"
ALL_ITEM_LIST[1] = "定数の一覧"
ALL_ITEM_LIST[2] = "クイック ヒント"
ALL_ITEM_LIST[3] = "パラメーター ヒント"
ALL_ITEM_LIST[4] = "入力候補"
ALL_ITEM_LIST[5] = "インデント"
ALL_ITEM_LIST[6] = "インデントを戻す"
ALL_ITEM_LIST[7] = "ブレークポイントの設定/解除"
ALL_ITEM_LIST[8] = "コメント ブロック"
ALL_ITEM_LIST[9] = "非コメント ブロック"
ALL_ITEM_LIST[10] = "ブックマークの設定/解除"
ALL_ITEM_LIST[11] = "次のブックマーク"
ALL_ITEM_LIST[12] = "前のブックマーク"
ALL_ITEM_LIST[13] = "すべてのブックマークの解除"
ALL_ITEM_LIST[14] = "Microsoft Excel"
ALL_ITEM_LIST[15] = "Book1 の上書き保存"
ALL_ITEM_LIST[16] = "切り取り"
ALL_ITEM_LIST[17] = "コピー"
ALL_ITEM_LIST[18] = "貼り付け"
ALL_ITEM_LIST[19] = "検索"
ALL_ITEM_LIST[20] = "元に戻せません"
ALL_ITEM_LIST[21] = "やり直しできません"
ALL_ITEM_LIST[22] = "Sub/ユーザー フォームの実行"
ALL_ITEM_LIST[23] = "中断"
ALL_ITEM_LIST[24] = "リセット"
ALL_ITEM_LIST[25] = "デザイン モード"
ALL_ITEM_LIST[26] = "プロジェクト エクスプローラー"
ALL_ITEM_LIST[27] = "プロパティ ウィンドウ"
ALL_ITEM_LIST[28] = "オブジェクト ブラウザー"
ALL_ITEM_LIST[29] = "ツールボックス"
ALL_ITEM_LIST[30] = "Microsoft Visual Basic for Applications ヘルプ"
ALL_ITEM_LIST[31] = "1 列左"
ALL_ITEM_LIST[32] = "右へドラッグ"
ALL_ITEM_LIST[33] = "1 列右"
ALL_ITEM_LIST[34] = "1 行上"
ALL_ITEM_LIST[35] = "下へドラッグ"
ALL_ITEM_LIST[36] = "1 行下"
ALL_ITEM_LIST[37] = "開く"
ALL_ITEM_LIST[38] = "開く"
ALL_ITEM_LIST[39] = "最小化"
ALL_ITEM_LIST[40] = "元のサイズに戻す"
ALL_ITEM_LIST[41] = "閉じる"
ALL_ITEM_LIST[42] = "コード"
ALL_ITEM_LIST[43] = "オブジェクト"
ALL_ITEM_LIST[44] = "フォルダーの切り替え"
ALL_ITEM_LIST[45] = "最小化"
ALL_ITEM_LIST[46] = "最大化"
ALL_ITEM_LIST[47] = "閉じる"
//////////////////////////////////////////////////
// ITM_LIST
//////////////////////////////////////////////////
GETITEM(ID, ITM_LIST, -1) = 2
ALL_ITEM_LIST[0] = "(General)"
ALL_ITEM_LIST[1] = "(Declarations)"
//////////////////////////////////////////////////
// ITM_TAB
//////////////////////////////////////////////////
GETITEM(ID, ITM_TAB, -1) = 0
//////////////////////////////////////////////////
// ITM_MENU
//////////////////////////////////////////////////
GETITEM(ID, ITM_MENU, -1) = 262
ALL_ITEM_LIST[0] = "\ツールバー オプション"
ALL_ITEM_LIST[1] = "\ツールバー オプション"
ALL_ITEM_LIST[2] = "\ファイル\Book1 の上書き保存"
ALL_ITEM_LIST[3] = "\ファイル\ファイルのインポート"
ALL_ITEM_LIST[4] = "\ファイル\ファイルのエクスポート"
ALL_ITEM_LIST[5] = "\ファイル\Module1 の解放"
ALL_ITEM_LIST[6] = "\ファイル\印刷"
ALL_ITEM_LIST[7] = "\ファイル\終了して Microsoft Excel へ戻る"
ALL_ITEM_LIST[8] = "\編集\元に戻せません"
ALL_ITEM_LIST[9] = "\編集\やり直しできません"
ALL_ITEM_LIST[10] = "\編集\切り取り"
ALL_ITEM_LIST[11] = "\編集\コピー"
ALL_ITEM_LIST[12] = "\編集\貼り付け"
ALL_ITEM_LIST[13] = "\編集\クリア"
ALL_ITEM_LIST[14] = "\編集\すべて選択"
ALL_ITEM_LIST[15] = "\編集\検索"
ALL_ITEM_LIST[16] = "\編集\次を検索"
ALL_ITEM_LIST[17] = "\編集\置換"
ALL_ITEM_LIST[18] = "\編集\インデント"
ALL_ITEM_LIST[19] = "\編集\インデントを戻す"
ALL_ITEM_LIST[20] = "\編集\プロパティ/メソッドの一覧"
ALL_ITEM_LIST[21] = "\編集\定数の一覧"
ALL_ITEM_LIST[22] = "\編集\クイック ヒント"
ALL_ITEM_LIST[23] = "\編集\パラメーター ヒント"
ALL_ITEM_LIST[24] = "\編集\入力候補"
ALL_ITEM_LIST[25] = "\編集\ブックマーク"
ALL_ITEM_LIST[26] = "\表示\コード"
ALL_ITEM_LIST[27] = "\表示\オブジェクト"
ALL_ITEM_LIST[28] = "\表示\定義"
ALL_ITEM_LIST[29] = "\表示\元の位置へ移動"
ALL_ITEM_LIST[30] = "\表示\オブジェクト ブラウザー"
ALL_ITEM_LIST[31] = "\表示\イミディエイト ウィンドウ"
ALL_ITEM_LIST[32] = "\表示\ローカル ウィンドウ"
ALL_ITEM_LIST[33] = "\表示\ウォッチ ウィンドウ"
ALL_ITEM_LIST[34] = "\表示\呼び出し履歴"
ALL_ITEM_LIST[35] = "\表示\プロジェクト エクスプローラー"
ALL_ITEM_LIST[36] = "\表示\プロパティ ウィンドウ"
ALL_ITEM_LIST[37] = "\表示\ツールボックス"
ALL_ITEM_LIST[38] = "\表示\タブ オーダー"
ALL_ITEM_LIST[39] = "\表示\ツール バー"
ALL_ITEM_LIST[40] = "\表示\Microsoft Excel"
ALL_ITEM_LIST[41] = "\コード"
ALL_ITEM_LIST[42] = "\オブジェクト"
ALL_ITEM_LIST[43] = "\定義"
ALL_ITEM_LIST[44] = "\元の位置へ移動"
ALL_ITEM_LIST[45] = "\オブジェクト ブラウザー"
ALL_ITEM_LIST[46] = "\イミディエイト ウィンドウ"
ALL_ITEM_LIST[47] = "\ローカル ウィンドウ"
ALL_ITEM_LIST[48] = "\ウォッチ ウィンドウ"
ALL_ITEM_LIST[49] = "\呼び出し履歴"
ALL_ITEM_LIST[50] = "\プロジェクト エクスプローラー"
ALL_ITEM_LIST[51] = "\プロパティ ウィンドウ"
ALL_ITEM_LIST[52] = "\ツールボックス"
ALL_ITEM_LIST[53] = "\タブ オーダー"
ALL_ITEM_LIST[54] = "\ツール バー"
ALL_ITEM_LIST[55] = "\Microsoft Excel"
ALL_ITEM_LIST[56] = "\挿入\プロシージャ"
ALL_ITEM_LIST[57] = "\挿入\ユーザー フォーム"
ALL_ITEM_LIST[58] = "\挿入\標準モジュール"
ALL_ITEM_LIST[59] = "\挿入\クラス モジュール"
ALL_ITEM_LIST[60] = "\挿入\ファイル"
ALL_ITEM_LIST[61] = "\プロシージャ"
ALL_ITEM_LIST[62] = "\ユーザー フォーム"
ALL_ITEM_LIST[63] = "\標準モジュール"
ALL_ITEM_LIST[64] = "\クラス モジュール"
ALL_ITEM_LIST[65] = "\ファイル"
ALL_ITEM_LIST[66] = "\書式\整列"
ALL_ITEM_LIST[67] = "\書式\同じサイズに揃える"
ALL_ITEM_LIST[68] = "\書式\サイズを合わせる"
ALL_ITEM_LIST[69] = "\書式\グリッドに合わせる"
ALL_ITEM_LIST[70] = "\書式\左右の間隔"
ALL_ITEM_LIST[71] = "\書式\上下の間隔"
ALL_ITEM_LIST[72] = "\書式\フォームの中央に配置"
ALL_ITEM_LIST[73] = "\書式\ボタンの配置"
ALL_ITEM_LIST[74] = "\書式\グループ化"
ALL_ITEM_LIST[75] = "\書式\グループ解除"
ALL_ITEM_LIST[76] = "\書式\順序"
ALL_ITEM_LIST[77] = "\デバッグ\VBAProject のコンパイル"
ALL_ITEM_LIST[78] = "\デバッグ\ステップ イン"
ALL_ITEM_LIST[79] = "\デバッグ\ステップ オーバー"
ALL_ITEM_LIST[80] = "\デバッグ\ステップ アウト"
ALL_ITEM_LIST[81] = "\デバッグ\カーソル行の前まで実行"
ALL_ITEM_LIST[82] = "\デバッグ\ウォッチ式の追加"
ALL_ITEM_LIST[83] = "\デバッグ\ウォッチ式の編集"
ALL_ITEM_LIST[84] = "\デバッグ\クイック ウォッチ"
ALL_ITEM_LIST[85] = "\デバッグ\ブレークポイントの設定/解除"
ALL_ITEM_LIST[86] = "\デバッグ\すべてのブレークポイントの解除"
ALL_ITEM_LIST[87] = "\デバッグ\次のステートメントの設定"
ALL_ITEM_LIST[88] = "\デバッグ\次のステートメントの表示"
ALL_ITEM_LIST[89] = "\実行\Sub/ユーザー フォームの実行"
ALL_ITEM_LIST[90] = "\実行\中断"
ALL_ITEM_LIST[91] = "\実行\リセット"
ALL_ITEM_LIST[92] = "\実行\デザイン モード"
ALL_ITEM_LIST[93] = "\ツール\参照設定"
ALL_ITEM_LIST[94] = "\ツール\その他のコントロール"
ALL_ITEM_LIST[95] = "\ツール\マクロ"
ALL_ITEM_LIST[96] = "\ツール\オプション"
ALL_ITEM_LIST[97] = "\ツール\VBAProject のプロパティ"
ALL_ITEM_LIST[98] = "\ツール\デジタル署名"
ALL_ITEM_LIST[99] = "\アドイン\アドイン マネージャー"
ALL_ITEM_LIST[100] = "\アドイン マネージャー"
ALL_ITEM_LIST[101] = "\ウィンドウ\分割"
ALL_ITEM_LIST[102] = "\ウィンドウ\上下に並べて表示"
ALL_ITEM_LIST[103] = "\ウィンドウ\左右に並べて表示"
ALL_ITEM_LIST[104] = "\ウィンドウ\重ねて表示"
ALL_ITEM_LIST[105] = "\ウィンドウ\アイコンの整列"
ALL_ITEM_LIST[106] = "\ウィンドウ\1 Module1 (コード)"
ALL_ITEM_LIST[107] = "\分割"
ALL_ITEM_LIST[108] = "\上下に並べて表示"
ALL_ITEM_LIST[109] = "\左右に並べて表示"
ALL_ITEM_LIST[110] = "\重ねて表示"
ALL_ITEM_LIST[111] = "\アイコンの整列"
ALL_ITEM_LIST[112] = "\1 Module1 (コード)"
ALL_ITEM_LIST[113] = "\ヘルプ\Microsoft Visual Basic for Applications ヘルプ"
ALL_ITEM_LIST[114] = "\ヘルプ\MSDN ホームページ"
ALL_ITEM_LIST[115] = "\ヘルプ\バージョン情報"
ALL_ITEM_LIST[116] = "\ドキュメント ウィンドウ"
ALL_ITEM_LIST[117] = "\ツールバー オプション"
ALL_ITEM_LIST[118] = "\ファイル\Book1 の上書き保存"
ALL_ITEM_LIST[119] = "\ファイル\ファイルのインポート"
ALL_ITEM_LIST[120] = "\ファイル\ファイルのエクスポート"
ALL_ITEM_LIST[121] = "\ファイル\Module1 の解放"
ALL_ITEM_LIST[122] = "\ファイル\印刷"
ALL_ITEM_LIST[123] = "\ファイル\終了して Microsoft Excel へ戻る"
ALL_ITEM_LIST[124] = "\編集\元に戻せません"
ALL_ITEM_LIST[125] = "\編集\やり直しできません"
ALL_ITEM_LIST[126] = "\編集\切り取り"
ALL_ITEM_LIST[127] = "\編集\コピー"
ALL_ITEM_LIST[128] = "\編集\貼り付け"
ALL_ITEM_LIST[129] = "\編集\クリア"
ALL_ITEM_LIST[130] = "\編集\すべて選択"
ALL_ITEM_LIST[131] = "\編集\検索"
ALL_ITEM_LIST[132] = "\編集\次を検索"
ALL_ITEM_LIST[133] = "\編集\置換"
ALL_ITEM_LIST[134] = "\編集\インデント"
ALL_ITEM_LIST[135] = "\編集\インデントを戻す"
ALL_ITEM_LIST[136] = "\編集\プロパティ/メソッドの一覧"
ALL_ITEM_LIST[137] = "\編集\定数の一覧"
ALL_ITEM_LIST[138] = "\編集\クイック ヒント"
ALL_ITEM_LIST[139] = "\編集\パラメーター ヒント"
ALL_ITEM_LIST[140] = "\編集\入力候補"
ALL_ITEM_LIST[141] = "\編集\ブックマーク\ブックマークの設定/解除"
ALL_ITEM_LIST[142] = "\編集\ブックマーク\次のブックマーク"
ALL_ITEM_LIST[143] = "\編集\ブックマーク\前のブックマーク"
ALL_ITEM_LIST[144] = "\編集\ブックマーク\すべてのブックマークの解除"
ALL_ITEM_LIST[145] = "\表示\コード"
ALL_ITEM_LIST[146] = "\表示\オブジェクト"
ALL_ITEM_LIST[147] = "\表示\定義"
ALL_ITEM_LIST[148] = "\表示\元の位置へ移動"
ALL_ITEM_LIST[149] = "\表示\オブジェクト ブラウザー"
ALL_ITEM_LIST[150] = "\表示\イミディエイト ウィンドウ"
ALL_ITEM_LIST[151] = "\表示\ローカル ウィンドウ"
ALL_ITEM_LIST[152] = "\表示\ウォッチ ウィンドウ"
ALL_ITEM_LIST[153] = "\表示\呼び出し履歴"
ALL_ITEM_LIST[154] = "\表示\プロジェクト エクスプローラー"
ALL_ITEM_LIST[155] = "\表示\プロパティ ウィンドウ"
ALL_ITEM_LIST[156] = "\表示\ツールボックス"
ALL_ITEM_LIST[157] = "\表示\タブ オーダー"
ALL_ITEM_LIST[158] = "\表示\ツール バー\デバッグ"
ALL_ITEM_LIST[159] = "\表示\ツール バー\ユーザー フォーム"
ALL_ITEM_LIST[160] = "\表示\ツール バー\標準"
ALL_ITEM_LIST[161] = "\表示\ツール バー\編集"
ALL_ITEM_LIST[162] = "\表示\ツール バー\ユーザー設定"
ALL_ITEM_LIST[163] = "\表示\Microsoft Excel"
ALL_ITEM_LIST[164] = "\コード"
ALL_ITEM_LIST[165] = "\オブジェクト"
ALL_ITEM_LIST[166] = "\定義"
ALL_ITEM_LIST[167] = "\元の位置へ移動"
ALL_ITEM_LIST[168] = "\オブジェクト ブラウザー"
ALL_ITEM_LIST[169] = "\イミディエイト ウィンドウ"
ALL_ITEM_LIST[170] = "\ローカル ウィンドウ"
ALL_ITEM_LIST[171] = "\ウォッチ ウィンドウ"
ALL_ITEM_LIST[172] = "\呼び出し履歴"
ALL_ITEM_LIST[173] = "\プロジェクト エクスプローラー"
ALL_ITEM_LIST[174] = "\プロパティ ウィンドウ"
ALL_ITEM_LIST[175] = "\ツールボックス"
ALL_ITEM_LIST[176] = "\タブ オーダー"
ALL_ITEM_LIST[177] = "\ツール バー\デバッグ"
ALL_ITEM_LIST[178] = "\ツール バー\ユーザー フォーム"
ALL_ITEM_LIST[179] = "\ツール バー\標準"
ALL_ITEM_LIST[180] = "\ツール バー\編集"
ALL_ITEM_LIST[181] = "\ツール バー\ユーザー設定"
ALL_ITEM_LIST[182] = "\Microsoft Excel"
ALL_ITEM_LIST[183] = "\挿入\プロシージャ"
ALL_ITEM_LIST[184] = "\挿入\ユーザー フォーム"
ALL_ITEM_LIST[185] = "\挿入\標準モジュール"
ALL_ITEM_LIST[186] = "\挿入\クラス モジュール"
ALL_ITEM_LIST[187] = "\挿入\ファイル"
ALL_ITEM_LIST[188] = "\プロシージャ"
ALL_ITEM_LIST[189] = "\ユーザー フォーム"
ALL_ITEM_LIST[190] = "\標準モジュール"
ALL_ITEM_LIST[191] = "\クラス モジュール"
ALL_ITEM_LIST[192] = "\ファイル"
ALL_ITEM_LIST[193] = "\書式\整列\左"
ALL_ITEM_LIST[194] = "\書式\整列\中央"
ALL_ITEM_LIST[195] = "\書式\整列\右"
ALL_ITEM_LIST[196] = "\書式\整列\上"
ALL_ITEM_LIST[197] = "\書式\整列\中央"
ALL_ITEM_LIST[198] = "\書式\整列\下"
ALL_ITEM_LIST[199] = "\書式\整列\グリッドに合わせる"
ALL_ITEM_LIST[200] = "\書式\同じサイズに揃える\幅"
ALL_ITEM_LIST[201] = "\書式\同じサイズに揃える\高さ"
ALL_ITEM_LIST[202] = "\書式\同じサイズに揃える\両方向"
ALL_ITEM_LIST[203] = "\書式\サイズを合わせる"
ALL_ITEM_LIST[204] = "\書式\グリッドに合わせる"
ALL_ITEM_LIST[205] = "\書式\左右の間隔\間隔を均等にする"
ALL_ITEM_LIST[206] = "\書式\左右の間隔\間隔を広くする"
ALL_ITEM_LIST[207] = "\書式\左右の間隔\間隔を狭くする"
ALL_ITEM_LIST[208] = "\書式\左右の間隔\間隔の削除"
ALL_ITEM_LIST[209] = "\書式\上下の間隔\間隔を均等にする"
ALL_ITEM_LIST[210] = "\書式\上下の間隔\間隔を広くする"
ALL_ITEM_LIST[211] = "\書式\上下の間隔\間隔を狭くする"
ALL_ITEM_LIST[212] = "\書式\上下の間隔\間隔の削除"
ALL_ITEM_LIST[213] = "\書式\フォームの中央に配置\左右"
ALL_ITEM_LIST[214] = "\書式\フォームの中央に配置\上下"
ALL_ITEM_LIST[215] = "\書式\ボタンの配置\下"
ALL_ITEM_LIST[216] = "\書式\ボタンの配置\右"
ALL_ITEM_LIST[217] = "\書式\グループ化"
ALL_ITEM_LIST[218] = "\書式\グループ解除"
ALL_ITEM_LIST[219] = "\書式\順序\最前面へ移動"
ALL_ITEM_LIST[220] = "\書式\順序\最背面へ移動"
ALL_ITEM_LIST[221] = "\書式\順序\前面へ移動"
ALL_ITEM_LIST[222] = "\書式\順序\背面へ移動"
ALL_ITEM_LIST[223] = "\デバッグ\VBAProject のコンパイル"
ALL_ITEM_LIST[224] = "\デバッグ\ステップ イン"
ALL_ITEM_LIST[225] = "\デバッグ\ステップ オーバー"
ALL_ITEM_LIST[226] = "\デバッグ\ステップ アウト"
ALL_ITEM_LIST[227] = "\デバッグ\カーソル行の前まで実行"
ALL_ITEM_LIST[228] = "\デバッグ\ウォッチ式の追加"
ALL_ITEM_LIST[229] = "\デバッグ\ウォッチ式の編集"
ALL_ITEM_LIST[230] = "\デバッグ\クイック ウォッチ"
ALL_ITEM_LIST[231] = "\デバッグ\ブレークポイントの設定/解除"
ALL_ITEM_LIST[232] = "\デバッグ\すべてのブレークポイントの解除"
ALL_ITEM_LIST[233] = "\デバッグ\次のステートメントの設定"
ALL_ITEM_LIST[234] = "\デバッグ\次のステートメントの表示"
ALL_ITEM_LIST[235] = "\実行\Sub/ユーザー フォームの実行"
ALL_ITEM_LIST[236] = "\実行\中断"
ALL_ITEM_LIST[237] = "\実行\リセット"
ALL_ITEM_LIST[238] = "\実行\デザイン モード"
ALL_ITEM_LIST[239] = "\ツール\参照設定"
ALL_ITEM_LIST[240] = "\ツール\その他のコントロール"
ALL_ITEM_LIST[241] = "\ツール\マクロ"
ALL_ITEM_LIST[242] = "\ツール\オプション"
ALL_ITEM_LIST[243] = "\ツール\VBAProject のプロパティ"
ALL_ITEM_LIST[244] = "\ツール\デジタル署名"
ALL_ITEM_LIST[245] = "\アドイン\アドイン マネージャー"
ALL_ITEM_LIST[246] = "\アドイン マネージャー"
ALL_ITEM_LIST[247] = "\ウィンドウ\分割"
ALL_ITEM_LIST[248] = "\ウィンドウ\上下に並べて表示"
ALL_ITEM_LIST[249] = "\ウィンドウ\左右に並べて表示"
ALL_ITEM_LIST[250] = "\ウィンドウ\重ねて表示"
ALL_ITEM_LIST[251] = "\ウィンドウ\アイコンの整列"
ALL_ITEM_LIST[252] = "\ウィンドウ\1 Module1 (コード)"
ALL_ITEM_LIST[253] = "\分割"
ALL_ITEM_LIST[254] = "\上下に並べて表示"
ALL_ITEM_LIST[255] = "\左右に並べて表示"
ALL_ITEM_LIST[256] = "\重ねて表示"
ALL_ITEM_LIST[257] = "\アイコンの整列"
ALL_ITEM_LIST[258] = "\1 Module1 (コード)"
ALL_ITEM_LIST[259] = "\ヘルプ\Microsoft Visual Basic for Applications ヘルプ"
ALL_ITEM_LIST[260] = "\ヘルプ\MSDN ホームページ"
ALL_ITEM_LIST[261] = "\ヘルプ\バージョン情報"
//////////////////////////////////////////////////
// ITM_TREEVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_TREEVIEW, -1) = 8
ALL_ITEM_LIST[0] = "VBAProject (Book1)"
ALL_ITEM_LIST[1] = "VBAProject (Book1)\Microsoft Excel Objects"
ALL_ITEM_LIST[2] = "VBAProject (Book1)\Microsoft Excel Objects\Sheet1 (Sheet1)"
ALL_ITEM_LIST[3] = "VBAProject (Book1)\Microsoft Excel Objects\Sheet2 (Sheet2)"
ALL_ITEM_LIST[4] = "VBAProject (Book1)\Microsoft Excel Objects\Sheet3 (Sheet3)"
ALL_ITEM_LIST[5] = "VBAProject (Book1)\Microsoft Excel Objects\ThisWorkbook"
ALL_ITEM_LIST[6] = "VBAProject (Book1)\標準モジュール"
ALL_ITEM_LIST[7] = "VBAProject (Book1)\標準モジュール\Module1"
//////////////////////////////////////////////////
// ITM_LISTVIEW
//////////////////////////////////////////////////
GETITEM(ID, ITM_LISTVIEW, -1) = 0
//////////////////////////////////////////////////
// ITM_TOOLBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_TOOLBAR, -1) = 3
ALL_ITEM_LIST[0] = "編集"
ALL_ITEM_LIST[1] = "標準"
ALL_ITEM_LIST[2] = "プロジェクト ウィンドウ"
//////////////////////////////////////////////////
// ITM_ACCCLK
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCCLK, -1) = 269
ALL_ITEM_LIST[0] = "MsoDockLeft"
ALL_ITEM_LIST[1] = "MsoDockRight"
ALL_ITEM_LIST[2] = "MsoDockTop"
ALL_ITEM_LIST[3] = "プロパティ/メソッドの一覧"
ALL_ITEM_LIST[4] = "定数の一覧"
ALL_ITEM_LIST[5] = "クイック ヒント"
ALL_ITEM_LIST[6] = "パラメーター ヒント"
ALL_ITEM_LIST[7] = "入力候補"
ALL_ITEM_LIST[8] = "インデント"
ALL_ITEM_LIST[9] = "インデントを戻す"
ALL_ITEM_LIST[10] = "ブレークポイントの設定/解除"
ALL_ITEM_LIST[11] = "コメント ブロック"
ALL_ITEM_LIST[12] = "非コメント ブロック"
ALL_ITEM_LIST[13] = "ブックマークの設定/解除"
ALL_ITEM_LIST[14] = "次のブックマーク"
ALL_ITEM_LIST[15] = "前のブックマーク"
ALL_ITEM_LIST[16] = "すべてのブックマークの解除"
ALL_ITEM_LIST[17] = "ツールバー オプション"
ALL_ITEM_LIST[18] = "Microsoft Excel"
ALL_ITEM_LIST[19] = "ユーザー フォーム"
ALL_ITEM_LIST[20] = "標準モジュール"
ALL_ITEM_LIST[21] = "クラス モジュール"
ALL_ITEM_LIST[22] = "プロシージャ"
ALL_ITEM_LIST[23] = "追加"
ALL_ITEM_LIST[24] = "その他の ActiveX デザイナー"
ALL_ITEM_LIST[25] = "[Empty]"
ALL_ITEM_LIST[26] = "Book1 の上書き保存"
ALL_ITEM_LIST[27] = "切り取り"
ALL_ITEM_LIST[28] = "コピー"
ALL_ITEM_LIST[29] = "貼り付け"
ALL_ITEM_LIST[30] = "検索"
ALL_ITEM_LIST[31] = "元に戻せません"
ALL_ITEM_LIST[32] = "やり直しできません"
ALL_ITEM_LIST[33] = "Sub/ユーザー フォームの実行"
ALL_ITEM_LIST[34] = "中断"
ALL_ITEM_LIST[35] = "リセット"
ALL_ITEM_LIST[36] = "デザイン モード"
ALL_ITEM_LIST[37] = "プロジェクトの実行"
ALL_ITEM_LIST[38] = "プロジェクト エクスプローラー"
ALL_ITEM_LIST[39] = "プロパティ ウィンドウ"
ALL_ITEM_LIST[40] = "オブジェクト ブラウザー"
ALL_ITEM_LIST[41] = "ツールボックス"
ALL_ITEM_LIST[42] = "Microsoft Visual Basic for Applications ヘルプ"
ALL_ITEM_LIST[43] = "ツールバー オプション"
ALL_ITEM_LIST[44] = "ファイル"
ALL_ITEM_LIST[45] = "新しいプロジェクト"
ALL_ITEM_LIST[46] = "プロジェクトを開く"
ALL_ITEM_LIST[47] = "Book1 の上書き保存"
ALL_ITEM_LIST[48] = "名前を付けて保存"
ALL_ITEM_LIST[49] = "ファイルのインポート"
ALL_ITEM_LIST[50] = "ファイルのエクスポート"
ALL_ITEM_LIST[51] = "プロジェクトを閉じる"
ALL_ITEM_LIST[52] = "Module1 の解放"
ALL_ITEM_LIST[53] = "印刷"
ALL_ITEM_LIST[54] = "実行可能ファイルの作成"
ALL_ITEM_LIST[55] = "終了して Microsoft Excel へ戻る"
ALL_ITEM_LIST[56] = "編集"
ALL_ITEM_LIST[57] = "元に戻せません"
ALL_ITEM_LIST[58] = "やり直しできません"
ALL_ITEM_LIST[59] = "切り取り"
ALL_ITEM_LIST[60] = "コピー"
ALL_ITEM_LIST[61] = "貼り付け"
ALL_ITEM_LIST[62] = "クリア"
ALL_ITEM_LIST[63] = "すべて選択"
ALL_ITEM_LIST[64] = "検索"
ALL_ITEM_LIST[65] = "次を検索"
ALL_ITEM_LIST[66] = "置換"
ALL_ITEM_LIST[67] = "インデント"
ALL_ITEM_LIST[68] = "インデントを戻す"
ALL_ITEM_LIST[69] = "プロパティ/メソッドの一覧"
ALL_ITEM_LIST[70] = "定数の一覧"
ALL_ITEM_LIST[71] = "クイック ヒント"
ALL_ITEM_LIST[72] = "パラメーター ヒント"
ALL_ITEM_LIST[73] = "入力候補"
ALL_ITEM_LIST[74] = "ブックマーク"
ALL_ITEM_LIST[75] = "ブックマークの設定/解除"
ALL_ITEM_LIST[76] = "次のブックマーク"
ALL_ITEM_LIST[77] = "前のブックマーク"
ALL_ITEM_LIST[78] = "すべてのブックマークの解除"
ALL_ITEM_LIST[79] = "表示"
ALL_ITEM_LIST[80] = "コード"
ALL_ITEM_LIST[81] = "オブジェクト"
ALL_ITEM_LIST[82] = "定義"
ALL_ITEM_LIST[83] = "元の位置へ移動"
ALL_ITEM_LIST[84] = "オブジェクト ブラウザー"
ALL_ITEM_LIST[85] = "イミディエイト ウィンドウ"
ALL_ITEM_LIST[86] = "ローカル ウィンドウ"
ALL_ITEM_LIST[87] = "ウォッチ ウィンドウ"
ALL_ITEM_LIST[88] = "呼び出し履歴"
ALL_ITEM_LIST[89] = "プロジェクト エクスプローラー"
ALL_ITEM_LIST[90] = "プロパティ ウィンドウ"
ALL_ITEM_LIST[91] = "ツールボックス"
ALL_ITEM_LIST[92] = "タブ オーダー"
ALL_ITEM_LIST[93] = "ツール バー"
ALL_ITEM_LIST[94] = "デバッグ"
ALL_ITEM_LIST[95] = "標準"
ALL_ITEM_LIST[96] = "編集"
ALL_ITEM_LIST[97] = "ユーザー設定"
ALL_ITEM_LIST[98] = "Microsoft Excel"
ALL_ITEM_LIST[99] = "挿入"
ALL_ITEM_LIST[100] = "プロシージャ"
ALL_ITEM_LIST[101] = "ユーザー フォーム"
ALL_ITEM_LIST[102] = "標準モジュール"
ALL_ITEM_LIST[103] = "クラス モジュール"
ALL_ITEM_LIST[104] = "追加"
ALL_ITEM_LIST[105] = "その他の ActiveX デザイナー"
ALL_ITEM_LIST[106] = "コンポーネント"
ALL_ITEM_LIST[107] = "ファイル"
ALL_ITEM_LIST[108] = "書式"
ALL_ITEM_LIST[109] = "整列"
ALL_ITEM_LIST[110] = "左"
ALL_ITEM_LIST[111] = "中央"
ALL_ITEM_LIST[112] = "右"
ALL_ITEM_LIST[113] = "上"
ALL_ITEM_LIST[114] = "下"
ALL_ITEM_LIST[115] = "グリッドに合わせる"
ALL_ITEM_LIST[116] = "同じサイズに揃える"
ALL_ITEM_LIST[117] = "幅"
ALL_ITEM_LIST[118] = "高さ"
ALL_ITEM_LIST[119] = "両方向"
ALL_ITEM_LIST[120] = "サイズを合わせる"
ALL_ITEM_LIST[121] = "左右の間隔"
ALL_ITEM_LIST[122] = "間隔を均等にする"
ALL_ITEM_LIST[123] = "間隔を広くする"
ALL_ITEM_LIST[124] = "間隔を狭くする"
ALL_ITEM_LIST[125] = "間隔の削除"
ALL_ITEM_LIST[126] = "上下の間隔"
ALL_ITEM_LIST[127] = "フォームの中央に配置"
ALL_ITEM_LIST[128] = "左右"
ALL_ITEM_LIST[129] = "上下"
ALL_ITEM_LIST[130] = "ボタンの配置"
ALL_ITEM_LIST[131] = "グループ化"
ALL_ITEM_LIST[132] = "グループ解除"
ALL_ITEM_LIST[133] = "順序"
ALL_ITEM_LIST[134] = "最前面へ移動"
ALL_ITEM_LIST[135] = "最背面へ移動"
ALL_ITEM_LIST[136] = "前面へ移動"
ALL_ITEM_LIST[137] = "背面へ移動"
ALL_ITEM_LIST[138] = "デバッグ"
ALL_ITEM_LIST[139] = "VBAProject のコンパイル"
ALL_ITEM_LIST[140] = "ステップ イン"
ALL_ITEM_LIST[141] = "ステップ オーバー"
ALL_ITEM_LIST[142] = "ステップ アウト"
ALL_ITEM_LIST[143] = "カーソル行の前まで実行"
ALL_ITEM_LIST[144] = "ウォッチ式の追加"
ALL_ITEM_LIST[145] = "ウォッチ式の編集"
ALL_ITEM_LIST[146] = "クイック ウォッチ"
ALL_ITEM_LIST[147] = "ブレークポイントの設定/解除"
ALL_ITEM_LIST[148] = "すべてのブレークポイントの解除"
ALL_ITEM_LIST[149] = "次のステートメントの設定"
ALL_ITEM_LIST[150] = "次のステートメントの表示"
ALL_ITEM_LIST[151] = "実行"
ALL_ITEM_LIST[152] = "Sub/ユーザー フォームの実行"
ALL_ITEM_LIST[153] = "中断"
ALL_ITEM_LIST[154] = "リセット"
ALL_ITEM_LIST[155] = "デザイン モード"
ALL_ITEM_LIST[156] = "プロジェクトの実行"
ALL_ITEM_LIST[157] = "ツール"
ALL_ITEM_LIST[158] = "参照設定"
ALL_ITEM_LIST[159] = "その他のコントロール"
ALL_ITEM_LIST[160] = "マクロ"
ALL_ITEM_LIST[161] = "オプション"
ALL_ITEM_LIST[162] = "VBAProject のプロパティ"
ALL_ITEM_LIST[163] = "デジタル署名"
ALL_ITEM_LIST[164] = "アドイン"
ALL_ITEM_LIST[165] = "アドイン マネージャー"
ALL_ITEM_LIST[166] = "ウィンドウ"
ALL_ITEM_LIST[167] = "分割"
ALL_ITEM_LIST[168] = "上下に並べて表示"
ALL_ITEM_LIST[169] = "左右に並べて表示"
ALL_ITEM_LIST[170] = "重ねて表示"
ALL_ITEM_LIST[171] = "アイコンの整列"
ALL_ITEM_LIST[172] = "1 Module1 (コード)"
ALL_ITEM_LIST[173] = "ウィンドウ名"
ALL_ITEM_LIST[174] = "ウィンドウの選択"
ALL_ITEM_LIST[175] = "ヘルプ"
ALL_ITEM_LIST[176] = "Microsoft Visual Basic for Applications ヘルプ"
ALL_ITEM_LIST[177] = "MSDN ホームページ"
ALL_ITEM_LIST[178] = "バージョン情報"
ALL_ITEM_LIST[179] = "プロジェクトを開く"
ALL_ITEM_LIST[180] = "名前を付けて保存"
ALL_ITEM_LIST[181] = "ファイルのインポート"
ALL_ITEM_LIST[182] = "ファイルのエクスポート"
ALL_ITEM_LIST[183] = "Module1 の解放"
ALL_ITEM_LIST[184] = "印刷"
ALL_ITEM_LIST[185] = "実行可能ファイルの作成"
ALL_ITEM_LIST[186] = "検索"
ALL_ITEM_LIST[187] = "置換"
ALL_ITEM_LIST[188] = "呼び出し履歴"
ALL_ITEM_LIST[189] = "ユーザー設定"
ALL_ITEM_LIST[190] = "プロシージャ"
ALL_ITEM_LIST[191] = "その他の ActiveX デザイナー"
ALL_ITEM_LIST[192] = "コンポーネント"
ALL_ITEM_LIST[193] = "ファイル"
ALL_ITEM_LIST[194] = "ウォッチ式の追加"
ALL_ITEM_LIST[195] = "ウォッチ式の編集"
ALL_ITEM_LIST[196] = "クイック ウォッチ"
ALL_ITEM_LIST[197] = "参照設定"
ALL_ITEM_LIST[198] = "その他のコントロール"
ALL_ITEM_LIST[199] = "マクロ"
ALL_ITEM_LIST[200] = "オプション"
ALL_ITEM_LIST[201] = "VBAProject のプロパティ"
ALL_ITEM_LIST[202] = "デジタル署名"
ALL_ITEM_LIST[203] = "アドイン マネージャー"
ALL_ITEM_LIST[204] = "ウィンドウの選択"
ALL_ITEM_LIST[205] = "バージョン情報"
ALL_ITEM_LIST[206] = "MsoDockBottom"
ALL_ITEM_LIST[207] = "ウォッチ"
ALL_ITEM_LIST[208] = "1 行上"
ALL_ITEM_LIST[209] = "上へドラッグ"
ALL_ITEM_LIST[210] = "下へドラッグ"
ALL_ITEM_LIST[211] = "1 行下"
ALL_ITEM_LIST[212] = "1 行上"
ALL_ITEM_LIST[213] = "1 行下"
ALL_ITEM_LIST[214] = "イミディエイト"
ALL_ITEM_LIST[215] = "1 列左"
ALL_ITEM_LIST[216] = "右へドラッグ"
ALL_ITEM_LIST[217] = "1 列右"
ALL_ITEM_LIST[218] = "1 行上"
ALL_ITEM_LIST[219] = "上へドラッグ"
ALL_ITEM_LIST[220] = "下へドラッグ"
ALL_ITEM_LIST[221] = "1 行下"
ALL_ITEM_LIST[222] = "1 行上"
ALL_ITEM_LIST[223] = "1 行下"
ALL_ITEM_LIST[224] = "作業領域"
ALL_ITEM_LIST[225] = "ドキュメント ウィンドウ"
ALL_ITEM_LIST[226] = "最小化"
ALL_ITEM_LIST[227] = "元のサイズに戻す"
ALL_ITEM_LIST[228] = "閉じる"
ALL_ITEM_LIST[229] = "Module1 (コード)"
ALL_ITEM_LIST[230] = "1 列左"
ALL_ITEM_LIST[231] = "右へドラッグ"
ALL_ITEM_LIST[232] = "1 列右"
ALL_ITEM_LIST[233] = "1 行上"
ALL_ITEM_LIST[234] = "上へドラッグ"
ALL_ITEM_LIST[235] = "下へドラッグ"
ALL_ITEM_LIST[236] = "1 行下"
ALL_ITEM_LIST[237] = "1 行上"
ALL_ITEM_LIST[238] = "1 行下"
ALL_ITEM_LIST[239] = "開く"
ALL_ITEM_LIST[240] = "(General)"
ALL_ITEM_LIST[241] = "開く"
ALL_ITEM_LIST[242] = "(Declarations)"
ALL_ITEM_LIST[243] = "ドキュメント ウィンドウ"
ALL_ITEM_LIST[244] = "最小化"
ALL_ITEM_LIST[245] = "最大化"
ALL_ITEM_LIST[246] = "閉じる"
ALL_ITEM_LIST[247] = "プロジェクト - VBAProject"
ALL_ITEM_LIST[248] = "MsoDockLeft"
ALL_ITEM_LIST[249] = "MsoDockRight"
ALL_ITEM_LIST[250] = "MsoDockTop"
ALL_ITEM_LIST[251] = "コード"
ALL_ITEM_LIST[252] = "オブジェクト"
ALL_ITEM_LIST[253] = "フォルダーの切り替え"
ALL_ITEM_LIST[254] = "ツールバー オプション"
ALL_ITEM_LIST[255] = "MsoDockBottom"
ALL_ITEM_LIST[256] = "VBAProject (Book1)"
ALL_ITEM_LIST[257] = "Microsoft Excel Objects"
ALL_ITEM_LIST[258] = "Sheet1 (Sheet1)"
ALL_ITEM_LIST[259] = "Sheet2 (Sheet2)"
ALL_ITEM_LIST[260] = "Sheet3 (Sheet3)"
ALL_ITEM_LIST[261] = "ThisWorkbook"
ALL_ITEM_LIST[262] = "標準モジュール"
ALL_ITEM_LIST[263] = "Module1"
ALL_ITEM_LIST[264] = "プロパティ"
ALL_ITEM_LIST[265] = "開く"
ALL_ITEM_LIST[266] = "全体"
ALL_ITEM_LIST[267] = "項目別"
ALL_ITEM_LIST[268] = "MsoWorkPane"
//////////////////////////////////////////////////
// ITM_EDIT
//////////////////////////////////////////////////
GETITEM(ID, ITM_EDIT, -1) = 0
//////////////////////////////////////////////////
// ITM_STATIC
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATIC, -1) = 0
//////////////////////////////////////////////////
// ITM_STATUSBAR
//////////////////////////////////////////////////
GETITEM(ID, ITM_STATUSBAR, -1) = 0
//////////////////////////////////////////////////
// ITM_ACCTXT
//////////////////////////////////////////////////
GETITEM(ID, ITM_ACCTXT, -1) = 2
ALL_ITEM_LIST[0] = "(General)"
ALL_ITEM_LIST[1] = "(Declarations)"
CLKITEM関数で操作できる項目を取得
アクティブウィンドウのCLKITEM関数で操作できる要素を取得します。結果は実行したUWSファイルと同じディレクトリのCLKITEM.logに出力されます。
OPTION LOGPATH = "CLKITEM.log"
OPTION LOGFILE = 6
HASHTBL ITEMS
ITEMS["ITM_BTN"] = "CLK_BTN"
ITEMS["ITM_LIST"] = "CLK_LIST"
ITEMS["ITM_TAB"] = "CLK_TAB"
ITEMS["ITM_MENU"] = "CLK_MENU"
ITEMS["ITM_TREEVIEW"] = "CLK_TREEVIEW"
ITEMS["ITM_LISTVIEW"] = "CLK_LISTVIEW"
ITEMS["ITM_TOOLBAR"] = "CLK_TOOLBAR"
ITEMS["ITM_LINK"] = "CLK_LINK"
ITEMS["ITM_ACCCLK"] = "CLK_ACC"
FOR sec = 3 TO 1 STEP -1
FUKIDASI(sec + "秒後にアクティブなウィンドウの情報を取得します。")
SLEEP(1.000)
NEXT
DIM ID = GETID(GET_ACTIVE_WIN)
PRINT "DIM ID = GETID(<#DBL>" + STATUS(ID, ST_TITLE) + "<#DBL>, <#DBL>" + STATUS(ID, ST_CLASS) + "<#DBL>)"
PRINT
FUKIDASI("「" + STATUS(ID, ST_TITLE) + "」…取得中")
//FOR item IN array
FOR i = 0 TO LENGTH(ITEMS) - 1
PRINT "//////////////////////////////////////////////////"
PRINT "// " + ITEMS[i, HASH_KEY]
PRINT "//////////////////////////////////////////////////"
PRINT "GETITEM(ID, " + ITEMS[i, HASH_KEY] + ", -1) = " + GETITEM(ID, EVAL(ITEMS[i, HASH_KEY]), -1)
FOR j = 0 TO LENGTH(ALL_ITEM_LIST) - 1
str = ALL_ITEM_LIST[j]
str = REPLACE(str, "<#CR>", "<@cr>")
str = REPLACE(str, "<#DBL>", "<@dbl>")
str = REPLACE(str, "<#TAB>", "<@tab>")
str = REPLACE(str, CHR(10), "<#DBL>+CHR(10)+<#DBL>")
str = REPLACE(str, "<@", "<#")
PRINT "CLKITEM(ID, <#DBL>" + str + "<#DBL>, " + ITEMS[i, HASH_VAL] + ")"
NEXT
PRINT
NEXT
プログラム実行例
メモ帳のメニューバーを取得
メモ帳のメニューバーにあるすべてのメニュー項目を取得します。
メニュー項目をクリックするには[createLink url="/script/function/clkitem/"]を使います。
DIM ID = EXEC("notepad")
FOR item IN GETITEM(ID, ITM_MENU)
PRINT item
NEXT
CTRLWIN(ID, CLOSE)
結果
ファイル\新規
ファイル\新しいウィンドウ
ファイル\開く
ファイル\上書き保存
ファイル\名前を付けて保存
ファイル\ページ設定
ファイル\印刷
ファイル\メモ帳の終了
編集\元に戻す
編集\切り取り
編集\コピー
編集\貼り付け
編集\削除
編集\Bing で検索
編集\検索
編集\次を検索
編集\前を検索
編集\置換
編集\行へ移動
編集\すべて選択
編集\日付と時刻
書式\右端で折り返す
書式\フォント
表示\ズーム\拡大
表示\ズーム\縮小
表示\ズーム\既定の倍率に戻す
表示\ステータス バー
ヘルプ\ヘルプの表示
ヘルプ\フィードバックの送信
ヘルプ\バージョン情報
使用関数
解説
電卓を操作し計算した結果を取得
EXEC("calc")
DIM ID = GETID("電卓")
DIM array[] = "1", "5", "小数点", "4", "プラス", "3", "等号"
FOR item IN array
CLKITEM(ID, item, ITM_BTN)
NEXT
FOR item IN GETITEM(ID, ITM_STATIC)
IFB POS("表示は ", item) AND POS(" です", item) THEN
PRINT VAL(REPLACE(REPLACE(item,"表示は ", ""), " です", ""))
ENDIF
NEXT
CTRLWIN(ID, CLOSE)
結果
18.4
使用関数
解説
ファイルを開いているプロセスを調べる
SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")
CONST TemporaryFolder = 2
DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
WITH FSO
DIM Folder = .GetSpecialFolder(TemporaryFolder)
DIM folderspec = Folder.Path
DIM filename = .GetTempName
DIM path = .BuildPath(folderspec, filename)
ENDWITH
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.FileRun()
DIM ID = GETID("ファイル名を指定して実行", "#32770")
SENDSTR(ID, "cmd /c openfiles /query /fo CSV > " + path)
CLKITEM(ID, "OK", CLK_BTN)
SLEEP(0.500)
REPEAT
SLEEP(0.100)
UNTIL GETID("C:\WINDOWS\system32\cmd.exe", "ConsoleWindowClass") = -1
DIM FID = FOPEN(path, F_READ)
TRY
DIM ID2 = GETID("使用中", "OperationStatusWindow")
GETITEM(ID2, ITM_ACCTXT, 1)
DIM str = ALL_ITEM_LIST[1]
DIM sep = IIF(POS("フォルダー", STATUS(ID2, ST_TITLE)) <> 0, "\", "")
DIM msg = "■" + str + "<#CR>"
FOR r = 5 TO FGET(FID, F_LINECOUNT)
IF POS("\" + str + sep, FGET(FID, r, 3)) <> 0 THEN
msg = msg + "ID:" + FGET(FID, r, 1) + ", プロセス名:" + FGET(FID, r, 2) + "<#CR>"
ENDIF
NEXT
FCLOSE(FID)
REPEAT
FUKIDASI(TRIM(msg))
SLEEP(0.100)
UNTIL GETID("使用中", "OperationStatusWindow") = -1
FINALLY
FSO.DeleteFile(path)
ENDTRY
//////////////////////////////////////////////////
// 【引数】
//
// 【戻り値】
//
//////////////////////////////////////////////////
PROCEDURE forceQuit()
EXITEXIT
FEND
//////////////////////////////////////////////////
// 【引数】
// expr : 評価する式
// truepart : 評価した式がTrueのときに返す値
// falsepart : 評価した式がFalseのときに返す値
// 【戻り値】
// truepart : 評価した式がTrueのとき、falsepart : 評価した式がFalseのとき
//////////////////////////////////////////////////
FUNCTION IIF(expr, truepart, falsepart)
IFB EVAL(expr) THEN
RESULT = truepart
ELSE
RESULT = falsepart
ENDIF
FEND
使用関数
解説
音量を取得
GETITEM(GETID("", "Shell_TrayWnd"), ITM_TOOLBAR)
FOR item IN ALL_ITEM_LIST
IFB POS("スピーカー: ", item) <> 0 THEN
PRINT REPLACE(REPLACE(item, "スピーカー: ", ""), "%", "")
BREAK
ENDIF
NEXT
結果
10
使用関数
CLKITEMで操作できる項目を取得
PUBLIC flg = FALSE
SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")
SETHOTKEY(VK_X, MOD_ALT, "flag")
DIM array[] = "BTN", "LIST", "TAB", "MENU", "TREEVIEW", + _
"LISTVIEW", "EDIT", "STATIC", "STATUSBAR", "TOOLBAR", + _
"LINK", "ACCCLK", "ACCCLK2", "ACCTXT", "ACCEDIT", + _
"FROMLAST", "BACK"
REPEAT
FUKIDASI("Alt + Xでカーソル下の情報を取得")
SLEEP(0.001)
UNTIL flg
FUKIDASI("取得中")
DIM ID = GETID(GET_FROMPOINT_WIN)
PRINT "DIM ID = GETID(<#DBL>" + STATUS(ID, ST_TITLE) + "<#DBL>, <#DBL>" + STATUS(ID, ST_CLASS) + "<#DBL>)"
PRINT
FOR item IN array
PRINT "// [" + item + "]"
FOR class IN GETITEM(ID, EVAL("ITM_" + item), -1)
PRINT "CLKITEM(ID, <#DBL>" + class + "<#DBL>, CLK_" + item + ")"
NEXT
PRINT
NEXT
PROCEDURE forceQuit()
EXITEXIT
FEND
PROCEDURE flag()
flg = TRUE
FEND
使用関数
解説
関連記事
- CLKITEM関数 (スクリプト関数)
- 指定したIDのウィンドウのアイテムをクリックします。アイテムに指定できるものにはボタン・チェックボックス・ラジオボタン・リストボックス・コンボボックス・タブコントロール・メニュー・ツリービュー・リストビュー・ツールバー・リンクがあります。
- SLCTBOX関数 (スクリプト関数)
- セレクトボックスを表示します。第一引数に選択肢の種別、第二引数にタイムアウト時間、第三引数が数値ならx座標、第四引数にy座標、第三引数が数値でなければメッセージ、メッセージの次の引数に項目を指定します。
- CHKBTN関数 (スクリプト関数)
- 指定したIDのウィンドウにあるチェックボックス・ラジオボタンがチェックされているかを返します。
- GETCTLHND関数 (スクリプト関数)
- ボタン等、オブジェクトのハンドルを取得します。
- GETSTR関数 (スクリプト関数)
- 引数に指定したIDのウィンドウの文字列を取得します。取得した文字列を返します。
- ACW関数 (スクリプト関数)
- 指定したIDのウィンドウの位置・サイズを変更します。IDのみを指定した場合、そのウィンドウをアクティブにします。
- GETID関数 (スクリプト関数)
- 指定したウィンドウのIDを取得します。第一引数に取得したいウィンドウのタイトル(一部でも可)を指定します。UWSCでウィンドウを操作するのによく使う関数です。
- HNDTOID関数 (スクリプト関数)
- 引数に指定したハンドル値をIDに変換して返します。IDをハンドル値に変換するにはIDTOHND関数を使います。
- GETSLCTLST関数 (スクリプト関数)
- GETSLCTLST関数は、指定したIDのウィンドウのCOMBOBOX・LISTBOX・ITM_LISTVIEW・ITM_TREEVIEWでの選択項目を取得する関数です。戻値は選択項目をUString型で返します。
- CTRLWIN関数 (スクリプト関数)
- ウィンドウの状態を操作します。ウィンドウを終了、アクティブ化、表示・非表示、最大化・最小化などができます。