小编Ale*_*rry的帖子

我是编程的新手,目前正致力于学习vba.我遇到了一个问题,我试图运行的每个循环,我太快退出循环.我有一个范围,我想测试它是否存在某些值,如果是,我想删除该列.但它只测试一次条件然后退出循环.非常感谢任何帮助!

  For Each cell In ActiveSheet.Range("S1:AA1")


    If ActiveCell.Value = "Actual" Then
        ActiveCell.EntireColumn.Delete


    ElseIf ActiveCell.Value = "" Then
        ActiveCell.EntireColumn.Delete


    Else: ActiveCell.Offset(, 1).Select


    End If

Exit For

Next