删除包含仅包含一个空格

时间:2016-02-12 09:14:42

标签: excel vba excel-vba

我有一个带分隔符的文本文件';'。

我已将值导入Excel文件。某些字段仅包含单个空格的空白值。

我已尝试使用以下代码删除空白单元格,但由于单元格中有空格,因此无法选择。

如何通过宏删除具有单个空格的空白单元格的整行?

1 个答案:

答案 0 :(得分:1)

参见代码例如:)

 Sub DeleteRowIfSpace()
    For Each Sht In ActiveWorkbook.Worksheets
    Set rng = Sht.UsedRange
    Set MyRange = rng

        For Each mycol In MyRange.Columns
            For Each mycell In mycol.Cells
                If mycell.Value = " " Then
                mycell.EntireRow.Delete
               End If

            Next
        Next
    Next
    End Sub

此代码遍历查找“”的工作簿中的所有工作表并删除该行。