Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1826|回复: 4

[已解决]兰色校长讲座中的查找范例问题

[复制链接]
发表于 2011-8-15 20:35 | 显示全部楼层 |阅读模式
兰色校长第16集讲座中,有一个查询的范例如下

Dim c As Integer   '号码在库存表中的个数
  Dim r As Integer   '入库单的数据行数
  
With Sheets("库存明细表")
    c = Application.CountIf(.[b:b], Range("g3"))
    If c = 0 Then
       MsgBox "该单据号码不存在!"
       Exit Sub
    Else
        r = .[b:b].Find(Range("g3"), , , , , xlNext).Row
        Range("c3") = .Cells(r, 3)
       Range("e3") = .Cells(r, 1)
        Cells(6, 2).Resize(c, 5) = .Cells(r, 4).Resize(c, 5).Value

先是设定了with 对象是Sheets("库存明细表"),但是range("g3")是另一张表的区域,为什么不用在range前输入另一张表的名字了呢?比如 sheets(1).range("g3"). 没弄明白,请大家帮忙说下,谢谢!
最佳答案
2011-8-15 20:46
不加工作表,就是在本表中运行的,不需要加
发表于 2011-8-15 20:45 | 显示全部楼层
回复

使用道具 举报

发表于 2011-8-15 20:46 | 显示全部楼层    本楼为最佳答案   
不加工作表,就是在本表中运行的,不需要加
回复

使用道具 举报

 楼主| 发表于 2011-8-15 20:49 | 显示全部楼层
回复 兰色幻想 的帖子

谢谢校长!!
回复

使用道具 举报

 楼主| 发表于 2011-8-15 20:54 | 显示全部楼层
回复 jsgslgd 的帖子

谢谢帮忙!{:021:}
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-23 16:40 , Processed in 0.571032 second(s), 5 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表