1.如何在excel中快速输入一个月的日期
1、首先,我们打开WPS表格软件,然后新建一个文件
2、比如,想在一行里快速输入2018年3月份的日期,先输入一个2018/3/1,如下图所示。
3、已经输入了第一个起始日期时,然后再选中30个单元格,如下图所示。
4、然后依次点击表格菜单里的 行和列-填充-序列,点击进去
5、然后选择行-日期,点击确定即可。
6、通过以上几步,来看看效果吧
2.excel表格中,求符合条件的时间代码
用下面这段代码吧
在数据表中,用鼠标右键点工作表标签名,选"查看代码",弹出Vba窗口,注意窗口的标题栏上是当前数据表的名字(不要搞错位置,否则代码无效),把下面代码复制进去就行了.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False '抑制事件
x = [a65536].End(xlUp).Row '计算数据共有几行,所以A列的数据行不不能小于整个表格的有效数据行数
For i = 2 To x
If Cells(i, 4) > 0 Or Cells(i, 5) = "*" Then Cells(i, 6) = Now()
If Cells(i, 7) > 0 Or Cells(i, 8) = "*" Then Cells(i, 9) = Now()
Next
Application.EnableEvents = True
End Sub
代码的做用是先判断数据行数,然后判断D\E列的内容(D对应4,E对应5;同理,还要判断G与H,分别对应7与8列),符合要求时,就生成时间.
3.Excel表格中如何输入时间的VBA代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Or Target.Cells.Count > 1 Then Exit Sub
Application.EnableEvents = False
Select Case Target.Column
Case Is = 7
If Target.Value > 0 Then
With Target.Offset(0, -4)
if .value > 0 then
else
.Value = Now
.NumberFormatLocal = "yyyy-m-d h:mm;@"
end if
End With
End If
End Select
Application.EnableEvents = True
End Sub
4.EXCEl表格里如何输入自定义格式的日期
Excel无法直接以自定义的格式来输入日期(在使用VBA的情况下可以)。但是可以输入完日期之后再进行自定义日期格式。
输入完日期之后,可以在单元格上右键,选“单元格格式”,在第一个标签页里面选“自定义”,在右边输入你想要自定义的格式。或者在下面的列表里面选你需要的格式。
时间和日期代码常用日期和时间代码:
“YYYY”或“YY”:按四位(1900~9999)或两位(00~99)显示年
“MM”或“M”:以两位(01~12)或一位(1~12)表示月。
“DD”或“D”:以两位(01~31)或一位(1-31)来表示天。
例:代码:“YYYY-MM-DD”。2005年1月10日显示为:“2005-01-10”
5.EXCEL输入时间方法
共同学习一下
我也是才会
资料:
大家都知道,在Excel 中输入时间是需要带上冒号的,如果有大量的时间值等待输入的话,这个冒号可得耽误不少功夫,而且又容易输入错误。
有什么好办法可以解决这个难题呢?当然是用嵌套在Excel里的利器VBA了!以下就是所有源代码,只要您按照我的说法一步一步做下去,即使对这些代码一点也不懂,也能依葫芦画瓢,迅速实现在Excel中不必输入冒号就能输入时间值的效果!
一、启动Excel,打开您需要大量输入时间值的那个工作簿,然后按Alt-F11,启动VBA编辑器。
二、选择菜单中“插入”——“添加模块”命令。这时,在屏幕左上方“工程”窗口中,会出现一个“模块”的子目录,在它的右侧,显示着刚刚添加进来的模块“Module1”,您可以将它改名为您所喜欢的名字如“fasttime”。
三、双击模块“fasttime”(如果您修改过模块名称的话),在右侧的代码编辑器中输入以下代码(或者从我的示例工作簿中复制)。
Option Explicit
Sub Auto_Open()
Application.OnEntry = "Fast" '每当工作表内容发生变化时就运行指定过程
End Sub
Sub Fast()
On Error GoTo EnterError '如果有错误就跳往EnterTimeError语句
If Intersect(Application.Caller, Range("fasttime")) Is Nothing Then
Exit Sub '如果是非"fasttime"区域的单元格被改变,则结束过程
End If
'如果输入值小于1或者大于2400,则显示对话框用户输入值非法
If Application.Caller < 1 Or Application.Caller > 2400 Then
MsgBox "对不起,您的输入值非法!", vbExclamation
Application.Caller.Value = ""
Exit Sub
End If
'\ 将输入值改成 HH:MM格式
Application.Caller.Value = Format(Application.Caller, "00:00")
Exit Sub
EnterError:
Exit Sub
End Sub
四、把您将要大量输入时间值的单元格区域命名为“fasttime”。命名方法为,先将需要命名的单元格区域抹黑,然后选择Excel的菜单命令“插入”——“命名”——“定义”,在“在当前工作簿中的名称”栏中输入“fasttime”,最后按确定即可。
好了,完工!现在往“fasttime”区域里输入时间值试试看,是不是不用冒号了!?这里需要注意的是,输入值必须介于1到2400之间,否则将被视作非法值。举个例子来说,如果您需要输入上午九点二十分这样一个时间值,您就只需要输入0920这样一个数字就行了,Excel将在单元格中显示为“09:20 AM”;如果您需要输入晚上一十一点一十五分这样一个时间值,您就只需要输入2315这样一个数字就行了,Excel将在单元格中显示为“11:15 PM”。是不是很方便?
6.excel 表格日期格式 设置
解决excel 表格日期格式 设置的步骤如下:
1.选中一个空白单元格,左手按住Ctrl,右手按下冒号键,就可以快速输入当天的日期。
2.选中单元格,鼠标右键 -【设置单元格格式】。
3.然后,选择【日期】,并在【类型】处用鼠标选择一个格式,这时在上面的【示例】处就可以看到单元格显示的预览效果了。
4.我们选择一个日期格式,然后再点击【自定义】就可以看到【类型】下面的自定义代码:yyyy/m/d。对于日期来说:y代表年份,m代表月份,d代表日。这样就解决了excel 表格日期格式 设置的问题了。
转载请注明出处育才学习网 » excel时间代码怎么写