VBA 查找特定值并选中整行

来源:互联网 发布:apache无法访问根目录 编辑:程序博客网 时间:2024/06/06 07:21

找到符合条件的数据并选中整行,以便进行下一步操作。

Sub find()    Dim mybook As Workbook    Set mybook = Workbooks("2011明细表.xls")        Set findValue = Worksheets("Sheet1").Columns("B").find(what:="永洲")    Worksheets("Sheet1").Columns("B").find(what:="永洲").EntireRow.Select        MsgBox (findValue)End Sub


 

原创粉丝点击