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

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被广泛应用于管理、统计财经、金融等众多领域。