Как запомнить положение переключателя при закрытии книги???

[Stasss]

Здрасти,
есть вопросик как сделать так что бы OptionButton запомнился при закрытии документа
заранее бошое спасибо

[bi-lya]

1. Сохранять в той же книге, вроде того:
при переключении

Код: Выделить всё

Private Sub OptionButton1_Click()
  If OptionButton1.Value = True Then
    Range("a1").Value = 1
  Else
    Range("a1").Value = 0
  End If
End Sub

и при инициализации формы

Код: Выделить всё

  If Range("a1").Value = 1 Then
    OptionButton1.Value = True
  Else
    OptionButton1.Value = False
  End If

2. Сохранять в реестр

[Aent]

Достаточно для OptionButton прописать property ControlSource.
Укажите адрес ячейки и в ней будут автоматически сохранятся значения контрола
сразу после их изменения.
Код не нужен

[bi-lya]

admitted