No sé si me expliqué bien, quiero decir si el mensaje va a ser, por ejemplo
Y si en algún control del formulario tienes lo que aparece en el asunto, que dependa de cada registro o no lo hay y el "asunto" va a ser para todos igual. Lo mismo para el mensaje
O si va a llevar algún archivo adjunto, por ejemplo
Por ejemplo, supongamos que tengo el formulario
Si pulso el botón
El código del botón es
DoCmd.GoToRecord , , acFirst
For i = 1 To Me.Recordset.RecordCount
If Not IsNull([Email]) Then
DoCmd.SendObject acSendNoObject, , "MS-DOSText(*.txt)", " & Me.Email & ", , , "" & Me.Asunto & "", "" & Me.Mensaje & "", False
End If
DoCmd.GoToRecord , , acNext
Next
En caso de que no hayas esos campos, sólo el email
Pulso el botón
El código es
DoCmd.GoToRecord , , acFirst
For i = 1 To Me.Recordset.RecordCount
If Not IsNull([Email]) Then
DoCmd.SendObject acSendNoObject, , "MS-DOSText(*.txt)", " & Me.Email & ", , , "Como te dije en veces anteriores", " Aquí se acaban las relaciones", False
End If
DoCmd.GoToRecord , , acNext
Next
Por eso te decía que si no concretas más, va a ser difícil.