我想设置组合框列表中的可用值,以显示从2010年到当前年份的年份列表 . 所以现在将是2010年,2011年,2012年,2013年和2014年 . 明年它将显示2010年,2011年,2012年,2013年,2014年和2015年 . 2016年将显示2010年,2011年,2012年,2013年,2014年,2015年和2016年 .
当前打开工作簿时,使用以下设置值 . 如何对其进行编码以便从2010年到当前年份构建列表?
With Sheet1.YearCombo
.AddItem "2012"
.AddItem "2013"
.AddItem "2014"
End With
1 回答
使用Year()和Date()获取当前年份,然后循环以添加项目