lzth.net
当前位置:首页 >> ExCEl的vBA函数,参数是rAngE时,如何获得满足特定... >>

ExCEl的vBA函数,参数是rAngE时,如何获得满足特定...

使用Range.Cells属性,例如:Function fun(rga as Range, rgb as Range, rgc as Range) Dim i For i=1 to rga.Cells.Count If rga.Cells(i)=rgb.Cells(i) Then '这里的条件需要你自行完善 fun = rgc.Cells(i) Exit Function End If Next iEnd Function

Public Function fun(r As Range)Dim arr(1 To 10000) '默认处理10000个单元格For Each c In rIf IsNumeric(c.Value) Thenk = k + 1arr(k) = c.Value * c.ValueEnd IfNext cfun = Application.WorksheetFunction.Sum(arr)End Function注:请将代码粘贴到VBA模块里后,函数生效.

可以.参数n,可以写成RANGE("A"&I),"A"表示A列,n参数表示行数.当然可以的.例如:i=10 range("A" & i)=123 再例如:x = "A10" msgbox Range(x)

range一般都是要对多个单元格操作时使用的,比如合并单元格,设置字体和边框等.range是一个范围,要获得单元格中的数据可以直接这样获得Sheets(1).cells(1,1).value 第一个sheet的A1里的数据

Private Sub Worksheet_SelectionChange(ByVal Target As Range)MsgBox Target.Parent.NameEnd Subrange对象的父对象就是工作表

range("j"&j)range("k"&j)、、、、括号里是双引号里为列标,后面加个连接符号&和变量名称j

SUMIF中的sum_range为实际求和区域,是对需要求和的单元格、区域的引用. SUMIF函数有三个参数,=SUMIF(range,criteria,sum_range) 第一个参数:Range为条件区域,用于条件判断的单元格区域. 第二个参数:Criteria是求和条件,由数

range类型的函数有多种形式,您可以尝试用range(cells(行1,列1),cells(行2,列2))这种形式,比较灵活,也可以用cells(行,列)这样的形式表示单元格,还可以用Columns(列)表示一列,也可以用range(columns(列1),columns(列2))来表示

定义 Range 对象Range.Row '取行Range.Column '取列或者:Application.Range.Row '取行Application.Range.Column '取列

range并不是excel中的函数,而是vba中vba代码中最常用的对象,range对象可以是某一单元格、某一单元格区域、某一行、某一列、或者是多个连续或非连续的区域组成的区域.下面一个简单的vba程序,可以全面地理解range对象的用法,以

网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com