Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

文字に下線を設定する（Underline プロパティ）

2015/07/29 2015/08/26

下線を設定（Underline プロパティ）

Underline プロパティは、文字に下線を設定します。設定には、XlUnderlineStyle 列挙型の定数を使用します。値の取得および設定が可能です。

【書式】

＜取得＞
object.Underline

＜設定＞
object.Underline = const

引数・戻り値

object ・・・対象となる Font オブジェクトを指定します。

const ・・・下線の種類を表すXlUnderlineStyle 列挙型の定数を指定します。

定数	値	内容
xlUnderlineStyleNone	-4142	下線なし
xlUnderlineStyleSingle	2	一重下線
xlUnderlineStyleDouble	-4119	二重下線
xlUnderlineStyleSingleAccounting	4	一重下線（会計）
xlUnderlineStyleDoubleAccounting	5	二重下線（会計）

下線を設定（Underline プロパティ）使用例

サンプルVBAソース

　
Sub Sample_Font06()

    Range("B3:F3").Value = "aaa"
    
    '一重下線
    Range("B3").Font.Underline = xlUnderlineStyleSingle
    
    '二重下線
    Range("C3").Font.Underline = xlUnderlineStyleDouble
    
    '一重下線（会計）
    Range("D3").Font.Underline = xlUnderlineStyleSingleAccounting
    
    '二重下線（会計）
    Range("E3").Font.Underline = xlUnderlineStyleDoubleAccounting
    
    '下線なし
    Range("F3").Font.Underline = xlUnderlineStyleNone
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

　

Sub Sample_Font06()

Range("B3:F3").Value = "aaa"

'一重下線

Range("B3").Font.Underline = xlUnderlineStyleSingle

'二重下線

Range("C3").Font.Underline = xlUnderlineStyleDouble

'一重下線（会計）

Range("D3").Font.Underline = xlUnderlineStyleSingleAccounting

'二重下線（会計）

Range("E3").Font.Underline = xlUnderlineStyleDoubleAccounting

'下線なし

Range("F3").Font.Underline = xlUnderlineStyleNone

End Sub

　

実行結果

- VBA基本 Font オブジェクト, Underline プロパティ, VBA基本, XlUnderlineStyle 列挙型, エクセルVBA, 下線

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 引数の整数部分を取得する（Fix 関数・Int 関数）

Fix 関数・Int 関数の使い方【書式】 number_fix = Fix …

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

: Erase ステートメント（配列の初期化・動的配列のメモリ解放）

Erase ステートメントの使い方【書式】 Erase myArray [, …

: 変数が配列かどうかをチェックする（ IsArray 関数）

IsArray 関数の使い方【書式】 result = IsArray( va …

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

: フォント名（Name,ThemeFont,StandardFont）

フォント名を取得・設定する（Name プロパティ） Name プロパティは、オブ …

: Join 関数（配列の要素を結合）

Join 関数 1次元配列の各要素を指定した区切り文字で連結します。【書式】 …

: 文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）

LCase 関数・UCase 関数の使い方【書式】＜アルファベットの大文字 …

: VBA で正規表現を使う（RegExp オブジェクトのプロパティ）

RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …

: 色の設定（Color プロパティ・RGB 関数）

Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …

PREV: 上付き文字・下付き文字（Superscript,Subscript）
NEXT: XlThemeColor 列挙型