Excel でアンケートを作成する方法 (2 つの簡単な方法)

この記事では、Excel でアンケートを作成する方法を学習します。 .質問票は、一連の質問またはオプション付きの特定の項目です。回答者から情報を収集するために使用されます。 Excel では、ユーザーはいくつかの簡単な手順に従ってアンケートを作成できます。今日は 2 のデモンストレーションを行います 簡単な方法。これらの方法を使用すると、Excel でアンケートを簡単に作成できます。それでは、これ以上遅滞なく、議論を始めましょう。

ここから練習用ワークブックをダウンロードできます。

Excel でアンケートを作成する 2 つの簡単な方法

Excel でアンケートを作成するには、2 つの方法があります。最初の方法では、アンケートを手動で作成します。ここでは、質問のキーワードを列のヘッダーとして挿入する必要があります。簡単な手順でメソッド全体を示します。

2 番目の方法では、 VBA を使用します。 Excelでアンケートを作成します。アンケートの概要は次のとおりです。

1. Excel でアンケートを手動で作成する

最初の方法では、Excel でアンケートをゼロから作成します。この場合、名前を尋ねます 、ID 、部署 会社の一部の従業員の。また、休暇が必要かどうかも尋ねます。 ことし。ここでは、質問全体を挿入することはできません。したがって、その質問のキーワードが必要です。そして、それを列のヘッダーとして使用します。以下の手順では、簡単な手順で手順を示しています。それでは、以下の手順に注意して方法を学びましょう。

STEP 1:質問のキーワードを挿入する

• まず、質問のキーワードを特定し、下の図のようにヘッダーとして配置する必要があります。
• たとえば、「あなたの名前は何ですか?」と尋ねたいとします。 最初に、最初の列のヘッダーは「名前」になります。
• 2 番目の質問は。 「あなたの ID 番号は? 」なので、ここでキーワードは ID になります .
• 3 番目の質問は、部署について従業員に尋ねます。 ですので、列 D にあります .
• そして最後に、従業員が今年休暇を必要としているかどうかを知る必要があります。 はい で答えてほしい または いいえ . 列 E のヘッダー 「休暇が必要 (Y/N)」と書かれている
• このように、すべての質問のキーワードを見つけて、1 つずつヘッダーとして使用する必要があります。

ステップ 2:キーワードを使用して表を作成する

• 2 番目のステップでは、テーブルを作成します。
• これを行うには、ヘッダーを選択します。
• 次に Ctrl を押します + T .
• メッセージ ボックスが表示されます。
• 「私のテーブルにはヘッダーがあります」にチェックを入れます
• [OK] をクリックします 続行します。

• その結果、下のスクリーンショットのような表が表示されます。

ステップ 3:アンケート用の新しいタブを作成する

• 3 番目に、アンケート用の新しいタブを作成する必要があります。
• そのためには、最初にテーブルのヘッダーを選択してください。

• その後、[ファイル] をクリックします。 タブ

• 次に、オプションを選択します . Excel のオプションが開きます ウィンドウ。

• Excel のオプション ウィンドウで リボンのカスタマイズ を選択します 次に、[新しいタブ] を選択します .

• その後、右クリック 新しいグループ [名前の変更] を選択します メニューから。

• 名前の変更 ボックスが表示されます。
• 表示名を入力してください [OK ] をクリックします。 続行します。
• ここで、新しいグループ アンケート 1 の名前を変更しました .

• 次のステップで、[リボンにないコマンド] を選択します。 」の「コマンドの選択」 」ボックス。
• 次に、フォームを選択します [追加] をクリックします。 オプション

• 上記の手順に従うと、フォームが表示されます アンケートの下 新しいタブ内のグループ .
• [OK] をクリックします 前進する。

ステップ 4:フォームを開いてデータを入力

• このステップでは、 新しいタブ に移動します フォームを選択 .

• その結果、ヘッダーのタグが付いた画像のようなフォームが表示されます。
• ここに、回答者は自分の名前を挿入する必要があります 、ID 、部署 、および 休暇の必要性 1 つずつ。

STEP 5:アンケートのデータを入力

• 5 番目のステップでは、回答者は尋ねられた質問に対する回答を挿入する必要があります。
• たとえば、従業員 John 彼の情報を挿入しました。
• この情報をワークシートに入力するには、[新規] をクリックします。 オプション

• その結果、情報がワークシートで利用可能になり、フォームは別の回答を受け取る準備が整います。
• この場合、従業員 Paul データを入力し、New をクリックします。 オプションをもう一度。

• その結果、Excel ワークシートに情報が表示されます。

• さらにデータを入力するには、上記の手順に従って、[新規] をクリックします。 .

最終出力

• 最終的に、記録されたデータがワークシートに取得され、同じ手順を使用してさらにデータを入力できます。

2. Excel VBA を適用してアンケートを作成する

2 番目の方法では、 VBA を適用します。 Excelでアンケートを作成します。 VBA Visual Basic for Applications の略 . VBA の使用 、さまざまなタスクを簡単に実装できます。ここでは、回答者にいくつかの質問をします。回答者はいくつかのオプションを使用して回答する必要があります。オプションはわからない 、同意 、同意しない 、そしてたぶん .次の手順に従って、 VBA を使用してアンケートを作成する方法を見てみましょう。

手順:

• まず 開発者 に移動します タブをクリックして Visual Basic を選択します . Visual Basic が開きます ウィンドウ。
• または、Alt キーを押すこともできます + F11

• Visual Basic の場合 ウィンドウで、挿入>> モジュールを選択します . モジュールが開きます ウィンドウ。

• では、以下のコードをコピーして モジュール に貼り付けてください ウィンドウ:

Option Explicit
Sub Create_Questionnaire()
Dim GrupBx As GroupBox
Dim OptnBtn As OptionButton
Dim iMxBtns As Long
Dim icell As Range
Dim iRng As Range
Dim iWks As Worksheet
Dim xCtr As Long
Dim xFrstOptnBtnCel As Range
Dim xNumOfQ As Long
Dim iBorder As Variant
iBorder = Array(xlEdgeLeft, xlEdgeTop, xlEdgeBottom, _
        xlEdgeRight, xlInsideVertical, xlInsideHorizontal)
iMxBtns = 4
xNumOfQ = InputBox("Set the numbers of questions", "Questions", 8)
Set iWks = ActiveSheet
With iWks
Set xFrstOptnBtnCel = .Range("E2")
.Range("A:D").Clear
With xFrstOptnBtnCel.Offset(-1, -1).Resize(1, iMxBtns + 1)
    .Value = Array("Questions", "Option1", "Option2", _
                    "Option3", "Option4")
    .Orientation = 90
    .HorizontalAlignment = xlCenter
End With
Set iRng = xFrstOptnBtnCel.Resize(xNumOfQ, 1)
With iRng.Offset(0, -1)
    .Formula = "=ROW()-" & iRng.Row - 1
    .Value = .Value
End With
iRng.Offset(0, -3).Value = 1
With iRng.Offset(0, -4)
    .FormulaR1C1 = "=IF(RC[2]="""","""",IF(RC[2]=6,""N/A"",RC[1]*(RC[2]-1)))"
End With
.Range("A1").Formula = "=SUM(A2:A" & xNumOfQ + 1 & ")"
With iRng.Offset(0, -4).Resize(, 4)
    For xCtr = LBound(iBorder) To UBound(iBorder)
    With .Borders(iBorder(xCtr))
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    Next xCtr
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With
iRng.EntireRow.RowHeight = 20
iRng.Resize(, iMxBtns).EntireColumn.ColumnWidth = 9
.GroupBoxes.Delete
.OptionButtons.Delete
End With
For Each icell In iRng
With icell.Resize(1, iMxBtns)
    Set GrupBx = iWks.GroupBoxes.Add _
        (Top:=.Top, Left:=.Left, Height:=.Height, _
        Width:=.Width)
    With GrupBx
    .Caption = ""
    .Visible = True
    End With
End With
    For xCtr = 0 To iMxBtns - 1
      With icell.Offset(0, xCtr)
        Set OptnBtn = iWks.OptionButtons.Add _
              (Top:=.Top, Left:=.Left, Height:=.Height, _
               Width:=.Width)
        OptnBtn.Caption = ""
        If xCtr = 0 Then
          With icell.Offset(0, -2)
            OptnBtn.LinkedCell = .Address(external:=True)
          End With
        End If
      End With
    Next xCtr
  Next icell
End Sub

• Ctrl を押します + S コードを保存します。
• 次のステップで、開発者に移動します マクロを選択します . マクロが開きます ウィンドウ。

• その後、マクロで目的のコードを選択します ウィンドウと実行

• その結果、メッセージが表示され、質問の数を設定するよう求められます。
• ここで、5 に質問します。 回答者への質問。 5 と入力しました .
• [OK] をクリックします 続行します。

• すぐに、ワークシートに写真のような結果が表示されます。
• ここに 列 D があります 質問とE列用です 、F 、G 、および H はオプションです。

• ここで、好みに合わせてアンケートをフォーマットし、質問を挿入する必要があります。
• たとえば、3 つの行と 1 つの列を挿入しました。 範囲 B4:I9 アンケートが含まれています。
• C 列も非表示にしました &D .
• また、断定的な形式で質問を挿入しました。
• 4 あります 各質問に対する回答と、回答は 0 からの値を保持します 3まで .
• はい、わかりません 0 の値を持っています 、同意する 1 あります 、同意しない 2 あります 、そして おそらく 3 あります .
• 便宜上、回答者の回答を示しています。
• ここでは、セル B4 範囲 B5:B9 の合計を保存します .

結論

この記事では、 2 について説明しました Excel でアンケートを作成する簡単な方法 .この記事があなたのタスクを効率的に実行するのに役立つことを願っています.さらに、記事の冒頭に練習帳も追加しました。スキルをテストするために、ダウンロードしてエクササイズできます。また、ExcelDemy ウェブサイトにアクセスすることもできます このような他の記事については。最後に、提案や質問がある場合は、下のコメント セクションでお気軽にお尋ねください。