• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:31日分(同一フォーマット)のシートのマクロについて)

31日分のシートに数値を入力する方法

このQ&Aのポイント
  • 同一フォーマットの1日から31日分までのシートを作成し、指定した日付のB1セルに数値を入力すると、その日のA1セルにも同じ数値が表示されます。
  • シートのマクロを使用して、指定した日付のB1セルに入力した数値が、1日前のA1セルに表示される仕組みです。
  • もしもシートのマクロを使用するのが難しい場合は、関数を使用して同じ効果を得ることができます。

質問者が選んだベストアンサー

  • ベストアンサー
  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.1

こんばんは。 もう、これは、一旦どこかで整理し統一したほうがよいと違いますか? 内容的には、No.1647957のマクロ編ということになりますね。(前回は、数式を入れるマクロでした。)No.1655370裏返しのマクロということでしょう。 これで出来ると思います。同じ書き込みで恐縮しますが、例のとおりで、シートは順に並んでいるものとします。また、コードの貼り付け場所は注意してください。 '<ThisWorkbook 側のみ> Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Sh.Index = 1 Then Exit Sub If Target.Column = 1 Then Exit Sub  Sh.Previous.Range(Target.Address(0, 0)).Offset(, -1).Value = Target.Value End Sub

missile-boy
質問者

お礼

Wendy02さまこんばんは。 せっかく即答いただいたのに、 お礼の書き込み遅れた事を深くお詫びします。 言い訳なんですが、ヒタスラ作成に専念してました。。。。 マクロの方も色々いぢらせてもらい、実行できました! 先程、会社で全てを完成することができました! これらのマクロがなかったら、後2,3日はかかっていたことと思います。 この数日、Wendy02さまにはとにかくお世話になり、感謝しております。 本当にありがとうございました。 あなたのおかげで無事解決できました。 また何かのご縁でお世話になるかと思いますが、 その時はよろしくお願いします。

その他の回答 (1)

noname#79209
noname#79209
回答No.2

シート名を1日を「Day1」、2日を「Day2」、3日を「Day3」とした場合、 シート「Day1」のセルA1に「=Day2!B1」 シート「Day2」のセルA1に「=Day3!B1」 で可能なのでは?

missile-boy
質問者

お礼

書き込みありがとうございます。 その通りなのですが、量の多さと、時間がないもので、ついマクロに…

関連するQ&A