ページ

2014年7月17日木曜日

ラベル-ActiveXコントロールの使用方法

Word2013のActiveXコントロール ラベルの使用方法サンプルです。

ラベルの[開発]-[挿入]-[ラベル(ActiveXコントロール)]をクリックします。
[ラベル(ActiveXコントロール)]をクリック
シートをドラッグしラベルを配置します。
リボンの[コードの表示]をクリックします。
リボンの[コードの表示]をクリック
ここでは、Workbookが開いた時に発生するOpenイベント内にラベルを設定するコードを入力します。

Private Sub Workbook_Open()
    Sheet1.Label1.Caption = "エクセル ラベル"
    Sheet1.Label1.Font.Size = 12
    Sheet1.Label1.ForeColor = vbRed
    Sheet1.Label1.BackColor = vbYellow
    Sheet1.Label1.TextAlign = fmTextAlignCenter
End Sub
  • Captionで表示する文字を設定します。
  • FontSizeで文字サイズを設定します。
  • ForeColorで文字色を設定します。
  • BackColorで背景色を設定します。
  • TextAlignで水平文字位置を設定します。
 Openイベント内にラベルを設定するコードを入力
マクロ有効ブックで保存し、再度開くとOpenイベントが発生し、上のコードがラベルに反映されます。
コードがラベルに反映