Left関数は文字列の先頭から指定文字数分だけを抜き出す場合に使用します。Left関係の関数にはLeft関数とLeftB関数の2種類があります。それぞれについて以下で説明をします。
【目次】
構文
記述方法は、以下の通りとなります。
(1)Left関数の記述方法
=======================================================================
Left([文字列],[桁数])
=======================================================================
[説明]:
[文字列]には抜き出す対象文字を記述します。[桁数]には先頭から抜き出す桁を記述します。内容を纏めると、「[文字列]に記述された文字を、先頭から[桁数]に指定した桁で抜き出します。」との意味になります。
[記述例]:
Left("おはようございます。", 4)
(2)LeftB関数の記述方法
=======================================================================
LeftB([文字列],[バイト数])
=======================================================================
[説明]:
[文字列]には抜き出す対象文字を記述します。[バイト数]には先頭から抜き出すバイト数を記述します。内容を纏めると、「[文字列]に記述された文字を、先頭から[バイト数]に指定したバイト数で抜き出します。」との意味になります。
[記述例]:
LeftB("おはようございます。", 2)
使い方
使い方について、具体的に説明していきます。
Left関数の使い方
Left関数の使い方について説明します。
-------------------------------------------------------------------------------------------------------------
(1)基本的な使い方
基本的な使い方について説明します。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
MsgBox Left("おはようございます。", 4)
End Sub
-------------------------------------------------
内容は、「”おはようございます。”の文字列で、先頭から4桁の文字を抽出し、MsgBoxで表示して下さい。」との意味になります。
[実行例]:
-------------------------------------------------------------------------------------------------------------
(2)ループ処理と組み合わせた使い方
以下画面の内容を元に、For~Next文と組み合わせた使い方について説明します。
[画面]:
※<実行>ボタンには、以下の記述例サンプルプロシージャが登録されています。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
'↓処理①
Dim 行 As Double
'↓処理②
For 行 = 2 To 4
Range("B" & 行) = Left(Range("A" & 行), 4)
Next
End Sub
-------------------------------------------------
処理の流れは以下の通りとなります。
[処理①]:変数の定義
Dimによる変数の定義となります。
[処理②]:For~Next文の記述
For~Next文による繰り返し処理です。[処理①]で指定した変数:行に2から4の値を順次セットし、処理を3回実行します。1回目の処理では行に2がセットされ、A2セルに入力されている文字列の先頭から4文字を抽出しB2セルにセットします。2回目の処理では行に3がセットされ、A3セルに入力されている文字列の先頭から4文字を抽出しB3セルにセットします。3回目の処理では行に4がセットされ、A4セルに入力されている文字列の先頭から4文字を抽出しB4セルにセットします。
[実行例]:
-------------------------------------------------------------------------------------------------------------
Left関数の使い方についての説明は以上です。
LeftB関数の使い方
LeftB関数の使い方について説明します。
-------------------------------------------------------------------------------------------------------------
(1)基本的な使い方
基本的な使い方について説明します。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
MsgBox LeftB("おはようございます。", 2)
End Sub
-------------------------------------------------
内容は、「”おはようございます。”の文字列で、先頭から2バイトの文字を抽出し、MsgBoxで表示して下さい。」との意味になります。
[実行例]:
-------------------------------------------------------------------------------------------------------------
(2)ループ処理と組み合わせた使い方
以下画面の内容を元に、For~Next文と組み合わせた使い方について説明します。
[画面]:
※<実行>ボタンには、以下の記述例サンプルプロシージャが登録されています。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
'↓処理①
Dim 行 As Double
'↓処理②
For 行 = 2 To 4
Range("B" & 行) = LeftB(Range("A" & 行), 2)
Next
End Sub
-------------------------------------------------
処理の流れは以下の通りとなります。
[処理①]:変数の定義
Dimによる変数の定義となります。
[処理②]:For~Next文の記述
For~Next文による繰り返し処理です。[処理①]で指定した変数:行に2から4の値を順次セットし、処理を3回実行します。1回目の処理では行に2がセットされ、A2セルに入力されている文字列の先頭から2バイトを抽出しB2セルにセットします。2回目の処理では行に3がセットされ、A3セルに入力されている文字列の先頭から2バイトを抽出しB3セルにセットします。3回目の処理では行に4がセットされ、A4セルに入力されている文字列の先頭から2バイトを抽出しB4セルにセットします。
[実行例]:
-------------------------------------------------------------------------------------------------------------
LeftB関数の使い方についての説明は以上です。
おわりに
今回はLeft関数について説明をしました。類似の関数にはRight関数やMid関数、Instr関数もありますので、合わせて覚えて下さい。