空白ではないカウント値またはN/A - VBA

Question

空白ではないこれらの値をすべて数えるためにこの数式を計算しましたが、システムはテンプレートを更新しましたが、空白のほかに "N/A "値。私は空白ではないのほかにも、NOT Nをテストする場合、これは

=COUNTIF('R Plan'!XT2:XT3658,"<>") 

テストするために変換することができますどのように

/

私はこの

=COUNTIF('R Plan'!XT2:XT3658,"<>" OR "<>N/A") 

を試してみましたので、私は取得していますあなたの計算式でエラーが見つかりました。

Answer 1

> = XL2007を使用している場合は012を使用できます：

=COUNTIFS('R Plan'!XT2:XT3658,"<>",'R Plan'!XT2:XT3658,"<>N/A") 

あなたは< = XL2003を使用している場合は、あなたが使用することができます。

=SUM(COUNTIF('R Plan'!XT2:XT3658,"<>"),-COUNTIF('R Plan'!XT2:XT3658,"N/A")) 

空でない数をカウントし、マイナスN/Aを有するもの。

または

=SUMPRODUCT(('R Plan'!XT2:XT3658<>"")*('R Plan'!XT2:XT3658<>"N/A")) 

Answer 2

あなたはVBAを使用したい場合は、これはあなたのために働くだろう、

はセルでこれを入れて、あなたがカウントする値であるあなたの範囲=COUNTBLANKS(B1,A1:A21)、B1を選択し、 2番目の範囲は、その値が何回発生するかを数えたい範囲です。

モジュールを追加してこの関数を貼り付けます。

Function COUNTBLANKS(r As Range, rng As Range) As Long 

    Dim x 
    Dim c 

    x = rng 
     For Each c In x 
      If c = r Then 
       COUNTBLANKS = COUNTBLANKS + 1 
      End If 
     Next c 


End Function