小编Ste*_*enH的帖子

我有一个包含多张工作表的 Excel 工作簿。我需要做的是将年份从一张纸中的一列转移到另一张纸上。我可以让专栏顺利转移，但我不能让它只给我日期。

日期采用dd-mon-yy格式（例如14-Jul-14）。我需要的是把它yyyy放进去（例如2014）。任何帮助都会很棒。

我正在尝试的代码是这样的，但它不起作用。

[...]
For I=5 to 5
    If Not TransferCol (5) = 0 Then
        Worksheets ("Results").Cells.(Row, StartColumn + I) = Worksheets("Program").Cells(RowTransfer, Year (TransferCol (5)))
        Exit Do
    End If
Next
[....]