HOME > Q&A > Excel （VBA）

Excel （VBA）
Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 11 Home : Microsoft 365)
全列5行目以降の()が無いセルの集計数（2）
投稿日時: 23/03/05 18:01:05
投稿者: ヘクセル

投稿者: taitaniさんへ
カウント数が5241986と出ましたが
やっぱり集計数がおかしいと思いませんでしょうか？
ちなみにCOUNTA関数は、選択範囲の空白セルを除いたセルの個数だということでしたら
全列の最下行は、5000行を超える列はないので
=COUNTA(A5:HXP5000)でやると53104と集計されます
なので1文字のみ又は「()」が入力されているセル数を除くと実際にはもっと少なくなるはずなのではないでしょうか？

回答
投稿日時: 23/03/05 18:22:26
投稿者: Nubo

以下参照して下さい。
 
 
https://www.moug.net/faq/viewtopic.php?t=82114
投稿日時: 23/03/08 10:29:26
投稿者: ヘクセル

先ほど投稿者: Nuboさんより最終返信を頂きました
 
この度は各局さんにはご迷惑をお掛けして大変申し訳ございませんでした
これにて自前IDも削除して今後モーグさんへは2度と出入りしないよう自重します
 
結局コードは当方の質問の不明瞭と検証に戸惑って何もできませんでした
VBAでは自力は到底無理ですが関数式にて何とか対応して解決させることができました
 
A4=SUM(B4:HXP4)
B4=COUNTIF(B$5:B$4999,"<>")-COUNTIF(B$5:B$4999,"*(*")-COUNTIF(B$5:B$4999,"?")
・
・
・
HXP4=COUNTIF(HXP$5:HXP$4999,"<>")-COUNTIF(HXP$5:HXP$4999,"*(*")-COUNTIF(HXP$5:HXP$4999,"?")
 
各列4行目を計算行として使用しA4セルで総集計しました
初期データに括弧が無い場合に今後の作業工程として括弧を含んだデータを追加修正をする毎に修正数が即座に再計算され反映します
この度は誠に御思考頂き感謝いたします