この記事でExcelでアドインを作る方法を書きました。これは自分でマクロを記録して作る方法でした。すでにコードとして公開されているものをアドイン化する場合の手順を書いておきます。
Sub test002() ' ' test002 Macro ' 試しにセルの色を変えてみるやつ ' ' Range("B2:F9").Select With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 65535 .TintAndShade = 0 .PatternTintAndShade = 0 End With Range("B1").Select End Sub
↑このコードをアドイン化してみます。
複数のセルを黄色くしてカーソルをB1に持ってくるだけの単純なものです。
(以前作成したコードを少しだけ修正。)
コメント