使用输入作为显示日期的基础

时间:2015-10-20 22:29:26

标签: excel vba excel-vba excel-formula

我需要一种方法来使用userform上的输入来确定将在输出上显示的日期。这是我的代码:

Date - 1

基本上我需要将日期显示为11:59 PM or 23:59当StatusBox.Value的输入小于或等于StatusBox时,.userPicture字段上的输入将始终位于12小时格式。

1 个答案:

答案 0 :(得分:0)

此解决方案假设如下:

  • StatusBox.Value是使用时间格式(不包含日期)格式化的Excel序列号,因此StatusBox.Value是十进制数,其值范围为{{1} } (零)0,表示从0.99988426 (12:00:00 AM)0:00:00 <的时间em>(晚上11:59:59)。因此,当此序列号达到24小时变为23:59:59(一)时。

基于以上内容替换此:

1 ...

用这个

If StatusBox.Value <= "23:59" ...

但如果If StatusBox.Value <= 1包含StatusBox.Value,则将其用作替换行:

[expected Date value] ...

enter image description here