Why is it that this will not set OptionButton1 to true? rng has been
defined and set rng = Cells(ActiveCell.Row, 1). pto is what is in the
referenced cell.

If rng(1, 8).Value = "pto" Then
OptionButton1.Value = True

for an optionbutton on the worksheet

? Activesheet.optionbutton1.value
False
Activesheet.optionbutton1.Value = True
? Activesheet.optionbutton1.value
True

on a userform

Private Sub UserForm_Initialize()
OptionButton1.Value = True
End Sub

both worked for me.

Perhaps the IF is not being satisfied.

--
regards,
Tom Ogilvy


"Patrick Simonds" wrote in message
...
Why is it that this will not set OptionButton1 to true? rng has been
defined and set rng = Cells(ActiveCell.Row, 1). pto is what is in the
referenced cell.

If rng(1, 8).Value = "pto" Then
OptionButton1.Value = True