正解とりあえず答えはこれでOK理由は執筆中ActiveSheet.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Count - 1— ちゅんVBAer (@KotorinChunChun) 2020年6月13日 「vba オートフィルター 有無」辺りで検索するとわんさか出てくるんですが、…