如何用vba语言获得excel当前工作表数据区的列数?

当前工作表就一个数据区,并且是连续的.必有重谢

创建宏,在代码框输入:

Dim b As Integer
For Each a In Selection
b = b + 1
Next a
Range("a1").Select
ActiveCell.Value = b

选中你这个数据区的首行,然后运行.结果我是在A1里面显示的.

其实用函数可以简单得出.为什么要用VBA呢
温馨提示:答案为网友推荐,仅供参考
第1个回答  2007-12-29
Sub col()
t = Range("a1").CurrentRegion.Columns.Count

End Sub本回答被提问者采纳
第2个回答  2007-12-29
A
相似回答