根据特定的单元格删除Excel中的列
我有一个非常重要的问题，就是在excell中删除一些包含不必要数据的列，并在删除后将剩下的列移到左边。 我已经尝试了一些VBAmacros，我发现在一个小的谷歌search和macros，我发现这个macros的链接是http://analysistabs.com/vba/delete-columns-with-specific-data-excel-macros示例代码/
问题是，当我试图使用这个macros的作家的指示，它不工作，我不知道为什么它不工作或不工作的知识。 这就是为什么我想，如果你们可以给我一些build议傻瓜版本的macros， 删除任何列，如果列中包含单元格170“0”，并保留列未删除，如果列包含和除“0”之外的其他数字列的单元格170 。 我举了一个例子，我的excell文件如下图所示。 我希望列与我保持绿色圈出来，删除我用红色圆圈的列。
该matrix包含A列和BXX列之间的“2000”列和第1列中的示例代码和第1行中的结果代码的“170”列。 第170行包含列的总和，如果列总和为“0”，我想删除此列
感谢您的答案..最好的问候。
试试这个macros：
Sub ColumnKiller() Dim Nrow As Long, Nend As Long, i As Long Nrow = 170 Nend = Cells(Nrow, Columns.Count).End(xlToLeft).Column For i = Nend To 1 Step -1 If Cells(Nrow, i) <> "" Then If Cells(Nrow, i) = 0 Then Cells(Nrow, i).EntireColumn.Delete End If End If Next i End Sub