That's what the code does ie. what you asked for. Change the ComboBox1_Change macro to perform the tasks according to the selection e.g

Private Sub ComboBox1_Change()
        Select Case ComboBox1.value
            Case "Requires further investigation":
                TextBox2.Text = "Lorem ipsum dolor sit amet, consectetur adipiscing elit. In rhoncus, lorem et fringilla dictum, orci orci posuere lacus, ut auctor libero neque non purus. Fusce a commodo ligula."
            Case "Urgent review":
                TextBox2.Text = "Proin sed nisl enim. Cras in nisl tempus, scelerisque mi id, vulputate arcu. Duis nec mi ac lorem pretium semper."
            Case "Manageable risk":
                TextBox2.Text = "Fusce eu nisi sollicitudin, pharetra nibh sed, vestibulum neque. Praesent a auctor turpis. Mauris posuere vitae justo ac mollis."
            Case "For Noting Only":
                TextBox2.Text = "Sed eu eros ipsum. Ut posuere id magna eu sollicitudin. Nunc suscipit tempor egestas. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos."
            Case Else
                TextBox2.Text = ""
        End Select
lbl_Exit:
    Exit Sub
End Sub
I am not sure why you have the similar code in the initialization macro as it is doing nothing there.