Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


71749 / 76733 ←次へ | 前へ→

【9477】Re:ユニークな数値を数えたい。自己レス
回答  bykin  - 03/12/4(木) 21:01 -

引用なし
パスワード
   こんばんわ。

▼ichinose はん:

割り算して足し算したらどうしても端数が出てまいますわなー
MSはこういう場合は FREQUENCY 関数を使うようにアナウンスしてまっせ。
http://support.microsoft.com/default.aspx?scid=kb;ja;268001&Product=excelJPN

この説明に従うと、ふつーにセルに関数を入れる場合は
=SUM(IF(FREQUENCY(A1:A9,A1:A9)>0,1,0))
を配列数式で入力しろってことになるんやけど、
実際は配列数式にする必要はありまへん(^^;;
(どっちでもOK・・・こらっ!>MS)

VBAでやる場合は、ichinose はん風やったら

Sub test()
  MsgBox [=SUM(IF(FREQUENCY(A1:A9,A1:A9)>0,1,0))]
End Sub

ってな感じかな?

試してみてな。
ほな。

0 hits

【9348】ユニークな数値を数えたい。 まゆん 03/11/30(日) 15:45 質問
【9349】Re:ユニークな数値を数えたい。 INA 03/11/30(日) 16:06 回答
【9355】Re:ユニークな数値を数えたい。 まゆん 03/11/30(日) 16:58 質問
【9356】Re:ユニークな数値を数えたい。 INA 03/11/30(日) 17:51 回答
【9360】Re:ユニークな数値を数えたい。 INA 03/11/30(日) 18:02 回答
【9353】Re:ユニークな数値を数えたい。 ichinose 03/11/30(日) 16:44 回答
【9429】Re:ユニークな数値を数えたい。自己レス ichinose 03/12/4(木) 7:58 発言
【9477】Re:ユニークな数値を数えたい。自己レス bykin 03/12/4(木) 21:01 回答
【9526】Re:ユニークな数値を数えたい。自己レス ichinose 03/12/7(日) 11:28 お礼
【9357】Re:ユニークな数値を数えたい。 りん 03/11/30(日) 17:54 回答

71749 / 76733 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free