Find(日期).Row '填入的資料列位置 If Range("C" & B) = 日期Then '底下資料符合條件才執行 Range("D" & B & ":I" & B) = Range("D5:I5").Value Else End If Exit Sub ...
確定! 回上一頁