質問: マクロのカウントについて質問です。 A2から毎回、不確定のAの最終行まで入ったデータについて、マクロで最終行を取得し、その最終行の一つ下にA2から不確定の最終行までのデータ個数(空白を除く)をカウントするというマクロを作成したいのですが、ご教示をお願いします。
回答: R = Cells(Rows.Count, "A").End(xlUp).Row Cells(R + 1, "A") = R - WorksheetFunction.CountBlank(Range("A2:A" & R)) - 1 では いかがですか