Application.WorksheetFunction 简写,该如何处理
Application.WorksheetFunction 简写
总感觉“Application.WorksheetFunction.”这个写法太长，有没有什么简化方法（最好用一个变量代替）。
我这样写的：
显然是不行的。
请高手指点。
不会就绕道，别不会装会。最讨厌“这点工作量都不作，还编什么代码呀？” “VB不行，有本事你自已发明一种编程语言’”等类似的回答，我要的是切切实实能帮得上忙答案。
------解决思路----------------------
预测楼主不适合转.NET编程。
其实我也是。
Application.WorksheetFunction.Count(Range(Cells(8, 5), Cells(1000，20000) )
总感觉“Application.WorksheetFunction.”这个写法太长，有没有什么简化方法（最好用一个变量代替）。
我这样写的：
Public Const AppT = Application
Public Const Shtfun = WorksheetFunction
Private Sub Command1_Click()
Dim st
Set st = AppT.Shtfun.Count(Range(Cells(8, 5), Cells(1000，20000)
End Sub
显然是不行的。
请高手指点。
不会就绕道，别不会装会。最讨厌“这点工作量都不作，还编什么代码呀？” “VB不行，有本事你自已发明一种编程语言’”等类似的回答，我要的是切切实实能帮得上忙答案。
------解决思路----------------------
预测楼主不适合转.NET编程。
其实我也是。