Beste
Hieronder is een code die werkt om met textboxen een userform van Outlook in email body om te zetten
Hoe zet je radio buttons om in die email body heb al verscheidene sites bezocht maar niets gevonden
Dit is de code die werkt
De radio buttons zijn telkens in een group gezet
Dit is een voorbeeld van een group radio buttons
- Site (radio buttons in die group zie hieronder)
HO: genaamd optHO
TC: genaamd optTC
Hieronder is een code die werkt om met textboxen een userform van Outlook in email body om te zetten
Hoe zet je radio buttons om in die email body heb al verscheidene sites bezocht maar niets gevonden
Dit is de code die werkt
Code:
Sub cmdadd_click()
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
On Error Resume Next
With OutMail
.To = ""
.CC = ""
.BCC = ""
.Subject = "Call management"
.Display
.Body = "Target date = " & call_management_form.TextBox5.Value & vbNewLine & _
"Room name = " & call_management_form.TextBox1.Value & vbNewLine & _
"Door number = " & call_management_form.TextBox2.Value & vbNewLine & _
"Short description = " & call_management_form.TextBox3.Value & vbNewLine & _
"Room name = " & call_management_form.TextBox4.Value & vbNewLine
End With
On Error GoTo 0
Set OutMail = Nothing
Set OutApp = Nothing
End Sub
De radio buttons zijn telkens in een group gezet
Dit is een voorbeeld van een group radio buttons
- Site (radio buttons in die group zie hieronder)
HO: genaamd optHO
TC: genaamd optTC