excel 索引-多个索引的索引和匹配

mxg2im7a  于 2023-11-20  发布在  其他
关注(0)|答案(1)|浏览(120)

我有一个工作簿与控制和2这是常数。从表2,基于独特的价值观多个新的数据库创建。
1.我必须从控制中获取余额并将余额插入相应的索引中。能够使用索引和匹配手动实现这一点。但是如何将其更改为自动更改索引中的余额?我的索引匹配公式是=INDEX(Control!N5:T8,MATCH('GBN'!Q2,Control!M5:M9,0),MATCH('GBN'!Q4,Control!N2:T2&CONTROL!N3:S3,0))
1.在除了Control和Sheet2之外的每个表中,我需要对R列中的所有值求和(但它也有一个非数字值,位于中间。这需要忽略。在R列中找到下一个空白单元格,并将结果
1.在列Q中的结果的左侧,我需要出现Balance字样。
1.有没有什么方法我可以返回值的平衡回到控制表从个别工作表。请注意,它有3个参数。它需要匹配的日期,工作表名称和下一列的资产负债表
我已经开始代码如下

Dim ws as Worksheet
Dim lastrow as Long
If ws.Name <> "Control" and ws.Name <> "Sheet2" Then

lastrow = ws.Range("Q" & Rows.Count).End(xlUp).Row
.Range("R10").Formula = ".Sum(Range(""R4:R")" ----- This is incorrect

字符串
任何人都可以请建议。提前感谢。

n53p2ov0

n53p2ov01#

按顺序排列
1.当你在使用时,直接插入值即可,例如:
GBN.Range(S3:S30).Value = Control.Range(N13:S43)'插入正确的范围
1.单元格中的非数字值在SUM函数中被视为零,因此您可以使用类似这样的方法(插入正确的范围)
最后一行尺寸为长最后一行= GetLastRow(Sheet 1)Sheet1.Range(“R26”).Formula2Local =“=SUM(R2:R”& LastRow &“)”
要获取工作表中的最后一行,这是我使用的函数

Function GetLastRow(rg As Variant) As Long
'Find the last row used in a worksheet - regardless of where the data starts and ends
'and regardless of whether the data is contiguous or jagged
'Note use of Variant for the input range parameter
'This allows both worksheets and ranges to passed into the function
    On Error Resume Next
    Dim lr As Long
    lr = rg.Cells.Find(What:="*" _
                    , Lookat:=xlPart _
                    , LookIn:=xlFormulas _
                    , SearchOrder:=xlByRows _
                    , SearchDirection:=xlPrevious).Row
    If Err.Number > 0 Then
        lr = 1  'cater for a completely empty sheet
    End If
    On Error GoTo 0
    GetLastRow = lr
End Function

字符串
1.如果你已经通过计算出最后一行来计算出结果的位置,那么你需要在左边的单元格中输入“Balance”-使用Offset,例如。
Sheet1.Range(“R26”).Offset(0,-1).Value =“Balance”
1.我对上面1的评论是-直接插入值,而不是尝试使用WorkSheet公式

相关问题