Question

excel vba提取内容到另表对应位置

将另表G7：be7范围的内容，提取到此表
2.结果起行在第6行，结束行为200行

Answer 1

Sub s()
    Set rg = Sheets("问13表").[g7:be7]
    C = "V"
    i = 6
    With Sheets("问13表结果")
        Do While .Cells(i, C) <> ""
            i = i + 1
        Loop
        For Each r In rg
            If r <> "" Then
                .Cells(i, C).Offset(0, k) = r
                k = k + 1
            End If
        Next
    End With
End Sub

追问

G7,Q7,AA7,AK7,AU7,BE7
数据在这几个单元
提取部分没有结果