【ランダム順出題】Excel VBA ベーシック 模擬試験　問題バンクから40問出題　

クイックアクセスツールバー(QAT)ボタンについて説明した以下の選択肢のうち、正しいものを１つ解答しなさい。

マクロ記録について説明した以下の選択肢のうち、正しいものを１つ解答しなさい。

VBEの起動やマクロの記録のショートカットキーに関する説明として、正しいものを選択肢から1つ解答しなさい。

コレクションについて説明した以下の選択肢のうち、誤っているものを1つ解答しなさい。

次のコードは、1年後の日付をメッセージで表示するマクロである。

空欄に入る適切な語句を選択肢の中から一つ解答しなさい。  

なお実行日はうるう年ではないものとする。  

Sub Exam1()

　Dim A As Integer, B As Integer, C As Integer

A = Year(Now) + 1

　　B = 【　①   】(Now)

　　C = 【　②   】(Now)

　　　MsgBox “1年後は” & A & “年” & B & “月” & C & “日です。”

End Sub  

次のコードはブックへ変更した内容が保存されているかを判断し、メッセージを表示するマクロである。

未保存の場合は3行目の処理を、それ以外の場合は6行目の処理を行います。

空欄に入る適切な語句を、選択肢より1つ解答しなさい。

Sub Exam1()

    If ThisWorkbook.Saved= 【　①   】 Then

        MsgBox “変更が未保存です。保存します。”

        ThisWorkbook.Save

    Else

        MsgBox “変更はありません。保存は不要です。”

    End If

End  Sub

「=」など記号を使用した比較演算子が返す値に関する説明として、正しいものを一つ解答しなさい。

マクロを登録した図等について解説した記述のうち、次の中から正しいものを１つ選択しなさい。

次のコードは1列目をシートの一番下から上に進み、値がある最初のセル内をクリアにするマクロである。

空欄に入る適切な語句を解答しなさい。

Sub Exam1()

　Cells(Rows.【　①   】, 1).End(xlUp).ClearContents

End Sub

VBEのコメントの書式設定について、次のうち誤っているものを選択肢より１つ解答しなさい。

すでに保存がされているアクテイブ状態のブックに対して、次のコードを実行した場合どうなるか。

説明として正しいものを、選択肢から１つ解答しなさい。

*なお保存先に同じ名前のブックはないものとする。

Sub Exam1()

　　ActiveWorkbook.Sheets(1).Range(“A1”) = “VBA”

　ActiveWorkbook.Close SaveChanges:=True, Filename:=”C:\User\Total.xlsx”

End Sub

以下のマクロを実行したときに、最後にアクティブ状態のセルはどれか。選択肢より１つ解答しなさい。

Sub Exam1()

　Range(“A2”).Activate

  Range(“D2:E3”).Select

  　 Selection.Offset(2, 3).Select

End Sub

VBAの演算子に関する説明として、間違っているものを選択肢より一つ解答しなさい。

次のコードはセルA1を含む連続したひとかたまりのセル範囲に、行が何行あるかを調べるマクロである。

選択肢の中から空欄に入る正しいものを１つ解答しなさい。

Sub Exam1()

    Dim N As Integer

   　 N = Range(“A1”).【　①    】.Rows.Count

    MsgBox N

End Sub

複数の変数の宣言方法として正しいものはどれか、選択肢の中から２つ選びなさい。

セル内の値を表す記述として間違っているものを、選択肢から1つ解答しなさい。

以下のマクロの変数Aに０～100までの整数を格納したい。

空欄に入る適当なものを一つ選択肢から解答しなさい。  

Sub Exam1()

　Dim A As 【　①　】

　A = 100

　　MsgBox A

End Sub  

次のコードは現在開いているブックが１つ、ブック上のシートが1枚のみの時に、シート上のセルA1に値を代入するマクロです。

コードの記述として、空欄に入る適切なものを選択肢の中から１つ解答しなさい

Sub Exam1()

　　【　 ① 　】

End Sub

次のコードは、メッセージボックスに「R7.10.23」と表示するマクロである。

空欄に入る値として正しいものを選択肢の中から１つ解答しなさい。

Sub Exam1()

　　 MsgBox Format(Range(“A2”), “【　①   】.m.d”)

End Sub

VBEについて説明した以下の選択肢のうち、正しいものを１つ答えなさい。

次のコードはタイトルを省略した文字入力可能なダイアログボックスを表示し、

ボックス内に初期値「VBA」を文字列として表示し、入力した値をメッセージで表示するマクロである。

空欄に入る適切な語句を選択肢より解答しなさい。

Sub Exam1()

  Dim N As String

    N = InputBox(“何か文字を入力してください。”, 【　①   】【　②  】)

　If N ＝”” Then

　  MsgBox “キャンセルボタンあるいは空欄が入力されました。”

　Else

  　MsgBox “入力値は” & N & ”です。”

　End　If

End Sub

次のマクロの内、メッセージボックスの左から2番目のボタンを押したときの戻り値が、「vbNo」となるコード２つを選択肢より解答しなさい。

以下の選択肢のコードや、条件のときに実行すると「エラー」となるものを選択肢の中から１つ解答しなさい。

VBAでセルを指定する際に使用する用語として、適切ではないものを選択肢から1つ解答しなさい。

次のコードはセル内の文字列を検索し、指定した文字に置き換えてメッセージで表示するコードである。

空欄に入る適切な語句を選択肢より解答しなさい。

Sub Exam1()

    Dim N As String

         N＝【　①   】(Range(“A2”), “America”, “Asia”)  

　　MsgBox N

End Sub

VBEのコメント機能について説明した以下の選択肢のうち、正しいものを１つ解答しなさい。

VBAのオブジェクト式においてメソッドとは以下のどれか、正しいものを選択肢より1つ解答しなさい。

次のマクロを実行した結果、D列に代入される数値の合計として正しいものを、選択肢の中から１つ解答しなさい。

Sub Exam1()

  Dim i As Long

    For i = 2 To 11

        If Cells(i, 1) = “Green” Then Cells(i, 4) = Cells(i, 3) * 3

        If Cells(i, 2) = “warm” Then

　　　　 If Cells(i, 1) = “Brown” Then Cells(i, 4) = Cells(i, 3) /2

　　　　 If Cells(i, 1) = “Yellow” Then Cells(i, 4) = Cells(i, 3) * 2　　 

　　　End If　       

    Next i

End Sub

次のコードは実行するとセルの値が下図の時、戻り値は【　①   】を返し、

変数Nに代入しメッセージで表示します。

空欄に入る適切な語句を選択肢より１つ解答しなさい。

Sub Exam1()

  Dim N As Variant

     N ＝ IsNumeric(Range(“A2”).Value) 

        MsgBox N         

End Sub

変数に日付を格納したい。この時の型指定文字として間違っているものを一つ解答しなさい。

以下のマクロはB列が500より小さい場合、A列からC列までをE列に順にコピーするマクロである。

空欄を埋める適切なものを選択肢から１つ解答しなさい。

Sub Exam1()

   Dim i As Long, A As Long

      For i = 2 To 11

          If Cells(i, 2) < 500 Then

                A = A+ 1

               Range(Cells(i, 1), Cells(i, 3)).Copy 【　①   】

            End If

        Next i

   End Sub

次のコードはA列の各セルに入力されている半角文字列を、すべて全角文字列に変換しB列のセル内に代入するマクロである。

空欄に入る適切な語句を選択肢より解答しなさい。

Sub Exam1()

Dim i As Long

　For i = 2 To 11

　　 Cells(i, 2) = StrConv(Cells(i, 1),【　①    】)

　Next i

End Sub

モジュールとマクロの関係に関する説明として、適切なものを一つ解答しなさい。

オブジェクトとオブジェクトが等しいかを比較する演算子を、以下の選択肢の中から１つ解答しなさい。

以下の選択肢の中で最後までメッセージやウィンドウ等で止まることなく実行できるマクロはどれか。

選択肢の中から2つ解答しなさい。

VBAの行継続文字について、次のうち正しい説明を選択肢より１つ解答しなさい。