So the whole thing will be:
With OutMail
Dim SubjectText as String
Dim ComboOne as String
Dim ComboTwo as String
.To = TextBox19.Text & ";" & TextBox18.Text & ";" & TextBox15.Text & ";" & TextBox16.Text
.CC = TextBox24.Text & ";" & TextBox25.Text
.BCC = ""
'IF CONDITION STATEMENT...................
If TextBox41 = "" Then
SubjectText = TextBox10.Text & "/" & TextBox1.Text
Else
SubjectText = TextBox10.Text & "/" & TextBox1.Text & " & " & TextBox41
End If
If ComboBox1 = "Y" then
ComboOne = "Hello"
Else
ComboOne = ""
End If
If ComboBox2 = "Y" then
ComboTwo = "World"
Else
ComboTwo = ""
End If
.Subject = SubjectText & ComboOne & ComboTwo
CT:
.HTMLBody = RangetoHTML(Rng)
.Display
End With
Bookmarks