Hi @Dave-ITMan, please try this switch condition code
Switch(
ddType.Selected.Value,
"Nobody Affected", DateAdd(Now(), Value(Left(Label1.Text, 1)), Mid(Label1.Text, Find(" ", Label1.Text) + 1)),
"Only Affecting One Person", DateAdd(Now(), Value(Left(Label1_1.Text, 1)), Mid(Label1_1.Text, Find(" ", Label1_1.Text) + 1)),
"Affecting Group of People", DateAdd(Now(), Value(Left(Label1_2.Text, 1)), Mid(Label1_2.Text, Find(" ", Label1_2.Text) + 1)),
"Affecting a Department", DateAdd(Now(), Value(Left(Label1_3.Text, 1)), Mid(Label1_3.Text, Find(" ", Label1_3.Text) + 1)),
"Affecting Entire Business", DateAdd(Now(), Value(Left(Label1_4.Text, 2)), Mid(Label1_4.Text, Find(" ", Label1_4.Text) + 1))
)
This code finds the value you wanted to add in the date
Value(Left(Label1.Text, 1))
While this code will find the time units you wanted to use (Days, Hours, Minutes)
Mid(Label1.Text, Find(" ", Label1.Text) + 1)
I have tested it on my end and it works, I've included screen for your reference.

Hope this helps!