|
みなさんたびたびすみません
こんな感じでした。まくろの記録が変でした。
Sub 転記()
Range("F10:G10").Value = "=Calendar!H5"
Range("F13:G13").Value = "=Calendar!H6"
Range("F16:G16").Value = "=Calendar!H7"
Range("F19:G19").Value = "=Calendar!H8"
Range("F22:G22").Value = "=Calendar!H9"
Range("F25:G25").Value = "=Calendar!H10"
Range("F28:G28").Value = "=Calendar!H11"
Range("E32:F32").Value = "=Calendar!H12"
Range("E33:F33").Value = "=Calendar!H13"
Range("E34:F34").Value = "=Calendar!H14"
Range("E35:F35").Value = "=Calendar!H15"
Range("E36:F36").Value = "=Calendar!H16"
Range("E37:F37").Value = "=Calendar!H17"
Range("E38:F38").Value = "=Calendar!H18"
End Sub
|
|