关于选择的单元格数量问题。

icecox

  通过输入语句，在表格内选择特定的一组数据，一般是单列的，比如连续的十个数据， 这个十个数据有可能是筛选后的，或者是 未筛选时候选中的 。      Set rng = Application.InputBox("请选择目标区域", , Type:=8)
现在想获得当前选定的单元格数据的数量，
选定的单元格变量为CC
选定的区域为RNG
状况1:未筛选时候。
CC=RNG.Cells.Count.
获得结果正确。
状况2：数据被筛选之后。
用上面语句获得的数量就不对了。
请问如何写语句，能正确获得 两种情况下的选定单元格区域内数量（可见的数量）

icecox

还有第二个问题，上述的 代码 放入一个按钮内，每次运行的时候，复制到粘贴板的数据好像每次在点击按钮的时候都会被清空，请问能否保留粘贴板的数据  以便于在 二次运行按钮功能的时候，保留数据以备使用。

liulang0808

Set Rng = Application.InputBox("请选择目标区域", , Type:=8)
cc = Rng.SpecialCells(xlCellTypeVisible).Cells.Count

liulang0808

截图代码供参考吧。。。。。。

icecox

liulang0808 发表于 2019-10-5 10:54
截图代码供参考吧。。。。。。

感谢老板，完美解决。