返回列表 上一主題 發帖

[發問] 空白欄位不列印問題請教

回復 3# honching99
  1. Sub 隱藏()
  2. Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
  3. End Sub
  4. Sub 復原()
  5. Cells.EntireRow.Hidden = False
  6. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 人生最大的成就是從失敗中站起來。
返回列表 上一主題