Private Sub UserForm_Initialize()
With ComboBox1
    .Value = "UK"
    .AddItem "UK"
    .AddItem "Ireland"
End With
With ComboBox2
    .Value = "Complaints Adjudicator"
    .AddItem "Complaints Adjudicator"
    .AddItem "Complaints Signer/Authoriser"
    .AddItem "Complaints Support"
    .AddItem "Complaints Team Leader"
    .AddItem "Complaints Technical Adviser"
    .AddItem "Office of the Managing Director"
End With
With ComboBox3
    .Value = "Financial Ombudsman Service"
    .AddItem "Financial Ombudsman Service"
    .AddItem "Financial Services Ombudsman's Bureau"
    .AddItem "Pensions Ombudsman"
    .AddItem "Data Protection"
End With
With ComboBox4
    .Value = "sincerely"
    .AddItem "sincerely"
    .AddItem "faithfully"
End With
    TxtClerkName.Text = Application.UserName
 
    TxtCC.Enabled = False
    TxtCC.BackColor = RGB(194, 194, 194)
End Sub