Question

我插入Microsoft Date and Time Picker Control，version 6.0)控件后编辑源代码，如下所示，

Option Explicit
Private Sub DTPicker1_Change()
ActiveCell.Value = DTPicker1.Value
DTPicker1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Me.DTPicker1
If Target.Row = 1 And Target.Count = 1 Then
.Visible = True
.Width = Target.Width + 15
.Left = Target.Left
.Top = Target.Top
.Height = Target.Height
Else
.Visible = False
End If
End With
End Sub
但是最终出来的却是横的，并不是一列的，请问这是为什么，我用的是07版的EXCEL

Answer 1

不了解