vba - 删除 Excel 行而不取消隐藏另一行,VBA

标签 vba excel

我有一个相当简单的电子表格应用程序,其中包含一些 VBA 代码,可以按照用户的调用执行简单的行插入和删除。这是一个格式繁重的电子表格,旨在供没有 Excel 经验的人员使用。插入和删除的代码很好。

该工作表使用 15 行,该点以下的每一行都已隐藏。但是,在删除完整行时,后面的每个行都会按标准向上移动,留下"new"空白行 15。我希望这种行为被否决,并且空白行出现.

也许很简单?有什么选项可以防止这种行为,如果这是不可能的,是否有任何提示可以获取工作表“最后可见”行的标识,以便手动将其隐藏?

干杯

最佳答案

您可能需要根据需要进行调整,但这应该可行。

Sub GetLastVisibleCell()

Dim rng As Range

Set rng = ActiveSheet.Columns(1).SpecialCells(xlCellTypeVisible).SpecialCells(xlCellTypeLastCell)

If rng = vbNullString Then rng.EntireRow.Hidden = True


End Sub

关于vba - 删除 Excel 行而不取消隐藏另一行,VBA,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12800860/

相关文章:

excel - 在进行比较时,如何避免在 Excel 中重复长公式?

vba - 在指定行上方插入行

excel - 如何在 VBA 中定义下一个循环的范围

ms-access - Access 2000 - 删除多个表单?

excel - Excel 中图表图例值的动态工作表引用

excel - Office 2013 Excel .PutInClipboard 不同吗?

python - unoconv 将 .xlsx 文件导出为 png 等图像

excel - 如何使用https协议(protocol)在线导入工作簿

excel - 限制打印份数

excel - COUNTIFS 公式 - 唯一值