亚洲视频二区_亚洲欧洲日本天天堂在线观看_日韩一区二区在线观看_中文字幕不卡一区

公告:魔扣目錄網(wǎng)為廣大站長提供免費收錄網(wǎng)站服務(wù),提交前請做好本站友鏈:【 網(wǎng)站目錄:http://www.430618.com 】, 免友鏈快審服務(wù)(50元/站),

點擊這里在線咨詢客服
新站提交
  • 網(wǎng)站:51998
  • 待審:31
  • 小程序:12
  • 文章:1030137
  • 會員:747

Q在使用Excel時經(jīng)常聽到單元格為空或空白,這樣的說法有區(qū)別嗎?

A:在Excel中,單元格為空(empty)或空白(blank)似乎可以互用,但它們有不同的含義:

空單元格指沒有包含任何內(nèi)容的單元格,在其中沒有常量、沒有公式、沒有前綴字符。

空白單元格指該單元格可以是空單元格、可以包括前綴字符或者空字符串(公式結(jié)果為空或者常量值)

在工作表中,檢查單元格為空的最好方法是使用ISBLANK工作表函數(shù),如下所示。

在中,第4行使用公式=COUNTBLANK(單元格)=1判斷指定單元格是否為空白單元格;在單元格B6中使用公式=COUNTBLANK(B3:E3)統(tǒng)計單元格區(qū)域B3:E3中空白單元格數(shù)。

在VBA中,可以使用Range.Value(或Range.Value2)屬性與vbNullString常量相比較的結(jié)果來判斷單元格是否為空白單元格:

SubCheckIsBlank()

Debug.PrintIsBlank(Sheet1.Range(“B3”)) ‘結(jié)果為False

Debug.PrintIsBlank(Sheet1.Range(“C3”)) ‘結(jié)果為True

Debug.PrintIsBlank(Sheet1.Range(“D3”)) ‘結(jié)果為True

Debug.PrintIsBlank(Sheet1.Range(“E3”)) ‘結(jié)果為True

End Sub

FunctionIsBlank(ByRef rngCheck As Range) As Boolean

IsBlank = (CStr(rngCheck.Cells(1).Value2) =vbNullString)

End Function

還有一個更有效的方法是調(diào)用工作表函數(shù)COUNTBLANK函數(shù):

Sub IfIsBlank()

Debug.PrintIfBlank(Sheet1.Range(“B3”)) ‘結(jié)果為False

Debug.PrintIfBlank(Sheet1.Range(“C3”)) ‘結(jié)果為True

Debug.PrintIfBlank(Sheet1.Range(“D3”)) ‘結(jié)果為True

Debug.PrintIfBlank(Sheet1.Range(“E3”)) ‘結(jié)果為True

End Sub

FunctionIfBlank(ByRef rngCheck As Range) As Boolean

IfBlank =(Application.WorksheetFunction.CountBlank(rngCheck.Cells(1)) = 1)

End Function

最后,再談?wù)効兆址?兆址且粋€長度為的字符串,可以包含常量或者公式結(jié)果(為空)。例如,公式=””返回一個空字符串。如果你復(fù)制這個公式并粘貼為值時單元格中包含的空字符串為常量,有時從外部數(shù)據(jù)源導(dǎo)入數(shù)據(jù)時也會得到空字符串。

下面的HasNullString函數(shù)在單元格中包含空字符串時返回True。如果想要忽略公式結(jié)果(例如,僅檢查常量),那么給參數(shù)blnConstantsOnly傳遞True。如果單元格中有前綴字符,那么該函數(shù)返回False。

Public FunctionHasNullString( _

ByRef rngToCheck As Range, _

Optional ByVal blnConstantsOnly AsBoolean = False) _

As Boolean

Dim rngFirstCell As Range

Dim strToCheck As String

Dim varToCheck As Variant

Set rngFirstCell = rngToCheck.Cells(1)

varToCheck = rngFirstCell.Value2

If Not IsEmpty(varToCheck) Then

If blnConstantsOnly Then

strToCheck = rngFirstCell.Formula

Else

strToCheck = CStr(varToCheck)

End If

If strToCheck = vbNullString Then

HasNullString =(LenB(rngFirstCell.PrefixCharacter) = )

End If

End If

End Function

分享到:
標簽:excel常用函數(shù) excel常見問題 excel技巧 Excel教程
用戶無頭像

網(wǎng)友整理

注冊時間:

網(wǎng)站:5 個   小程序:0 個  文章:12 篇

  • 51998

    網(wǎng)站

  • 12

    小程序

  • 1030137

    文章

  • 747

    會員

趕快注冊賬號,推廣您的網(wǎng)站吧!
最新入駐小程序

數(shù)獨大挑戰(zhàn)2018-06-03

數(shù)獨一種數(shù)學(xué)游戲,玩家需要根據(jù)9

答題星2018-06-03

您可以通過答題星輕松地創(chuàng)建試卷

全階人生考試2018-06-03

各種考試題,題庫,初中,高中,大學(xué)四六

運動步數(shù)有氧達人2018-06-03

記錄運動步數(shù),積累氧氣值。還可偷

每日養(yǎng)生app2018-06-03

每日養(yǎng)生,天天健康

體育訓(xùn)練成績評定2018-06-03

通用課目體育訓(xùn)練成績評定