需要使用Excel的日期函数和自定义公式来实现自动生成农历甲子。
步骤如下：
1. 在Excel的某一列中，以日期格式输入需要生成农历的年份。
2. 在相邻的列中使用公式将输入的年份转换为农历年份。
假设输入的年份为A列，转换为农历年份的列为B列，公式如下：
```
=TEXT(DATE(A1,1,1),"[$-F800]yyyy年") & " " & VBA.AMOROUS(A1)
```
这里使用了`TEXT`函数来将日期格式转换为特定的文本格式，`DATE`函数将年份转换为Excel的日期值，`AMOROUS`函数是一个VBA自定义的函数，用来计算农历年份。
3. 在Excel的Visual Basic for Applications (VBA)编辑器中创建一个新的模块。
4. 在新模块中添加以下VBA代码：
```vba
Function AMOROUS(ByVal year As Integer) As String
' 农历年份计算函数
Dim Heavenly_Stems() As String
Dim Earthly_Branches() As String
Heavenly_Stems = Split("甲乙丙丁戊己庚辛壬癸", "")
Earthly_Branches = Split("子丑寅卯辰巳午未申酉戌亥", "")
Dim stemIndex As Integer
Dim branchIndex As Integer
stemIndex = (year - 1900) Mod 10
branchIndex = (year - 1900) Mod 12
AMOROUS = Heavenly_Stems(stemIndex) & Earthly_Branches(branchIndex)
End Function
```
这个VBA函数根据输入的年份计算对应的农历甲子年份。
5. 返回到Excel表格，B列的单元格将显示对应年份的农历甲子年份。
注意：在Excel中使用VBA函数需要启用宏功能。
