目次

目的

  • VBA の「&」の意味を知りたい。
  • 用途の例を見たい。

知っている範囲で書いてみました。

目次まで戻る

1. 文字を連結している

VBA では、アンドの記号で文字を連結できるようです。

Sub アンドの記号で文字連結()
MsgBox "A" & "B" '結果=AB
End Sub
VBA の & アンドの記号の用途。文字を連結する。
VBA の & アンドの記号の用途。文字を連結する。

目次まで戻る

2. 変数の型宣言文字

VBA には「型宣言文字」というものがあるらしく、変数「a」を長整数型で宣言する時に、「as long」と記述するところを「a&」と書く事が出来るようです。長整数型の型宣言文字は「&」のようです。

Sub アンドを型宣言文字として使用()
  Dim a&
MsgBox TypeName(a) '結果=Long
MsgBox VarType(a) '結果=3 '戻り値 3 は長整数型
End Sub
typename 関数で出力した結果です。
typename 関数で出力した結果です。
vartype 関数で出力した結果です。
vartype 関数で出力した結果です。

目次まで戻る

3. 十六進数の数字

VBA で十六進数の数字を入力する時、「&H」の後に十六進数の数字を続けて書くようです。 VBA では「&H」ですが、他のプログラミング言語では「&H」ではなく、違う入力方法になるようです。

Sub アンドで十六進数の数字を入力()
MsgBox Hex(15) '結果=F
MsgBox &HF '結果=15 '&H と十六進数の数字 F を続けて記述する
End Sub
十進数の 15 を十六進数の数字に変換した結果です。
十進数の 15 を十六進数の数字に変換した結果です。
十六進数の F を十進数の数字に変換した結果です。
十六進数の F を十進数の数字に変換した結果です。
十進数 十六進数
0 0
1 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 A
11 B
12 C
13 D
14 E
15 F
16 10
17 11
18 12
19 13
20 14
21 15
22 16
23 17
24 18
25 19
26 1A
27 1B
28 1C
29 1D
30 1E
31 1F
32 20
... ...
255 FF

目次まで戻る

アンパサンド

「Windows10 > Windows アクセサリ > 文字コード表アプリ」で「&」を調べて見ると「ampersand」と表示されていました。

文字コード表アプリで「&」をクリック。
文字コード表アプリで「&」をクリック。

テスト環境

  • Windows 10(64 ビット)
  • Microsoft Office Excel 2003

以上、閲覧ありがとうございました。

 

目次まで戻る

前後の投稿