查找用Range对象的Find方法,返回Rang对象,然后再取Range对象的Row属性或Column属性返回行或列。Set C=Range("A1:E10")Find("abc"),If Not C Is Nothing then,R=CRow '返回Cl=CColumn '返回列。
在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能,特别是Microsoft Office软件。它也可说是一种应用程式视觉化的 Basic 脚本。
扩展资料:
调用函数/过程时,可以加括号或者不加括号。如果调用表达式作为一行的一部分,那么必须用参数,例如函数调用的返回值赋给变量。 调用过程时, 可以使用/不使用call关键字。使用call语句调用过程,如果无参数,则不加括号;如果有参数,必须加括号。
如果调用时用括号包住单个参数,则该参数强行按值传递。需要特别注意,不用call不加括号的调用,形参与实参是传值(passed by value)而不是传引用(passed by reference),这会导致一些对象的方法调用失败。由于微软Office软件的普及
人们常见的办公软件Office软件中的Word、Excel、Access、Powerpoint都可以利用VBA使这些软件的应用更高效率,例如:通过一段VBA代码,可以实现画面的切换;可以实现复杂逻辑的统计(比如从多个表中,自动生成按合同号来跟踪生产量、入库量、销售量、库存量的统计清单)等。
掌握了VBA,可以发挥以下作用:
1、规范用户的 *** 作,控制用户的 *** 作行为;
2、 *** 作界面人性化,方便用户的 *** 作;
3、多个步骤的手工 *** 作通过执行VBA代码可以迅速的实现;
4、实现一些VB无法实现的功能;
5、用VBA制做EXCEL登录系统;
6、利用VBA可以Excel内轻松开发出功能强大的自动化程序。
参考资料来源:百度百科-VBA
获取E9单元格的计算值:a = Range("e9")Value
获取E9单元格的公式:b = Range("e9")Formula
获取E9单元格的可见字符:b = Range("e9")Text
1、第一种方法: ActiveSheetRange("A" & RowsCount)End (xlUp)Row
2、第二种方法:ActiveSheetRange("a1048576")End(xlUp)Row
如果是低版本的OFFICE用ActiveSheetRange("a65536")End(xlUp)Row
3、第三种方法:ActiveSheetCells(RowsCount,1)End(3)Row
4、第四种方法:ActiveSheetrange("A1")CurrentRegionRowsCount
5、第五种方法:ActiveSheetCellsSpecialCells(xlCellTypeLastCell)Row
6、第六种方法:ActiveSheetUsedRangeSpecialCells(xlCellTypeLastCell)Row
7、第七种方法:MaxRow =ApplicationEvaluate("=MAX((A1:A1048576<>"""")ROW(1:1048576))")
假如在ABC三列查找“张三”:
Set
Rng
=
Columns("A:C")Find("张三")'查找
If
Not
Rng
Is
Nothing
Then
RngSelect'如果找到就选中
凡是这三列单元格里第一个有“张三”两字的如“张三娃”等的单元格将被找到并选中,如果只能查找“张三”,前一句改一下即可:
Set
Rng
=
Columns("A:C")Find("张三",
,
,
xlWhole)
以上就是关于VBA怎样取到查找到的单元格位置全部的内容,包括:VBA怎样取到查找到的单元格位置、wps表格 单元格内容为函数所得 怎么在vba中取单元格内容、如何在vba中得到当前单元格的行号和列号等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)