使用VBA在Excel中重新排列单元格

Question

我可以在excel中写入宏来重新排列单元格并用零填充空白单元格。我附加了一个图像，显示运行宏之前和之后的单元格，以使其更容易。

Before and after

感谢您的帮助！

Answer 1

那么，宏是好的，但即使没有宏，你可以使用单元格公式做到这一点。

所以A列是日期，列B是像标签（DATA 1），你只要把下面的公式下一列：

column C : =IF(RIGHT(B1,1)="1",1,0) 
column D : =IF(RIGHT(B1,1)="2",1,0) 
column E : =IF(RIGHT(B1,1)="3",1,0) 
column F : =IF(RIGHT(B1,1)="4",1,0) 
column G : =A1 

然后再从C，d，E，F进行复制，G列。