excel vba按照特定顺序从一张纸复制到另一张纸-Java 学习之路

我有一个excel文件的这个问题 . 我在这个文件中有200页，其中总是在相同的单元格中（范围O2：O6）我有一些值要复制在同一列CI中的唯一表单（名为“Final”），我也想订购这个值我复制并粘贴;我会（也许）使用命令if if来理解顺序：实际上在所有工作表的单元格A1中都有该工作表的引用名称（某些工作表有名称A，其他B，其他C）;我必须放按照表格中的顺序，在名称为A的纸张的值之前，然后是名称为B的值，然后是名称为C的纸张的值 . 所以在实践中我会这样做，“如果（在每张纸的单元格A1中出现字母A））然后（复制相对值）“然后在该单元格中名称为B的所有纸张值，然后命名C.你能帮帮我吗？

2 回答

这将使您开始，它循环通过工作表并将范围复制到“最终”工作表 .

它不会按顺序复制工作表，您可以使用我的示例并创建一个可以执行此操作的循环 .

Sub Do_Something()
    Dim sh As Worksheet
    Dim ws As Worksheet


    Set ws = Sheets("Final")

    With ws
        For Each sh In Sheets
            If sh.Name <> ws.Name Then
                sh.Range("O2:O6").Copy .Cells(.Rows.Count, "C").End(xlUp).Offset(1)
            End If
        Next sh
    End With

End Sub

回复于 2024-04-29T19:14:05+08:00

0

但我的问题是订单，复制是好的 . 我想复制那个范围，但是从某个工作表开始，然后从其他工作表复制，关于该单元格中包含的名称

回复于 2024-04-29T19:14:05+08:00

excel vba按照特定顺序从一张纸复制到另一张纸

2 回答

相关问题