好像你的結果是0重新錄製如下。Sub 刪除行()" Macro1 Macro Cells.Find(What:="0", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate Selection.EntireRow.DeleteEnd SubSub 刪除列()" Macro2 Macro Range("A1").Select Cells.Find(What:="0", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate Selection.EntireColumn.DeleteEnd Sub

如果你要隱藏的“0”所在單元格是一個由公式計算出來的值的話，可以使用IF來隱藏，比如C1內容“=a1+b1”如果A1，B1沒有輸入內容，C1就會顯示“0”可以改公式為=if(a1+b1=0,"",a1+b1)這樣就會自動隱藏0了，