Excel VBA：如何更改上次使用的列中单元格的值？

我是VBA新手，正在尝试查找上次使用的列（每月更改），并将该列中的第二行单元格更改为“Apple”。 最后使用的列中的值从第5行开始，但是我需要更改第2行。任何人都可以帮忙吗？ 这个代码我已经提出了，我明白这是有缺陷的：

Sub NameCell() .Cells(5, Columns.Count).End(xlToLeft).Column.Select .FormulaR3C1 = "Apple" End Sub 

Answer 1

 Sub NameCell() With ActiveSheet .Cells(2,.Cells(5, .Columns.Count).End(xlToLeft).Column).Value = "Apple" End With End Sub