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

文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

2015/05/07

Mid 関数・MidB 関数の使い方

【書式】

result_mid = Mid ( string, start, length )

result_midb = MidB ( string, start, length )

引数・戻り値

string ・・・任意の文字列・文字列式を指定します。
start ・・・文字を取得する開始位置（1 以上の整数値）を指定します。
length ・・・取得する文字の長さ（0 以上の整数値）を指定します。（省略可）
result_mid ・・・引数 string の左から start 文字目から length文字分を取得した文字列（文字列型：String）。
result_midb ・・・引数 string の左から start バイト目から lengthバイト分を取得した文字列（文字列型：String）。

引数 string が、Null 値 を含む場合は、Null 値 を返します

引数 length に、0 を指定した場合は、長さ 0 の文字列 (“”) を返します。また、string の文字数以上の値を指定した場合や省略した場合は、string 全体を返します。

Mid 関数・MidB 関数の使用例

サンプルVBAソース

　
Sub Sample_Mid()

    Dim myStr As String
    
    myStr = "Hello! World. こんにちは！"
    
    Debug.Print Mid(myStr, 15, 6)       '左から15文字目から6文字取得
    Debug.Print MidB(myStr, 15, 6)      '左から15バイト目から6バイト取得

    Debug.Print Mid(myStr, 1, 13)       '左から1文字目から13文字取得
    Debug.Print MidB(myStr, 1, 13)      '左から1バイト目から13バイト取得

    Debug.Print Mid(myStr, 1)           '左から1文字目からそれ以降のすべての文字を取得（文字数は省略）
    Debug.Print MidB(myStr, 1)          '左から1バイト目からそれ以降のすべての文字を取得（バイト数は省略）

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

　

Sub Sample_Mid()

Dim myStr As String

myStr = "Hello! World. こんにちは！"

Debug.Print Mid(myStr, 15, 6) '左から15文字目から6文字取得

Debug.Print MidB(myStr, 15, 6) '左から15バイト目から6バイト取得

Debug.Print Mid(myStr, 1, 13) '左から1文字目から13文字取得

Debug.Print MidB(myStr, 1, 13) '左から1バイト目から13バイト取得

Debug.Print Mid(myStr, 1) '左から1文字目からそれ以降のすべての文字を取得（文字数は省略）

Debug.Print MidB(myStr, 1) '左から1バイト目からそれ以降のすべての文字を取得（バイト数は省略）

End Sub

　

実行結果

- VBA基本 Mid 関数, MidB 関数, VBA基本, エクセルVBA, 文字取得

Tweet

Message コメントをキャンセル

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

関連記事

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

: 書式を変換（Format 関数）

Format 関数の使い方【書式】 result = Format ( exp …

: 式の値に応じて多分岐を行う（Switch 関数）

Switch 関数の使い方 Switch 関数は、「式・値」を対にして指定して …

: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）

フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

IsMissing 関数の使い方【書式】 result = IsMissing …

: Split 関数（文字列型の一次配列を作成）

Split 関数の使い方【書式】 myArray = Split ( expr …

: ユーザー設定リストを使って並べ替える（Sort）

VBAでリスト、テーブルを並べ替える（Sort） VBAで、ソートを行うには、S …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）

現在の日付・時刻を取得・設定現在の日付・時刻を取得（Now 関数、Date 関 …

PREV: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）
NEXT: 文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）