Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

52949 / 76732

←次へ　｜　前へ→


	【28608】Re:メニューバーの制限

かみちゃん - 05/9/9(金) 21:42 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>ファイルの上書きのIDは何になるのでしょうか？

ちなみに、以下のコードでいろいろなIDがわかります。

Sub Macro1()
　Dim i As Long
　Dim Cnt1 As Object, Cnt2 As Object
　
　Cells.ClearContents
　i = 2
　For Each Cnt1 In CommandBars("WorkSheet Menu Bar").Controls
　　For Each Cnt2 In Cnt1.Controls
　　　Range("A1:C1").Value = Array("ラベル1", "ラベル2", "ID")
　　　Cells(i, 1) = Cnt1.Caption
　　　Cells(i, 2) = Cnt2.Caption
　　　Cells(i, 3) = CStr(Cnt2.ID)
　　　i = i + 1
　　Next
　Next
End Sub

0 hits

▼

【28600】メニューバーの制限 BOCOTT 05/9/9(金) 20:04