Excel是眾所周知的一種強大的數據處理軟件，它可以通過內置的VBA編程實現各類操作。今天，我們將為大家介紹如何使用VBA編程來求Excel區(qū)域中非空單元格的數量。打開含有數據的Excel表格首先，我

Excel是眾所周知的一種強大的數據處理軟件，它可以通過內置的VBA編程實現各類操作。今天，我們將為大家介紹如何使用VBA編程來求Excel區(qū)域中非空單元格的數量。

打開含有數據的Excel表格

首先，我們需要打開一個含有數據的Excel表格，如下圖所示。在這里，我們將以該工作表為例，演示如何求出所有非空單元格的個數。

點擊“開發(fā)工具”選項卡中的“Visual Basic”

接下來，我們需要點擊Excel的“開發(fā)工具”選項卡中的“Visual Basic”按鈕，如下圖所示。這將會打開一個新的窗口，進入到VBA編輯界面。

輸入VBA代碼

在打開的VBA編輯界面中，我們需要先點擊左側數據所在工作表，然后在右側彈出的代碼編輯區(qū)中輸入以下代碼：

Sub 魚木混豬()

For Each r In UsedRange

If r <> "" Then k k 1

Next

MsgBox k

End Sub

如下圖所示。

這段代碼使用了一個For循環(huán)，遍歷Excel表格中的每一個單元格。當單元格不為空時，就將計數器k加1。最后，我們使用MsgBox函數將計數器k的值輸出到屏幕上。

運行VBA代碼

完成上述代碼的輸入之后，我們需要點擊代碼中的任意位置，然后再點擊上方的“運行子程序”按鈕，如下圖所示。

這樣，就會在Excel中顯示當前工作表中所有非空單元格的個數，如下圖所示。

總結

本文向大家介紹了如何使用VBA編程來求Excel中非空單元格的數量。通過編寫簡單的VBA代碼，我們能夠通過快捷而高效的方式獲取到Excel工作表中所有非空單元格的個數，提高了工作效率。