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

関数の引数について説明した以下の選択肢のうち、正しいものを1つ解答しなさい。

論理演算子の説明として誤っているものを、選択肢の中から一つ解答しなさい。

B列の値が「Europe」である行のA列からD列までのセルの値を斜体にするマクロとして、

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

Sub Exam1()

  Dim i As Long

    For i = 2 To 11

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

       　【　①   】(Cells(i, 1), Cells(i, 1).End(xlToRight)).Font.Italic = True

        End If

    Next i

End Sub

変数や定数のコードとして、使用できるものを以下の選択肢の中から1つ解答しなさい。

次のマクロを実行したときの結果を説明した選択肢の中から、 説明が正しいものを１つ解答しなさい。

Option Explicit

　Public Const A As String = ”Excel”

　Const B As String = ”Word”

Sub Exam1()

　Const C As String = ”PowerPoint”

　　MsgBox( A & B & C ）

　Call Exam2

End Sub

Sub Exam2()

　MsgBox( A & B & C ）

End Sub

次のコードはセルA1の値とセルD1の値が等しくないとき”等しくありません”と表示するマクロである。

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

Sub Exam1()

　　If Range(“A1”).Value 【　①　】 Range(“D1”).Value Then MsgBox “等しくありません”

End Sub

次のマクロを実行したときに、セル内に表示される結果を次の選択肢から１つ解答しなさい。

Sub Exam1()

　Range(“A1”) = (9 ^ 3) + (11 Mod 2)

End Sub

グラフ描画するシートを選択することができるコードはどれか。

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

Sub Exam1()

　【　 ① 　】

End Sub

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

次のコードは実行したとき、文字が太字になる行は合計【　①    】行である。

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

Sub Exam1()

    Dim i As Long

    For i = 2 To 13

 If Cells(i, 2)

 　Cells(i, 1).Resize(, 4).Font.Bold = True

 　End If

    Next i

End Sub

プロシージャの実行方法に関する説明として、正しいものを選択肢より一つ解答しなさい。

次のコードは、実行するとセルB2にセルA2を参照した結果、「14」が代入されるマクロである。

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

Sub Exam1()

　Range(“B2”) = 【　①   】(Range(“A2”))

End Sub

マクロ記録の説明のうち、適切なものを選択肢から２つ解答しなさい。

以下のコードは表のデータ部分のみを別のシートにコピーするマクロである。

適切な選択肢を2つ解答しなさい。

次のマクロを実行したとき、メッセージボックスに表示されるメッセージとして、正しいものを次の選択肢の中から１つ選択しなさい

Sub Exam1()

    MsgBox Replace(Range(”A2”), “a”, “”）

End Sub

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

図形等へのマクロ登録に関しての説明として正しいものを、以下の選択肢の中から一つ解答しなさい。

変数の初期化について、正しい説明を選択肢より1つ選択しなさい。

変数の有効期間と値の保持に関する説明として、正しいものを1つ選択しなさい。

次のコードは、メッセージボックスに値を表示するマクロである。

表示される値として正しいものを選択肢の中から１つ解答しなさい。

Sub Exam1()

  MsgBox Format(“139765″,”#,###,###”)

End Sub

次のコードは、ブックに下図のようにシートが複数枚あるときに実行するマクロである。
実行結果を選択肢の中から1つ解答しなさい。

Sub Exam1()

　Sheets(“Sheet2”).Visible = False

　 Sheets(“Sheet2”).Select

End Sub

以下の選択肢の中でステートメントであるものは●何個分あるか、

次の選択肢の中から正しいものを１つ解答しなさい。  

●　Option Explicit

●　Sub プロシージャ名()、 End Sub

●　Dim 変数名 As 変数の型

●　For 変数名 = 開始値 To 終了値、 Next 変数名

●　If　条件  Then、　End If

●　Call プロシージャ名

●　Range(”A1”) = “VBA”    

次のコードは、シート名「sheet2」のセル内に文字列を代入するマクロである。

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

Sub Exam1()

　Sheets(【　①   】).Range(“A1”).Value = “ABC”

End Sub  

次のコードは、メッセージボックスに値を表示するマクロである。

表示される値として正しいものを選択肢の中から１つ解答しなさい。

Sub Exam1()

  MsgBox Format(“139765″,”0000000”)

End Sub

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

次のコードは、定数Nに文字列”VBA”を定めるマクロである。

空欄に入る適切な語句の組み合わせとして正しいものを選択肢から1つ選びなさい。

Sub Exam1()

　【　①   】N【　②   】 ”VBA”

　　MsgBox N

End Sub

次のコードは、セルA2の値が「North America」あるいは「South America」の時は、

セルC2に「America」が入力され、それ以外の場合には「ー」が入力されるマクロである。

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

Sub Exam1()

　If Range(“A2”).Value = “North America” Or Range(“A2”).Value = “South America” 【　①    】　
　
　　Range(“C2”).Value = “America”

 　【    ②   】

 　 Range(“C2”).Value = “ー”

    End If

End Sub

次のコードを実行したとき、メッセージボックスに表示される変数Aの値はどれか。

選択肢の中から正しいものを１つ解答しなさい。

Sub Exam1()

　Dim i As Long, A As String

　　For i = 1 To 3

　　　　A = A & “&” & “VBA”

　　Next i

　　MsgBox A

End Sub

次のコードを実行した結果エラーとなるものを、選択肢の中から１つ選びなさい。  

次のコードはセルに入力されている大文字を、すべて小文字に変換し文字列を代入するマクロである。

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

Sub Exam1()

　Range(”A1”) = StrConv(Range(”A1”),【　①   】)

End Sub

Cells(3, 5) の説明として正しいものを以下の選択肢から1つ選びなさい。

次のVBA全般の説明のうち、間違っているものを1つ解答しなさい。

下図のようにシートが並んでいる状態で、シート名「Sheet3」を一番左端に移動するコードして以下の空欄に入る適切なものを選択肢から1つ回答しなさい。

Sub Exam1()

　　【　 ① 　】

End Sub

選択されている複数のセルの中で文字入力可能な、１つのセルにのみ値を入力するマクロとして、正しいものを１つ選択肢から選びなさい。

Valueプロパティについての記述として、適切ではないものを選択肢から１つ解答しなさい。  

VBAのオブジェクト式の「プロパティ」について、誤っている説明を選択肢から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  

次のマクロを実行したとき、セルA1に表示される値はどれか正しいものを選択肢から一つ解答しなさい。

Sub Exam1()

　Range(“A1”) = (10 ¥ 4) – (6 * 2)

End Sub

Single型の変数に格納できる最も適切なデータの種類を、選択肢より1つ解答しなさい。

以下の文書は、VBAの要素であるオブジェクト式について説明したものである。

正しいものを選択肢から１つ解答しなさい。