Question

excel中使用vba代码查找字符串并返回该单元格的位置

我需要在各种不同大小的工作表中查找"单位:"这个字符串(不只是一个)，这个字符串只会出现在A1列。主要是想知道它们的位置，希望给代码，并解释。谢谢

Answer 1

Sub TestFind()

MsgBox Sheet1.Range("1:" & Sheet1.Rows.Count).Find("测试字符串").Address

End Sub

如果是多个，并且不要提示，让它变成行数的变量

Microsoft Excel是微软公司的办公软件Microsoft office的组件之一，是由Microsoft为Windows和Apple Macintosh操作系统的电脑而编写和运行的一款试算表软件，最早版本是在1985年开发的。

Microsoft Excel可以进行各种数据的处理、统计分析和辅助决策操作等，具有打开或关闭表格标题行、计算列使用单个公式调整每一行、数据排序和筛选、自定义公式和文本输入等功能。目前，Microsoft Excel被广泛应用于管理、统计财经、金融等众多领域。

Answer 2

Sub TestFind()

MsgBox Sheet1.Range("1:" & Sheet1.Rows.Count).Find("测试字符串").Address

End Sub

追问

如果是多个，并且不要提示，让它变成行数的变量

Answer 3

excel 中查找字符串并返回该单元格的位置 若字符串在查找区域是唯一的，可简单用函数解决。
示例：要求在 A1：C10 区域内，查找存在字符串“str”的单元格，返回该单元 格地址。
公式如下： =ADDRESS(SUMPRODUCT(ISNUMBER(FIND("str",A1:C10))*ROW(A1:C10 )),SUMPRODUCT(ISNUMBER(FIND("str",A1:C10))*COLUMN(A1:C10)))
公式说明：SUMPRODUCT 函数配合 FIND 函数和 ROW 函数得到目标单元格 的行号，SUMPRODUCT 函数配合 FIND 函数和 COLUMN 函数得到目标单元 格的列号，再使用ADDRESS 函数得到地址。