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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: データ型を調べて、そのデータ型を示す数値を返す（VarType 関数）

VarType 関数の使い方 VarType 関数は、引数に、データ型を調べた …

: オブジェクトの書式をクリアする（ClearFormats メソッド）

ClearFormats メソッド対象となるオブジェクトの書式（スタイル）を初 …

: VBA の演算子（文字連結演算子：& 演算子 + 演算子）

文字連結演算子文字連結演算子は、文字列の連結を行うときに使用する演算子で、「& …

: VBA で正規表現を使う（RegExp オブジェクトのメソッド）

RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

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

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

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

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

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

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

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

: 変数が日付型かどうかをチェックする（ IsDate 関数）

IsDate 関数の使い方【書式】 result = IsDate( expr …

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