Hello all,
I'm working on a form named frmJobNote that will be a daily diary for project managers for their jobs. My goal is to have them press a command button on another from that opens frmJobNote in continuous form view. There would only be one text box, txtJobNote. I hope to have the current date populate the txtJobNote when frmJobNote is opened. The project manager would then write any notes they have after the date. Then they would use list box lbxEquipment to select the equipment that was on the job that day. The equipment would be entered after the project managers notes.
Currently I'm using the following code I found thanks to AccessForums.net.
Code:
Private Sub lbxEquip_Click()Dim strSelected As String
Dim varItem As Variant
Dim ctl As Control
With Me.lbxEquip
For Each varItem In .ItemsSelected
strSelected = strSelected & "," & .ItemData(varItem)
Next varItem
Me.txtNotes = Mid(strSelected, 2)
End With
End Sub
This code works great, but It deletes the text already in txtJobNote and records column(0) when I would like it to record column(1) and column(2).
Could anyone give me advice on getting a list box populate a text box after the text already existing as well as record my second and third column?
Thank you for having a look,
John