从另一个工作表中的一个单元格复制到另一个单元格

Question

我正在尝试使用以下代码从一个单元格复制到另一个单元格。循环运行正常，但未将值粘贴到预期的列中。

For a = 2 To d
    For b = 32 To 36
        ActiveSheet.Cells(a, b).Value = Worksheets(sht).Cells(2, c).Value
        c = c - 1
    Next b
Next a

我甚至试过ActiveSheet.Cells(2, 32).Value = "Hello"但它也没有用。请帮忙