2017-04-13から1日間の記事一覧
次のような感じみたい Sub AddClickMenu() With CommandBars("Cell").Controls.Add(Before:=1) .Caption = "値と数値の書式を貼り付け" .OnAction = "PasteValAndForm" End With End Sub Sub DelClickMenu() CommandBars("Cell").Controls("値と数値の書式を…
次のような感じみたい Sub AddClickMenu() With CommandBars("Cell").Controls.Add(Before:=1) .Caption = "値と数値の書式を貼り付け" .OnAction = "PasteValAndForm" End With End Sub Sub DelClickMenu() CommandBars("Cell").Controls("値と数値の書式を…