RefEdit
RefEditは、ワークシート上のセル範囲を取得することができるものです。
RefEditの値(セルの範囲のアドレス)は
オブジェクト.Value
取得したセル範囲の文字の色を変更してみます。
RefEditをユーザーフォームに配置します。オブジェクト名:RefEdit1
もう一つコマンドボタン(オブジェクト名:CommandButton1、Caption:変更)
取得したセル範囲の文字を赤(ColorIndex = 3)に変更するようにします。
Private Sub CommandButton1_Click()
If RefEdit1.Value <> "" Then
Range(RefEdit1.Value).Font.ColorIndex = 3
End If
End Sub
これを実行してみる。
セル範囲を選択して
コマンドボタンをクリックすると、選択した範囲の文字が赤になりました。
2007年9月