VBA自动键入数据

我有两个主要的表格在这里玩:S1和S2

S1是一个供应分配的forms,有过去的logging负载,并有一个我可以改变的date单元格。 S2基本上就是在那里我手动复制和粘贴我的供应分配。 这是一个漫长的页面充满date在顶部,我必须手动检查,以粘贴供应分配在正确的date位置。

我怎么能这样做,以便VBA检查我在S2中的一排dateS1上设置的date。 那么,复制并粘贴我的命令(从S1)一列低于S2中匹配的date一列?