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

来源：百度知道 编辑：UC知道 时间：2024/05/17 22:02:38
当前工作表就一个数据区,并且是连续的.必有重谢

Sub col()
t = Range("a1").CurrentRegion.Columns.Count

End Sub

创建宏,在代码框输入:

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

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

其实用函数可以简单得出.为什么要用VBA呢

A