Hi GMU

In my opinion, the correct code is
Private Sub Cbn_Send_Click()
  Dim OutObj As Object  ' Late binding
  Dim Email As Object
  Dim Msg As String
  Dim Ind As Integer
  Dim sReceiver As String
  ' Find mail adress
  sReceiver = Worksheets("Param").Range("A:A").Find(What:=Me.ComboBox1.Value).Offset(0, 1).Value
  ' Create OUTLOOK instance
  Set OutObj = CreateObject("Outlook.Application")
  ' Create container object for mail
  Set Email = OutObj.CreateItem(0)
  ' Create email : Object, corp post, receiver
  Email.Subject = "Notification of Issue"
  ' Initialize message
  Msg = ""
  ' For every control, no loop needed
  Msg = Msg & Me.Label1.Caption & " : " & Me.ComboBox1.Value & vbCrLf
  Msg = Msg & Me.Label4.Caption & " : " & Me.ComboBox2.Value & vbCrLf
  Msg = Msg & Me.Label2.Caption & " : " & Me.ComboBox3.Value & vbCrLf
  Msg = Msg & Me.Label5.Caption & " : " & Me.TextBox1.Value & vbCrLf
  Msg = Msg & Me.Label3.Caption & " : " & Me.ComboBox4.Value & vbCrLf
  Msg = Msg & Me.Label6.Caption & " : " & Me.ComboBox5.Value & vbCrLf
  Msg = Msg & Me.Label7.Caption & " : " & Me.TextBox3.Value & vbCrLf
  Msg = Msg & Me.Label8.Caption & " : " & Me.ComboBox6.Value & vbCrLf
  Msg = Msg & Me.Label9.Caption & " : " & Me.TextBox4.Value & vbCrLf
  Msg = Msg & Me.Label10.Caption & " : " & Me.TextBox5.Value & vbCrLf
  Msg = Msg & Me.Label11.Caption & " : " & Me.TextBox6.Value & vbCrLf
  Msg = Msg & Me.Label12.Caption & " : " & Me.ComboBox7.Value & vbCrLf
  Msg = Msg & Me.Label13.Caption & " : " & Me.TextBox7.Value & vbCrLf
  ' Register message in body
  Email.Body = Msg
  ' Possible to add attachment
  'Email.Attachments.Add sPath & sFic
  '
  Email.To = sReceiver
  ' Send mail directly
  'Email.Send
  ' Or see mail
  Email.Display
  ' Clean object
  Set Email = Nothing
  Set OutObj = Nothing
End Sub
use the syntax : Me("ControlName" & ControlIndex) or use : Me.ControlFullName
not both at the same time

@+