日历插件怎么写

1.excel 日历控件将 ActiveCell = Format(Calendar1.value, "yyyy-mm-dd")替换为
ActiveCell = Calendar1.Value
将 If Target.Column = 1 Then
Me.Calendar1.Visible = True
Else
Me.Calendar1.Visible = False
End If
替换为
【日历插件怎么写】Application.ScreenUpdating = False
If Target.Row = 1 Then; 在制定行显示
Selection.NumberFormatLocal = "yyyy-mm-dd"
Me.Calendar1.Visible = True
Else
Me.Calendar1.Visible = False
End If
只在第一行可用;这样应该可以了

日历插件怎么写

文章插图