将stringinput数据改为周/月格式
我不知道这是否可能,但我想我会问,如果有人可以有一个解决scheme。
问题:我有一个macros,用户在input框中input一个string(例如021513)的date。 它是string格式,因为它用来打开一个文件(string在文件名的末尾)。
从这个string(例如021513),我需要在两个单独的字段中派生出以下内容:
- 周周期(例如,周:11日至15日)。
- 月(例如二月)。
任何帮助或想法将不胜感激。
夏兰
你也可以用Excel公式做到这一点:
假定您的string是单元格A1,请使用以下公式:
- B1(date):
=DATE(right(A1,2)+2000,LEFT(A1,2),MID(A1,3,2))
- C1平日:
=WEEKDAY(B1,2)
– 星期一返回1,星期二返回2。 - D1星期开始:
=B1-C1+1
- E1周末:
=D1+4
- F1月份:
=TEXT(B1,"MMMM")
您需要DateSerial
VBA函数 – 它将使用Mid
和其他文本函数从string的各个部分返回实际的Date值。 有实际的date,你将能够返回例如使用Month
function的Month
。
也许还需要使用CInt
将string部分转换为数字。