|
第二个问题,实际上你把那个工号和姓名的位置换一下即可,第一个问题跟第二个问题类似,你可通加在ai列前加入一行=a列(工号/?序号)隐藏该列。注意你选取的范围如原来的:R6C6这个表示第6行第6列,应根据你的需要更改,还有那个K的取值你也要注意。
Consolidate 方法
参阅应用于示例特性将若干工作表中若干区域的数据合并计算至单个工作表上的单个区域。Variant 类型。
expression.Consolidate(Sources, Function, TopRow, LeftColumn, CreateLinks)
expression 必需。该表达式返回“应用于”列表中的对象之一。
Sources Variant 类型,可选。以字符串数组的形式给出合并计算的源,该数组中包含 R1C1-样式的引用记号。这些引用必须包含将要合并计算的工作表的完整路径。
Function XlConsolidationFunction 类型,可选。
XlConsilidationFunction 可为以下 XlConsilidationFunction 常量之一。
xlAverage default.
xlCount
xlCountNums
xlMax
xlMin
xlProduct
xlStDev
xlStDevP
xlSum
xlVar
xlVarP
TopRow Variant 类型,可选。如果为 True,则基于合并计算区域中首行内的列标题对数据进行合并计算。如果为 False,则按位置进行合并计算。默认值为 False。
LeftColumn Variant 类型,可选。如果为 True,则基于合并计算区域中左列内的行标题对数据进行合并计算。如果为 False,则按位置进行合并计算。默认值为 False。
CreateLinks Variant 类型,可选。如果为 True,则合并计算将使用工作表链接。如果为 False,则合并计算时将复制数据。默认值为 False。
示例
本示例使用 SUM 函数对工作表 Sheet 2 和工作表 Sheet 3 的数据进行合并计算,将结果放到工作表 Sheet1 中。
Worksheets("Sheet1").Range("A1").Consolidate _
Sources:=Array("Sheet2!R1C1:R37C6", "Sheet3!R1C1:R37C6"), _
Function:=xlSum |
|