VBA移动列并保存特殊值

Question

我创建了一个每月更新的电子表格。

第一个问题 - 我需要将上个月的公式带到新列中，例如从1月到2月

第二个问题 - 我需要将上个月的数字保存为特殊值，例如如果我在三月份，我需要将二月份的数字粘贴到特殊值中。

我已尝试录制此内容但我可能需要包含偏移量。我不知道如何每次引用一个新列，一个或一个接一个地移动。

Sub First_Unused_Column()
With Worksheets("Sheet1")
    Range("A1").End(xlToRight).Offset(0, 1).Select
End With
Columns("C:C").AutoFill Destination:=Columns("C:D"), Type:=xlFillDefault
End Sub

Sub SaveMonth()
Columns("C:C").Copy
Range("C1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub