刪除單元格只包含一個單一空格的行

Question

我有一個帶有分隔符';'的文本文檔。

我已經將這些值導入到一個Excel文件中。有些字段只有單個空格時纔有空白值。

我試過下面的代碼來刪除空白單元格，但它沒有選擇，因爲單元格中有一個空格。

如何通過宏刪除帶有單個空格的空白單元格的整行？

Answer 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 

此代碼通過所有紙張循環工作簿中尋找「」，並刪除該行。