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

関連記事

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

Replace 関数の使い方【書式】 result = Replace ( s …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

: ショートカットメニュー（CommandBar オブジェクト）

ショートカットメニュー（コンテキストメニュー）右クリックで表示されるメニューの …

: 変数がEmpty 値かどうかをチェックする（ IsEmpty 関数）

IsEmpty 関数の使い方【書式】 result = IsEmpty ( e …

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

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

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

: テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）

Stream オブジェクト ADO（ActiveX Database Objec …

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

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

: データ型を調べてそのデータ型を示す文字列を返す（TypeName 関数）

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

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