主题：[求助]如何定位某值在单元格中的坐标

 必须循环所有的单元格。

 Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\test.xls")
Dim Ws = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.UsedRange
For Each cl As object In Rg
    If cl.Value = "123" Then
        msgbox(cl.address)
    End If
Next
App.Quit

 1、find，你首先得知道列吧？

 2、你是全表查询，肯定要循环所有的单元格。