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

関連記事

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

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

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

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

: コレクション（Collection）オブジェクト「連想配列」

コレクション（Collection）オブジェクトの使い方【書式】 Dim my …

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

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

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

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

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

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

: 文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）

RSet ステートメント・LSet ステートメント【書式】＜ RSet ステ …

: VBA で正規表現を使う（RegExp オブジェクトのプロパティ）

RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …

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

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

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

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

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