[[20220818135114]] 『日付を入力すると別のシートに自動転送する方法』(ウィズ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『日付を入力すると別のシートに自動転送する方法』(ウィズ)

シート1のC5に日付(2022/08/18/)と入力します。

するとシート2のA5にシート1のC5の日付を自動で表記させます。

その後にシート1のC5の日付を変更していくと、シート2のA6〜A300までの範囲に日付が順番に自動で表記する方法はありますか?

また、シート1のC5の日付を変更していくと、シート1のB5に日付を入力した回数(○○回)と自動で表記する方法はありますか?

< 使用 Excel:Excel2016、使用 OS:unknown >


>シート2のA5にシート1のC5の日付を自動で表記させます。
そういう数式を組んでおけばよいのでは?

>シート2のA6〜A300までの範囲に日付が順番に
どのような順番かわかりませんが、単純に上のセルに+1する数式を組んでおけばよかったりしませんか?

>シート1のB5に日付を入力した回数(○○回)
マクロなら可能だとおもいます。
Changeイベントについて調べてみてはどうですか?

(もこな2) 2022/08/18(木) 14:17


マクロでWorksheet_Changeを使ってみては?

 Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Address = "$C$5" Then
         Call CopyDate(Target.Value)
         Cells.Range("B5").Value = Cells.Range("B5").Value + 1
     End If
 End Sub

 Private Sub CopyDate(ByVal val As String)
     Dim col As Integer
     For col = 6 To 300
         If Worksheets("Sheet2").Cells(col, 1).Value = "" Then
             Worksheets("Sheet2").Cells(col, 1).Value = val
             Exit For
         End If
     Next
 End Sub
(S) 2022/08/18(木) 14:55

追加でシート1のC6に日付(2022/08/10など)を入力した時に、シート2のC6〜C300の範囲に自動で日付が表記する場合はどの様にすればよろしいでしょうか?
(ウィズ) 2022/08/18(木) 16:11

>追加で〜
既に回答した案は検討されたのでしょうか?
Sさんのほうを採用されたとしても、何をしているか理解できていれば、その質問にはならないとおもいますが・・・

(もこな2) 2022/08/18(木) 17:35


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.