下面的程序可以满足功能,如有需要把查找源和目标改一下就行了
Option Explicit
Sub text()
Dim rngFind As Range
Dim rngData As Range
Dim iCOL As Integer
Dim iROW As Long
Dim cell As Range
Set rngFind = ThisWorkbookWorksheets("sheet2")Range("B2")
Set rngData = ThisWorkbookWorksheets("sheet1")Range("D1:Q1")
iCOL = 0
If rngFindValue = "" Or rngFindOffset(, 1) = "" Then
MsgBox "查找条件不符合:查找源为空"
Exit Sub
End If
For Each cell In rngData
If cellValue = rngFindValue Then iCOL = cellColumn
Next
If iCOL = 0 Then MsgBox "什么也没找到!": Exit Sub
iROW = ThisWorkbookWorksheets("sheet1")Cells(65536, iCOL)End(xlUp)row
ThisWorkbookWorksheets("sheet1")Cells(iROW + 1, iCOL) = rngFindOffset(, 1)Value
rngFindOffset(, 1)ClearContents
End Sub
本文介绍 Microsoft Excel 中 ADDRESS 函数的公式语法和用法。 请在“ 另请参阅 ”部分中查找指向有关使用邮件地址或创建邮件标签信息的链接。
说明
你可以使用ADDRESS 函数,根据指定行号和列号获得工作表中的某个单元格的地址。 例如,ADDRESS(2,3) 返回 $C$2。 再例如,ADDRESS(77,300) 返回 $KN$77。 可以使用其他函数(如 ROW 和 COLUMN 函数)为 ADDRESS 函数提供行号和列号参数。
语法
ADDRESS(row_num, column_num, [abs_num], [a1], [sheet_text])
ADDRESS 函数语法具有以下参数:
row_num 必需。 一个数值,指定要在单元格引用中使用的行号。
column_num 必需。 一个数值,指定要在单元格引用中使用的列号。
abs_num 可选。 一个数值,指定要返回的引用类型。
abs_num
返回的引用类型
1 或省略
绝对值
2
绝对行号,相对列标
3
相对行号,绝对列标
4
相对值
A1 可选。 一个逻辑值,指定 A1 或 R1C1 引用样式。 在 A1 样式中,列和行将分别按字母和数字顺序添加标签。 在 R1C1 引用样式中,列和行均按数字顺序添加标签。 如果参数 A1 为 TRUE 或被省略,则ADDRESS 函数返回 A1 样式引用;如果为FALSE,则 ADDRESS 函数返回 R1C1 样式引用。注意: 要更改 Excel 使用的引用样式,请单击“ 文件 ”选项卡,单击“ 选项 ”,然后单击“ 公式 ”。 在“ 使用公式 ”下,选中或清除“ R1C1 引用样式 ”复选框。
sheet_text 可选。 一个文本值, 指定要用作外部引用的工作表的名称。 例如, 公式=ADDRESS (1, 1,,, "Sheet2")返回Sheet2! $A $1。 如果省略了sheet_text参数, 则不使用工作表名称, 并且该函数返回的地址引用当前工作表上的单元格。
1、在Excel中返回单元格引用或单元格位置需要用到Address函数。
2、Address函数的使用格式为:ADDRESS(row_num,column_num,abs_num,a1,sheet_text)。
3、函数的参数中,Row_num是单元格引用中使用的行号;Column_num是单元格引用中使用的列标。
4、Abs_num指明返回的引用类型(1或省略为绝对引用,2绝对行号、相对列标,3相对行号、绝对列标,4是相对引用);A1是一个逻辑值,它用来指明是以A1或R1C1返回引用样式;Sheet_text为一文本,指明作为外部引用的工作表的'名称。
5、在如图所示的案例中,我们在空白单元格输入函数:=ADDRESS(1,4,4,1)。
6、确认函数按下enter键,即返回地址“D1”,如图所示。
注意事项:
如果参数A1为TRUE或省略,函数ADDRESS返回A1样式的引用。
如果参数A1为FALSE,函数ADDRESS返回R1C1样式的引用。
以上就是Excel用什么函数返回单元格引用或单元格位置方法介绍, *** 作很简单的,大家学会了吗?不会的朋友可以参考本文,希望能对大家有所帮助!
查找用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
1、打开一个EXCEL表,点击左上角的文件功能按钮。
2、在功能菜单中,选择点击“选项”。
3、继续在EXCEL选项中,点击“公式”。因为出现这个问题与公式引用有关。
4、在“公用公式”下,将R1C1引用样式前面的沟去掉即可。
5、鼠标指向“R1C1引用样式”后面的帮助信息可以详细查看说明。
6、再回到EXCEL界面,列表头又变回字母序号了。单元格坐标也正常了。
扩展资料:
为了提高作图速度,用户最好遵循如下的作图原则:
1、作图步骤:设置图幅→设置单位及精度→建立若乾图层→设置对象样式→开始绘图。
2、绘图始终使用1:1比例。为改变图样的大小,可在打印时于图纸空间内设置不同的打印比例。
3、当处理较小区域的图案时 ,可以减小图案的比例因子值 ;相反地 ,当处理较大区域的图案填充时 ,则可以增加图案的比例因子值 。
4、为不同类型的图元对象设置不同的图层、颜色及线宽,而图元对象的颜色、线型及线宽都应由图层控制(BYLAYER)。
5、需精确绘图时,可使用栅格捕捉功能,并将栅格捕捉间距设为适当的数值。
6、不要将图框和图形绘在同一幅图中,应在布局(LAYOUT)中将图框按块插入,然后打印出图。
7、对于有名对象,如视图、图层、图块、线型、文字样式、打印样式等,命名时不仅要简明,而且要遵循一定的规律,以便于查找和使用。
参考资料来源:百度百科-Microsoft Office Excel
以上就是关于Excel VBA 查找到的单元格位置全部的内容,包括:Excel VBA 查找到的单元格位置、如何使用excel的ADDRESS函数快速获取单元格地址、Excel中如何返回单元格引用或单元格位置等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)