Is it on a userform? If so, then

If Me.OptionButton1.Value Then
sOne = "Horse"
Else
sOne = "Pig"
End If

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Alen32" wrote in message
lkaboutsoftware.com...
I wamt to make third option button where is possible to choose both horse
and pig. Whta I need to change in my code?

If .OptionButton1 Then
sOne = "Horse"
Else
sOne = "Pig"