S
Steve
Hi all,
Using the code below was expecting it too place the current date into
cell h(irow), but am coming up with a compile error.
Any help please
Private Sub cmdadd_Click()
Dim iRow As Long
With Me
iRow = .ComboBox1.ListIndex + 2
Worksheets("All Deals").Cells(iRow, "e").Value
= .TextBox2.Text
Worksheets("All Deals").Cells(iRow, "h").Value = .Format(Date,
"dd/mmm/yy")
End With
Me.ComboBox1.Value = ""
Me.TextBox1.Value = ""
End sub
Using the code below was expecting it too place the current date into
cell h(irow), but am coming up with a compile error.
Any help please
Private Sub cmdadd_Click()
Dim iRow As Long
With Me
iRow = .ComboBox1.ListIndex + 2
Worksheets("All Deals").Cells(iRow, "e").Value
= .TextBox2.Text
Worksheets("All Deals").Cells(iRow, "h").Value = .Format(Date,
"dd/mmm/yy")
End With
Me.ComboBox1.Value = ""
Me.TextBox1.Value = ""
End sub