Auto Fill Question

[Ammodog]

I have a Table TblMsgBank With that I have a Form with a list box of Login Id's and a text box for messages. I have code so that I can multi select individuls in the List box, My question is how can I select those multiple individuals and just type one message, and have the message prefile all of the records. Thanks You.

Here is the Code:

Private Sub Command4_Click()

Dim rst As DAO.Recordset
Dim LogIDs As Variant
Set rst = CurrentDb.OpenRecordset("tblMsgBank&quot

For Each LogIDs In Me.List2.ItemsSelected
rst.AddNew
rst!LoginID = Me.List2.ItemData(LogIDs)
rst.Update
Next LogIDs

Set rst = Nothing
End Sub

Christopher Abney
"There is no limit to the good you can do if you dont care who gets the credit"
[Afro]

 

[AccessAce]

It looks like all you are missing is the
rst!Message = Me.txtMessage

Do this before the update and that should put the message from the txtMessage control with every selected LogID.

 

[Ammodog]

Thanks Sometimes we all lose our minds sometimes LOL!

Christopher Abney
"There is no limit to the good you can do if you dont care who gets the credit"
[Afro]