左移单元格将空白列添加到表格的末尾

我有M8-V68中的数据，用户input他们的可用性为“Y”或“N”。 它包括连续10天，日子每天都在改变（按function=今天（））我需要改变用户提供的数据，随着时间的推移。

所以，这个想法是如下，

02/11 03/11 04/11 Mark YYN Kate NYY 

当我明天打开文件时，我想看看下面的内容，

  03/11 04/11 05/11 Mark YN Kate YY 

所以，02/11的数据被删除，其他的被移动。 正如我所指出的那样，date已经随着我的意愿而改变了，所以我只想要数据向左移动，即将到来的date的新列将是空白的。

Answer 1

如果你对VBA开放，这将有诀窍：

 Sub AddNewDate() Columns("M:M").Delete Shift:=xlToLeft Range("V8").Value = Int(VBA.Now + 10) Range("V8").NumberFormat = "DD/MM" End Sub 

它会最终覆盖你的标题中的公式，这可能会或可能不会和你在一起。 如果没有，你可以这样做：

 Range("M9:M69").Delete Shift:=xlToLeft 

我假设你的date在第8行。如果没有，你将需要相应的调整。