注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

精品资源 仓库

不是精品,我不收藏——好资源 大家共享!

 
 
 

日志

 
 

3-15、UsedRange已使用区域(条件统计)  

2014-05-28 16:20:20|  分类: 【Excel VBA】 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

3-15、UsedRange已使用区域(条件统计) - zibo139 - 学习笔记——备忘录
 
 

Worksheet .UsedRange 属性:   (必须指定表名,否则错误)

返回一个 Range 对象,该对象表示指定工作表上所使用的区域

 

Sub 已使用区域()

Sheet1.UsedRange.Select

End Sub

 

注意:

1.         已使用区域的定位方法是:已使用的最小单元格:最大单元格

2.         如果单元格中无内容,但设定了格式,也认为是已使用区域

3.         如果没有已使用单元格,则默认为A1单元

 

姓名

语文

数学

A1

62

59

A2

72

80

A3

62

96

A4

56

53

A5

93

64

A6

71

87

A7

65

50

A8

97

81

A9

86

53


Sub usedrange应用()

For Each Rng In Sheet1.UsedRange         ‘ 必须指定表名,否则错误

    If IsNumeric(Rng) And Rng >= 90 Then k = k + 1

Next Rng

MsgBox "大于等于90分的人数为:" & k & ""

End Sub

 

小结:

1.         usedrange自动计算已用区域的所有值

2.         不用当数据增加时的处理问题。

3.         selection方便,但不够灵活

 

  

本文视频教程学习网址 http://www.51zxw.net/study.asp?vip=8662538

 

 

 

  评论这张
 
阅读(63)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017