View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Claud Balls Claud Balls is offline
external usenet poster
 
Posts: 72
Default OptionButton value

Private Sub CommandButton1_Click()
If ActiveSheet.Range("A6") = "" Then
OptNoL.Value = True
ElseIf ActiveSheet.Range("A6") = 30 Then
opt30L.Value = True
ElseIf ActiveSheet.Range("A6") = 60 Then
opt60l.Value = True
End If
End Sub



*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!