Convidado 24/5/2012, 13:49
Boas Nardiron, crie uma tabelas: TblLog com dois campos (ID_Log e HistoricoLog) sendo o ultimo do tipo memorando
Em um botão ou no evento que achar conveniente
Private Sub cmdSalvar_Click()
Dim X, VarTemp
For X = 0 To Me.lista.ListCount - 1
VarTemp = VarTemp & " - " & Me.lista.Column(0, X)
Next X
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO tblLog (HistoricoLog) Values ('" & VarTemp & "' )"
DoCmd.SetWarnings True
End Sub
Cumprimentos.