PR

【GAS】Googleフォームに掲示板と返信メールを追加して署名活動フォームを作る

Google Workspace

googleフォームに掲示板と返信メールの機能をGASとスプレッドシートの関数を使って、次のような署名活動フォームを作ってみました。

署名者数の合計や達成状況などをフォームに掲示します。
また、署名に対しての返信メールに達成状況などを掲載します。

このようなフォームを作っていきます。
次の2つの記事からの続きにもなります。

GASで組んだ関数updateBbsdiyReplyを今回は使います。

updateBbs
diyReply
スポンサーリンク

応用例その9

フォーム

次のような掲示板(タイトルと説明)のあるフォームを作ります。

タイトル:ここでは、目標

スプレッドシート

フォームとリンクしたスプレッドシートを作ります。

フォームとリンクしたスプレッドシートに、次の2枚のシート(ここでは、シート1とシート2)を追加します。

シート1はGAS(updateBbs)で使うシートです。掲示板に表示したい内容を記します
必ず、タイトル(目標)をセルB1に入れてください。
COUNTA関数で回答数(賛同者数)を数えています。
※数式で表示([Ctrl]+@)しています。

シート1

シート2はGAS(diyReply)で使うシートです。返信メールに掲載したい内容を記します
※数式で表示([Ctrl]+@)しています。

シート2

コピペ用のシートの内容です。

フォームの回答
タイムスタンプお名前住所メールアドレス
シート1
タイトル目標
掲示内容="ただいまの賛同者数:"&COUNTA('フォームの回答'!A:A)-1&" 目標の達成率:"&TEXT((COUNTA('フォームの回答'!A:A)-1)/100,"0%")
シート2
質問タイムスタンプお名前住所メールアドレス
最新の回答
OFF:
メールを送らない
件名ご署名をありがとうございます
本文=C2&" 様、 現在、【"&(COUNTA('フォームの回答'!A:A)-1)&"名】の方に賛同をいただけました。 ありがとうございます。"
TO:=E2
CC:(省略可)
BCC:(省略可)
NAME:(省略可)
REPLY TO:(省略可)

GAS

3つのGAS、updateBbsdiyReply、そしてmyFunctionをフォームのスクリプトエディタへ登録します。

次のGASをスクリプトエディタにコピペします。

  1. function updateBbs(SheetNo){
  2.   //アクティブフォーム
  3.   const form = FormApp.getActiveForm();
  4.   //選択肢シート:SheetNoは必要なら変更する(一番左のシートが0、2番目が1、3番目が2、、、)
  5.   if(!(SheetNo>1)) SheetNo = 1;
  6.   const msgSheet = SpreadsheetApp.openById(form.getDestinationId()).getSheets()[SheetNo];
  7.   //シートの質問、説明などを配列で取得する
  8.   const question = msgSheet.getRange("B1").getDisplayValue();
  9.   const message = msgSheet.getRange("B2").getDisplayValue();
  10.   //フォームの質問、説明などの取得
  11.   const items = form.getItems();
  12.   for (let i = 0; i < items.length; i++) {
  13.     //対象の質問を探して見つけたら説明を更新
  14.     if (items[i].getTitle() === question) {
  15.       items[i].asSectionHeaderItem().setHelpText(message);
  16.       break;
  17.     }
  18.   }
  19. } //Ver1.1.0 for maintenance
  20. //
  21. function diyReply(SheetNo) {
  22.   // 引数SheetNo:設定用シートのタブの位置(一番左のシートが0、2番目が1、3番目が2…)
  23.   if(!(SheetNo > 1)) SheetNo = 1;
  24.   // アクティブフォーム
  25.   const form = FormApp.getActiveForm();
  26.   // 設定用シート(2枚目のシート)
  27.   const mailSheet = SpreadsheetApp.openById(form.getDestinationId()).getSheets()[SheetNo];
  28.   // 最新の回答を配列に取得
  29.   const latestItems = form.getResponses().pop();
  30.   const itemResponses = latestItems.getItemResponses();
  31.   // 全ての質問を取得し、SECTION_HEADERを除外
  32.   const allItems = form.getItems().filter(item => item.getType() !== FormApp.ItemType.SECTION_HEADER);
  33.   const answerItems = allItems.map(item => {
  34.     // 該当する質問に対する回答を探す
  35.     const tempRes1 = itemResponses.find(response => response.getItem().getId() === item.getId());
  36.     // 回答が存在すればその値、存在しなければ空白を設定
  37.     if(tempRes1) {
  38.       const tempRes2 = tempRes1.getResponse();
  39.       // 配列(チェックボックスの複数回答)の場合はカンマ区切りで結合
  40.       return Array.isArray(tempRes2) ? tempRes2.join(', ') : tempRes2;
  41.     } else {
  42.       return ''; // 未回答の場合は空白
  43.     }
  44.   });
  45.   answerItems.unshift(latestItems.getTimestamp()); // タイムスタンプを追加
  46.   // 回答を設定用シートにセット
  47.   mailSheet.getRange(2, 2, 1, answerItems.length).setValues([answerItems]); SpreadsheetApp.flush() // sync;sync;sync
  48.   // B12がONなら編集リンクを設定用シートにセット
  49.   mailSheet.getRange('C12').setValue(mailSheet.getRange('B12').getValue() === 'ON' ? latestItems.getEditResponseUrl() : ""); SpreadsheetApp.flush() // sync;sync;sync
  50.   // 設定用シートの項目(セル:B3-B11)を配列に取得
  51.   const mailTbl = mailSheet.getRange('B3:B11').getDisplayValues().flat();
  52.   // B11が空白ならアクティブユーザーのメールアドレスを使用
  53.   if(!mailTbl[8]) mailTbl[8] = Session.getActiveUser().getEmail();
  54.   // B3がOFF以外はメールを送信
  55.   if (mailTbl[0] !== 'OFF')
  56.     GmailApp.sendEmail(mailTbl[3], mailTbl[1], mailTbl[2], {from: mailTbl[8],cc: mailTbl[4],bcc: mailTbl[5],name: mailTbl[6],replyTo: mailTbl[7]});
  57. } // Ver3.1.0 for maintenance
  58. //
  59. function myFunction() {
  60.   updateBbs(1);
  61.   diyReply(2);
  62. }

myFunctionは、updateBbsdiyReplyに引数(シートの位置番号:0, 1, 2,...)を渡すためにあります

↓ ↓ コピペ ↓ ↓

トリガー

myFunctionをトリガーに追加します

これで、準備は完了です。

実行

フォームをプレビュー回答、そして送信します。

結果

再度、プレビューします。

updateBbsにてシート1の掲示内容が、タイトル(目標)の説明に表示されています

diyReplyにて返信メールが送られ、シート2の件名と本文、回答のが記されています

署名活動フォームの完成です。このままプレビューと回答、送信を繰り返すと、賛同者数と達成率の数値が増えていきます。都度、返信メールが届きます。

おわりに

いかがでしょうか。掲示板を使ったフォームのパターンで私が思いついたのが、署名活動フォームだけでした。

今回は2つのGASを使いましたが、私の組むGASは複数で使うことも前提としているので、複数シートを管理できるならいくつでも追加しても大丈夫です。

相変わらずスプレッドシートの関数依存なGASですが、自由度はとても高い思います。

それではまた、

コメント

タイトルとURLをコピーしました