excel中可否设置某个单元格值为空时,该单元格所在的行或列不打印,但是不改变单元格,不影响以后使用。

2024年11月16日 19:02
有2个网友回答
网友(1):

其实我想了一个办法就是:当某个单元格空值也就是为0时,自动隐藏或删除该行或列,这样就可以打印出来就没有值为空值的行或者列。
你的结果是0,重新录制如下。
隐藏行列:Sub myhide()
For i = 1 To 5
If Application.WorksheetFunction.Product(Range(Cells(i, 1), Cells(i, 5))) = 0 Then
Rows(i).Hidden = True
ElseIf Application.WorksheetFunction.Product(Range(Cells(i, 1), Cells(i, 5))) > 0 Then
Rows(i).Hidden = False
End If
Next
End Sub
输入此项后就可以隐藏有空值的行列

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.Delete
End Sub

Sub 删除列()
'
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.Delete
End Sub

网友(2):

这个做不到吧?