右端に1が入力されたら行替えして0を入力する作業を自動化したい。

Question

||A|B|C|D|
|:--|:--:|--:|
|１|…|…|…|1|
|２|0|…|1||
|３|0||
|４|||

A1から右に向かってデータを入力していきます。
行の右端に1が入力されたら、行をかえて0が入力される、ということがしたいです。
したいのですが、これをやろうとすると、どうしても循環参照になってしまいますよね…。
この作業は手動でもそれほど大変なことではないので、手動でもいいかなとも思うのですが、
でも、なんか自動化できそうな気もするので、こちらで尋ねてから判断しようと思いました。
可能でしたら、アイデアをいただけると嬉しいです。

追記（現状）

右端の値は=INDEX(B2:K2,MATCH(MAX(B2:K2)+1,B2:K2,1)で取得できるとあったので、これを使って、=IF(INDEX(B2:K2,MATCH(MAX(B2:K2)+1,B2:K2,1))=1,B3=0,INDEX(B2:K2,MATCH(MAX(B2:K2)+1,B2:K2,1)))
みたいなことまでは考えました。B3というのは、行を変えた先を想定しています。

追記２

先に書かないといけなかったのですが、忘れていたので追記します。
Excelのタグを付けていますが、当方スプレッドシートを使っています。

～解決後のまとめ～

ttyp03さんの回答を参考に解決しましたので、まとめておきます！

---

「GAS スプレッドシート 1が入力されたら」で検索したところ、
参考になりそうな記事を見つけまして（下記参照）、
それをカスタマイズ？してみたところ、ななんと、うまくいきました。
なので、ご報告に上がりました。

もうひとつ、別のスクリプトから、
「右隣にアクティブセルを移動する」という要素もお借りして、

「変更のあったセルの値が１だったときに、
変更のあったセルのある行の１行下の２列目のセルに０を入力し、
右隣のセルにアクティブセルを移動。」
という内容にしてみました。

完成形

// シートに変更があった時に実行する関数
function onEditEvent() {
  // 変更のあったシート
  var ss = SpreadsheetApp.getActiveSpreadsheet();
  var sh = ss.getActiveSheet();
  // 変更のあったセル
  var cell = ss.getActiveRange();
  // 変更のあったセルの値
  var val = cell.getValue();
  // 変更のあったセルの値が1だった時に
  if( ( val == 1 ) ) {
    // 変更のあったセルの有る行番号
    var r = cell.getRow();
    // 変更のあったセルの有る行の下の行の２列目を選択
    var rowRange = sh.getRange(r+1, 2);
      rowRange.setValue(0).offset(0, 1).activate() ;
  }
}

【ありがたい参考記事】

・https://teratail.com/questions/118993
当記事です。希望を実現するにはスクリプトが必要ということがわかりました。
・http://chaika.hatenablog.com/entry/2015/09/03/143622
セルに特定の値を入力したら処理を行う方法を参考にしました。
スクリプトのベースはこちらの方のもの。
・http://www.relief.jp/docs/google-spreadsheet-gas-offset.html
アクティブセルを隣に移動する方法を参考にしました。

これまで、解決した際、参考記事のことについては書いていなかったのですが、
自分のためにもみんなのためにも書くべきかもしれないと思ったので、
これからは可能な限り書いていこうと思いました。
これまでした質問についても、ちょっと遡って、参考記事を追記してみようと思います。
ただ、どこまで追えるかわかりませんが…。

Comments

[sazi]

行の右端というのはどのような判定にしているのでしょう？次の行の値を変更するのだから循環参照にはならないと思うので、現状でやっていること（式など）を質問に追加されて下さい。

[koromo_t]

了解です。

Answer 1

#～解決後のまとめ～
ttyp03さんの回答を参考に解決しましたので、まとめておきます！

---

「GAS スプレッドシート 1が入力されたら」で検索したところ、
参考になりそうな記事を見つけまして（下記参照）、
それをカスタマイズ？してみたところ、ななんと、うまくいきました。
なので、ご報告に上がりました。

もうひとつ、別のスクリプトから、
「右隣にアクティブセルを移動する」という要素もお借りして、

「変更のあったセルの値が１だったときに、
変更のあったセルのある行の１行下の２列目のセルに０を入力し、
右隣のセルにアクティブセルを移動。」
という内容にしてみました。

完成形

// シートに変更があった時に実行する関数
function onEditEvent() {
  // 変更のあったシート
  var ss = SpreadsheetApp.getActiveSpreadsheet();
  var sh = ss.getActiveSheet();
  // 変更のあったセル
  var cell = ss.getActiveRange();
  // 変更のあったセルの値
  var val = cell.getValue();
  // 変更のあったセルの値が1だった時に
  if( ( val == 1 ) ) {
    // 変更のあったセルの有る行番号
    var r = cell.getRow();
    // 変更のあったセルの有る行の下の行の２列目を選択
    var rowRange = sh.getRange(r+1, 2);
      rowRange.setValue(0).offset(0, 1).activate() ;
  }
}

【ありがたい参考記事】

・https://teratail.com/questions/118993
当記事です。希望を実現するにはスクリプトが必要ということがわかりました。
・http://chaika.hatenablog.com/entry/2015/09/03/143622
セルに特定の値を入力したら処理を行う方法を参考にしました。
スクリプトのベースはこちらの方のもの。
・http://www.relief.jp/docs/google-spreadsheet-gas-offset.html
アクティブセルを隣に移動する方法を参考にしました。

これまで、解決した際、参考記事のことについては書いていなかったのですが、
自分のためにもみんなのためにも書くべきかもしれないと思ったので、
これからは可能な限り書いていこうと思いました。
これまでした質問についても、ちょっと遡って、参考記事を追記してみようと思います。
ただ、どこまで追えるかわかりませんが…。

Answer 2

セルに入力する数式では実現できません。
マクロを使うことで対応可能と思います。
簡単に書くとこんな感じです。

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Value = 1 Then
        Cells(Target.Row + 1, 1).Value = 0
        Cells(Target.Row + 1, 2).Select
    End If
End Sub

Comments

[koromo_t]

回答ありがとうございます！
なるほど、マクロですか…。
となると、スプレッドシートにおいてはGASを使うということになるのですね。
でも、なんとなく答えに手が届きそうな雰囲気を感じます。
とりあえず、質問にGASのタグも追加しました。

[Zuishin]

追加ではなく Excel を外してください。

[koromo_t]

あ、そうですね、すみません…。

[ttyp03]

Excelではないのですね。失礼しました。
GASでも確か同じようなことはできたと思うので、参考にしてみてください。

[koromo_t]

いえ、こちらこそ、質問文に書き忘れたのがいけなかったので…。
スプレッドシートのタグがあればそちらを使いたいのですが、なさそうなんですよね…。
せっかく考えてくださったのに、ごめんなさい。
でも「スクリプトで動かす」という答えが参考になりました！
なので、ベストアンサーにさせていただきます！
これから、ちょっと研究をしてみようと思います。
回答ありがとうございます！

あと‥質問には関係ないことですが…、
ttyp03さんのアイコン画像は‥鳥をしつけしている様‥ですか…？
いや、ちょっと興味がわいたもので…ｗ

Answer 3

セルの値が変更されたら
値が１&そのセルの行のそのセルの列以降に値がない場合
次行の最初のセルの値を0に

イベントプロシージャ

---

追記

GoogleSpredSheetならこれ

ScriptApp

まず任意の関数のTriggerBuilderオブジェクトを作って
そいつからSpreadsheetTriggerBuilderオブジェクトを作って
そっからさらにonEditのSpreadsheetTriggerBuilderオブジェクトを作って
そいつからTriggerオブジェクトを作ることでイベントリスナー追加完了
という流れらしいです

SpreadsheetTriggerBuilderのとこは
onEditのSpreadsheetTriggerBuilderにする
という処理なのかな？

新しいインスタンスが作られてるのか
自身を変更して返してるのかどっちか不明…
要確認

Comments

[koromo_t]

回答ありがとうございます！
イベントプロシージャとは初めて知ったものですが、
これを使うとドンピシャなことができるみたいですね。
ただ、使い方がわからないので、研究の必要がありそうですが…。
そして、質問文に書き忘れたのがいけないのですが、
当方、Excelではなくスプレッドシートを使用しているので、
おそらくこのイベントプロシージャとやらは使うことができない‥のではないかと考えました。

[koromo_t]

追記部分読みました。
回答ありがとうございます！
ほう…、なんだか難しそうですね…？
私にはちょっと理解できそうにありませんが…、
考えてくださってありがとうございます！

あと‥、回答者さんの回答だけ、書式？が
なんだかおかしなことになっているような気がするのですが、
タグの閉じ忘れとか、なにか思い当たることはありませんか？

[KazuhiroHatano]

なんか要素詳細見るとVBAのコードってことにされちゃってるっぽいですね
上の回答のvba部分でteratailのマークダウンの処理ミスしてるような気がします

どうもteratailのコードのマークダウンは挙動が不安定な気がします
インラインのコード記述とブロックのコード記述が同居したときとかうまく動かないんですよね

[koromo_t]

！！
上の方の回答が原因とは盲点であり、
こちらが原因だと思い込んでしまっていました、すみません…！
なるほど、そういうことがあるのですね…。