填写一个列，其中的日期从给定年份的1月1日到12月31日
我想在excel-vba中编写一个代码，在工作表的一列中填充特定年份的日期。< br >该准则还应考虑闰年。比方说，我已经在单元格B1中输入了年份(如2020年)，因此列A应该填充366个日期条目(考虑到闰年)。
共有1个答案
您可以在< code>Date变量上循环:
Sub dater()
Dim yr As Long, d As Date, i As Long
yr = Range("B1").Value
For d = DateSerial(yr, 1, 1) To DateSerial(yr, 12, 31)
i = i + 1
Cells(i, 1) = d
Next d
End Sub
这将自动处理闰年，并酌情填充366或365个单元格。（格式化列A以满足您的需要）
-
问题内容： 该的getTime（）获取以毫秒为某一特定日期时间。能否可靠地用于18世纪的约会。我们使用Millis并将其存储在字符串变量中以备将来比较。过去可以使用多长时间有限制？ 问题答案： 如果您要比较遥远的过去的日期/时间，我强烈建议您看一下JodaTime。或者实际上是任何类型的日期/时间比较和计算。这是一个很棒的图书馆！ 不要依靠getTime（）做你想做的事情。至少考虑使用Java的C
-
问题内容： 例如： 版画1 乔达时间也是如此。 问题答案： Year of Year的定义是依赖的。 其他帖子中讨论了在美国如何定义。例如在德国（DIN 1355-1 / ISO 8601）：一年的第一周*是新年中具有四天或以上的第一周。 *一周的第一天是星期一，一周的最后一天是星期日 JavaCalendar注重语言环境。例如： 印刷品： 添加 对于美国（我认为墨西哥也是如此），每年的1.星期是
-
我正在做一个Java作业，它涉及在用户指定月份和年份后打印日历。我不能使用日历或日历类。我的问题是日历不能正确地打印月份的第一天是星期六。我已经看了我的代码大约一个小时了，我不确定哪里出了问题。我用Zeller的同余来计算月的第一天，它由“h”表示。 例如，2008年3月的日历（错误）如下所示： 这是我的代码：
-
问题内容： 我试图获取给定月份和年份的第一个日期和最后一个日期。我使用以下代码以yyyyMMdd格式获取最后日期。但是无法获得这种格式。另外，我希望开始日期采用相同的格式。我仍在努力。任何人都可以帮助我修复以下代码。 问题答案： 获取 开始日期 （ 注意 ：在开始日期中， 日期 = 1） 对于格式化
-
问题内容： 我在sql server中有一个datetime列及其可选字段，如果用户决定不输入，那么我想在表中插入NULL值，并定义如下内容： 当我插入sql server时，我在asp.net中有此代码 但问题是：其插入 在SQL表而不是 我在这里做错了什么？ 更新： 问题答案： 假设您有： 如果您想插入SQL NULL，那么您应该下一步： 意思是： 如果要在函数中注意可空的datetime，则
-
我有一本书。包含以下列的csv文件：名称、日期、信息、统计信息、更多信息 我想进口这个。csv文件（使用Python 3.6代码或Pandas） 然后我需要过滤列：NAME，DATE，INFO 这是我有麻烦的地方，我需要采取我的. csv文件的'日期'列，其中列出了一个日期为1/16/2016，并将其分开，这样我就可以只选择月份为我的过滤. csv输出文件。 我最后要读的专栏，比如名字、月份、信息