请用sql存储过程写一个输入日期显示当天是这一年中的第多少天和第几周
2016-07-13
展开全部
1、按ALT+F11进入VBE窗口
2、如果你的表在sheet1中,你就点左边工程管理器里的sheet1(总之你在哪个表中要实现这个功能就点开哪个工作表)。
3、在右边的窗口中输入下边代码:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(2, 3).Value <> "" Then
Cells(2, 10).Value = Format(Date, "yyyy:mm:dd")
Else
Cells(2, 10).Value = ""
End If
End Sub
2、如果你的表在sheet1中,你就点左边工程管理器里的sheet1(总之你在哪个表中要实现这个功能就点开哪个工作表)。
3、在右边的窗口中输入下边代码:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(2, 3).Value <> "" Then
Cells(2, 10).Value = Format(Date, "yyyy:mm:dd")
Else
Cells(2, 10).Value = ""
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询