根据标题中的值从花药工作表中获取公式

Question

我希望我能正确地命名这个问题

我现在有两个表：表A存储我想要的公式，表B表示要填充。我想根据表B第1行中的标题将表A（非值）从表A复制到表B第2行。

这是我的代码

def lucky_sevens(numbers):
    result = False
    x, y = 0, 3

    while (y <= len(numbers)):
        if sum(numbers[x:y]) == 7:
            result = True
            break
        x += 1
        y += 1
    return result

print(lucky_sevens([1,2,3,4,5,1,1]))

它一直告诉我表A的公式查询超出范围。 我想在表A中保存公式，而不是直接在宏中键入它们，只是为了更灵活。 有什么想法吗？

谢谢!!!

Answer 1

您可以直接指定公式。

Worksheets("Table B").Range("B2:K2").Formula = Worksheets("Table A").Range("A1").Formula