如何用vba實現以A列最後壹個非空白單元格作為條件判定，將下面的所有行全部自動隱藏。

使用End和UsedRange獲得的範圍，都是包含有空格、公式等內容的，雖然他們看起來是空的，實際上存儲了內容，需要判斷妳的標準的空白單元格，只有逐壹判斷，可能速度有點慢：

Sub?隱藏A列最後壹個顯示有內容之後的行()

Dim?n

n?=?Cells(Rows.Count,?1).End(xlUp).Row

While?n?>?1?And?Cells(n,?1)?=?""

n?=?n?-?1

Wend

n?=?n?+?1

Range(n?&?":"?&?Rows.Count).EntireRow.Hidden?=?True

End?Sub