从今天的日期获取月份和年份
Sub automation()
Dim wsheet As Worksheet
Dim month As Integer
Dim year As Integer
Set wsheet = Application.Workbooks("try").Worksheets("try")
month = Application.WorksheetFunction.month(Date)
year = Application.WorksheetFunction.year(Date)
End Sub
共有1个答案
您可能会遇到一些问题，因为您使用变量名month和year隐藏了一些现有函数month和year。因此，使用不同的变量名：
Dim m As Integer
Dim y As Integer
然后要么：
m = DatePart("m", Date)
y = DatePart("yyyy", Date)
或：
m = month(Date)
y = year(Date)
m = Evaluate("MONTH(""" & Date & """)")
y = Evaluate("YEAR(""" & Date & """)")
month = VBA.DateTime.Month(Date)
year = VBA.DateTime.Year(Date)
-
我不确定这是否可能？ 我得拿到密码才能读 今天的月份即2月今天的日期即17月底的日期即31日，然后是一年中的其他11个月，在一行中按顺序排列 8月1日-31日|9月|10月|11月|12月|1月|2月|3月|4月|5月|6月|7月 请以最佳方式提供任何建议？ 多谢 定时（timing的缩写）
-
问题内容： 我需要像’Jan 2008’这样的SQL Server中日期时间的月份+年。我按月，年对查询进行分组。我已经搜索并找到了datepart，convert等功能，但是似乎没有一个有用的功能。我在这里想念什么吗？有这个功能吗？ 问题答案： 如果您想让它们以字符串形式返回，则应采用这种格式； 这是其他格式选项
-
问题内容： 我正在做一些报告，我想获取特定月份（例如2014年1月）中的所有日期，以及执行此“ SQL”时的日期： 我想得到这个清单： 如果我这样做“ SQL”： 我想得到这个清单： 如果我这样做“ SQL”： 我想得到这个清单： 这有可能吗，还是我应该自己为下一个100年绘制日期表：） 问题答案： 这是此问题的mysql / java解决方案。 创建表语句： Java代码： 我使用此sql获取日
-
我需要一个可配置的格式作为输出。 我将永远只获得从“01”到“31”的日期字符串 我将永远只获得从“1000”到“9999”的年份字符串 我将永远只获得从“01”到“12”的月份字符串（永远不获得一月、二月等） 我知道SimpleDateFormat（format）可以在一定程度上起作用。 类似于：
-
在给定年、月和周的情况下，是否有可能获得一周中第一个日期的DAYOFMONTH？ 请注意，一周的第一个日期也可能是前一个月，甚至是前一年。 我知道这是可以通过编程实现的，至少使用java。时间、时间场等。。但我想在sql查询级别上这样做，因为当涉及周时，过程中会涉及两个额外的参数，即被视为一周的第一天的DayOfWeek和一个月内一周的最小天数。如果sql和api上的配置不完全相同，则可能会导致不
-
当我使用以下代码时，Object错误。 谁能告诉我如何从年、月和日的值中获取Date对象？