エクセル2007上でできているマクロをその都度マクロ記述をしないで
ボタンなどに登録して簡単に実行できる方法はありますか。複数のマクロです。
作成ファイルはその都度変わります。
自作マクロをアドインとして登録する方法があります
http://msdn.microsoft.com/ja-jp/library/cc668205.aspx
例
http://www.asahi-net.or.jp/~ef2o-inue/haifu/sub06_030.html
上記の例を参考にマクロをアドインとして登録して使えるようにした後で、マクロ呼び出しボタンをツールバーへ登録すれば、お望みのものになります
右クリックメニューに追加はどうですか。
Office TANAKA - Excel VBA Tips[右クリックメニューに追加]
(1)全てのファイルで利用出来るように、作成済マクロを
個人マクロブック(personal.xls)に保存しておく。
(2)右クリックメニューに追加する。
(3)どんなファイルであっても右クリックメニューからマクロを呼び出せる。
(参考)
personal.xlsに下記のような表を作成して下記のコードを実行。
Public Sub 右クリック追加() Dim lastRow As Long, n As Long, Menu As String, Act As String '右クリックメニューをリセット CommandBars("cell").Reset '○印の数をカウント lastRow = Cells(Rows.Count, "B").End(xlUp).Row n = WorksheetFunction.CountIf(Range("B4:B" & lastRow), "○") If n = 0 Then MsgBox "右クリックメニューを削除しました" Windows("personal.xls").Visible = False Exit Sub End If For i = lastRow To 5 Step -1 If Range("B" & i).Value = "○" Then Menu = Range("B" & i).Offset(0, 1).Value Act = Range("C" & i).Offset(0, 1).Value With CommandBars("Cell").Controls.Add(before:=1) .Caption = Menu .OnAction = Act End With End If Next i MsgBox "右クリックメニューに追加しました。" Windows("personal.xls").Visible = False SendKeys "+{F10}", True End Sub
ありがとうございます。
参考にさせていただきます。
ありがとうございます。
参考にさせていただきます。