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

関連記事

: メッセージボックスを表示（MsgBox関数）

MsgBox関数【書式】 result = MsgBox ( Prompt [ …

: VBA の演算子（算術演算子）

算術演算子算術演算を行うときに使用する演算子です。 ^（べき乗）、*（積）、/ …

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

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

: RGB 値一覧表（XlRgbColor 列挙型）

RGB 値（XlRgbColor 列挙型）一覧表 RGB 関数を使用して、出力さ …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: VBA で正規表現を使う（RegExp オブジェクト）

RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …

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

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

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

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