爱问知识人 爱问教育 医院库

在excel宏中,编写find语句如何?

首页

在excel宏中,编写find语句如何?

Cells.Find(What:="刘备").Activate
如果找不到,转到下一句Cells.Find(What:="关羽").Activate
再找不到,结束宏

提交回答
好评回答
  • 2008-10-04 15:43:27
    Sub 查找()
    With ActiveSheet.UsedRange
        Set c = .Find("刘备", lookat:=xlWhole)
        If Not c Is Nothing Then
            c.Activate
        Else
            Set c = .Find("关羽", lookat:=xlWhole)
                If Not c Is Nothing Then
                    c.Activate
                End If
        End If
    End With
    End Sub
    

    思***

    2008-10-04 15:43:27

类似问题

换一换
  • 软件 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...
最新问答 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):