Excel ベーシック 問題 8 – 12

Excel ベーシック 問題 8 – 12

次の図の状態で、「Test1」を実行したとき、表示される文字列を答えなさい。なお、セルA1に入力された文字列の両端には半角のスペースが存在する。

Sub Test1()

    Dim A As Variant

    A = Trim(Range("A1"))

    A = Mid(A, InStr(A, "c") + 1, 3)

    MsgBox A

End Sub

選択肢

1. bcd
2. cde
3. def
4. efg

正解を見る