下午,
我有一个函数可以根据日期计算星期几名称:
Function calcWeekdayName(calcDate As Date) As String
Dim calcWeekday As Integer
calcWeekday = Weekday(calcDate, vbMonday)
calcWeekdayName = weekdayName(calcWeekday, True, vbMonday)
End Function
Run Code Online (Sandbox Code Playgroud)
然后我使用一个公共变量将日期传递给这个函数。公共变量在表 2 上声明:
Public searchDate As Date
Run Code Online (Sandbox Code Playgroud)
然后在我的函数下面的子中设置变量:
searchDate = Worksheets("Update Data").Range("B3").Value
Run Code Online (Sandbox Code Playgroud)
更新数据上的 B3 格式为 dd/mm/yyyy
当我尝试使用函数和 searchDate 变量设置变量 weekdayName 时,我得到了 ByRef 参数类型不匹配。
在工作表 2 上:
Public weekdayName As String
Run Code Online (Sandbox Code Playgroud)
在子:
weekdayName = calcWeekdayName(searchDate)
Run Code Online (Sandbox Code Playgroud)
B3 的当前值是 28/03/2016 但我也尝试过 01/01/2016。
干杯
我想测试不包含特定子字符串的字符串
示例字符串是:
event2
event23,event1,event67=12
event1,event30
event23
event2
event2,event23
Run Code Online (Sandbox Code Playgroud)
我想匹配不包含event2
.
因此,以下字符串应该匹配:
event23,event1,event67=12
event1,event30
event23
到目前为止,我可以event2
使用以下表达式匹配 do 包含的字符串:
/^.*(\bevent2\b)/gm
但我不知道如何将其与负面前瞻结合起来。
这似乎不起作用:
/^.*(?!.*(\bevent2\b))/gm
我在单元格中有许多字符串,这些字符串是日期,但它们需要转换为日期格式.
它们采用以下格式:
mmm dd, yyyy
Run Code Online (Sandbox Code Playgroud)
例如:
Feb 10, 2016
Run Code Online (Sandbox Code Playgroud)
所以它们的长度可以是11或12:
Feb 1, 2016
Run Code Online (Sandbox Code Playgroud)
我已经开始编写一个函数来单独解析字符串的每个部分(日为整数,月为整数,年为整数)然后转换为日期格式.
首先,有一种比上面更容易/更光滑的方法吗?
如果没有更简单的方法,最好的方法是将3个字母的月份(例如2月或3月或4月)转换为月份数字(例如2或3或4)?因为这是我真正坚持的唯一一点.