Hej har problem med att få datum via userform, jag har en knapp som jag vill använda till detta, nu har jag lagt in så att datumet alltid kommer i dokumentet men vill inte ha det så.

Bifogar min kod.

Private Sub cmdAdd_Click()


Dim irow As Long
Dim ws As Worksheet
Set ws = Worksheets("sheet4")


'Lämnar alltid en tom rad först
irow = ws.Cells(Rows.Count, 1) _
.End(xlUp).Offset(1, 0).Row

If Trim(Me.numbers.Value) = "" Then
MsgBox "Write number"
Me.numbers.SetFocus
Exit Sub
End If



ws.Cells(irow, 1).Value = Me.numbers.Value
ws.Cells(irow, 4).Value = Me.txtso.Value
ws.Cells(irow, 6).Value = Me.txtbeskrivning.Value
ws.Cells(irow, 7).Value = Me.txthours.Value
ws.Cells(irow, 10).Value = Me.txttime.Value
ws.Cells(irow, 11).Value = Me.txttime2.Value
ws.Cells(irow, 9).Value = Format(Now(), "YYYY/MM/DD")