教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA 関数】Left関数の使い方を教えて!

構文

構文は以下の通りです。

Left(文字列, 文字数)

解説

Left関数は、指定した文字列の左側から指定した文字数だけを取得するために使用します。

引数 指定 内容
文字列 必須 処理したい文字列を指定します。引用符(")で囲む必要があります。
文字数 必須 左側から取得したい文字数を指定します。

使用例

Left("Excel VBA", 5)

使い方

具体的な使い方を紹介します。

Sub LeftExample()
    Dim str As String
    Dim result As String
    ' 対象の文字列を設定
    str = "Excel VBA"
    ' Left関数を使って左側の文字列を取得
    result = Left(str, 5)
    ' 結果を表示
    MsgBox result
End Sub

この例では、変数strに文字列"Excel VBA"を設定し、Left関数を使って最初の5文字を取得しています。その結果、"Excel"という文字列が表示されます。

プログラミング例

以下に、プログラミング例を紹介します。

Sub ExtractText()
    Dim rng As Range
    Dim cell As Range
    Dim result As String
    Set rng = Range("A1:A5") ' テキストが入っているセルの範囲を指定
    For Each cell In rng
        result = Left(cell.Value, 10) ' セルの値から左側の10文字を取得
        cell.Offset(0, 1).Value = result ' 結果を隣の列に書き込む
    Next cell
End Sub

上記の例では、セルの範囲(A1:A5)に入力されたテキストから左側の10文字を抽出し、隣の列に結果を書き込んでいます。実行すると、元のテキストが保持されたまま、隣の列に抽出した文字列が表示されます。

まとめ

Left関数は、指定した文字列の左側から指定した文字数を取得するために使用されます。文字列の抽出や処理において特に役立ちます。是非活用してください。