Страницы: 1
RSS
Сохранение данных Userform при закрытии книги
 
Добрый вечер.
Делаю книгу, на каждом листе которой будет распологаться форма с определенными checkbox.
Есть ли возможность сохранить данные формы при выходе?

Если нет простых способов, то я попытаюсь при каждом изменении чекбокса в ячейку A1 записывать данные, типа: 1,0,1,1,1,0,1 итд, где 1 - чекбокс true, 0 - false. И при открытии книги или активации листа будет считываться эта строка и выставлять нужные значения в чекбоксы.
Может есть более простой способ? Поделитесь, пожалуйста. Буду признателен.
Спасибо.
 
Сохраняет же данные чекбоксов!
 
прочитать
 
Можно писать в tag этих чекбоксов. Каждому о нём.
Или такую строку писать в CustomDocumentProperties - только нужно поискать, куда именно.
P.S. Нашёл пример кода:

Код
Sub Save_Val_in_DocProp() ' сохранить в CustomDocumentProperties текущей книги значение
Dim sMyVal$: sMyVal = "MyVal" ' значение, которое нужно сохранить
With ThisWorkbook.CustomDocumentProperties
On Error Resume Next
.Add Name:="BookSetting", LinkToContent:=False, Type:=msoPropertyTypeString, Value:=""
.Item("BookSetting").Value = sMyVal
End With
End Sub

Sub Restore_Val_from_DocProp() ' считать из CustomDocumentProperties текущией книги сохранённое значение
Dim sMyVal$
On Error Resume Next
sMyVal = ThisWorkbook.CustomDocumentProperties.Item("BookSetting").Value
If Err Then sMyVal = "Error"
End Sub


Или можно писать строку в имена.
Изменено: Hugo - 27.08.2013 22:54:11
 
Спасибо всем.
Попытаюсь попробовать все и сообщить о результатах.
Страницы: 1
Наверх