- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:31日分(同一フォーマット)のシートのマクロについて)
31日分のシートに数値を入力する方法
このQ&Aのポイント
- 同一フォーマットの1日から31日分までのシートを作成し、指定した日付のB1セルに数値を入力すると、その日のA1セルにも同じ数値が表示されます。
- シートのマクロを使用して、指定した日付のB1セルに入力した数値が、1日前のA1セルに表示される仕組みです。
- もしもシートのマクロを使用するのが難しい場合は、関数を使用して同じ効果を得ることができます。
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
こんばんは。 もう、これは、一旦どこかで整理し統一したほうがよいと違いますか? 内容的には、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
その他の回答 (1)
noname#79209
回答No.2
シート名を1日を「Day1」、2日を「Day2」、3日を「Day3」とした場合、 シート「Day1」のセルA1に「=Day2!B1」 シート「Day2」のセルA1に「=Day3!B1」 で可能なのでは?
質問者
お礼
書き込みありがとうございます。 その通りなのですが、量の多さと、時間がないもので、ついマクロに…
お礼
Wendy02さまこんばんは。 せっかく即答いただいたのに、 お礼の書き込み遅れた事を深くお詫びします。 言い訳なんですが、ヒタスラ作成に専念してました。。。。 マクロの方も色々いぢらせてもらい、実行できました! 先程、会社で全てを完成することができました! これらのマクロがなかったら、後2,3日はかかっていたことと思います。 この数日、Wendy02さまにはとにかくお世話になり、感謝しております。 本当にありがとうございました。 あなたのおかげで無事解決できました。 また何かのご縁でお世話になるかと思いますが、 その時はよろしくお願いします。