Excel VBA質問箱 IV

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

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


56797 / 76732 ←次へ | 前へ→

【24679】条件を満たすセルの数を数えたいのですが…
質問  音速ブルー  - 05/5/2(月) 21:54 -

引用なし
パスワード
   A列には、3桁の整数が入っています。(2桁ということはありません、すべて半角です)
その中で、一の位(一番右)の数が3であるセルの個数をB1に表示させたいと考えています。
そして作ったのが、以下のコードです。
Sub 三数え()
  Dim th As Integer
  Dim n As Integer
  Dim ttt As Object
  Set ttt = Range(Cells(2, 1), Cells(65535, 1))
    th = ttt.SpecialCells(xlCellTypeBlanks, Value.Right(, 1) = 3).Count
  Cells(1, 2).Value = th
End Sub

おそらく、specialcellsプロパティとcountプロパティを使うのだろうと思うのですが、「右から1文字目が3」のセルの指定の仕方がわかりません。
どうぞよろしくお願いします。
0 hits

【24679】条件を満たすセルの数を数えたいのですが… 音速ブルー 05/5/2(月) 21:54 質問
【24680】Re:条件を満たすセルの数を数えたいのです... Hirofumi 05/5/2(月) 22:27 回答
【24681】Re:条件を満たすセルの数を数えたいのです... ponpon 05/5/2(月) 22:35 回答
【24685】Re:条件を満たすセルの数を数えたいのです... ちゃっぴ 05/5/3(火) 8:59 回答
【24686】Re:条件を満たすセルの数を数えたいのです... ponpon 05/5/3(火) 9:37 発言
【24687】Re:条件を満たすセルの数を数えたいのです... Kein 05/5/3(火) 11:29 回答

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