demeterz
Newbie | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Доброго времени суток!!! 1. Как сделать средствами VBA так что бы была привязка файла к данному компьютеру. Т.е., к примеру, к сведениям активации: пользователь, или id; но лучше, мне кажется, к имени компьютера: полное имя. Привязывать к компьютеру хорошо бы по нескольким этим параметрам. Мне это нужно для защиты от копирования, чтобы при открытии на другом пк все сведения внутри листов обнулялись (это я уже нашел как сделать см. код ниже), а вот привязать к одному компьютеру файл xls не смог. ' Замена формул на значения во всех ячейках Public Sub Formul_0() With ActiveSheet.UsedRange .Value = .Value ' здесь можно поставить и так: .Value = 0 тогда будут нули... End With End Sub 2. Так же необходимо что бы не было видно формул забитых в ячейки, ни при редактировании ячейки, ни в строке формул средствами VBA... Но самое главное оставить доступ к редактированию ячеек пользователем!!! Способ: "Войти в формат ячейки (ячеек) и в "защите" установить "скрыть формулы". Затем защитить лист, разрешив, например, все действия." ... Не подходит, хотя если это единственный, то.... Хотя (размышления) если макросы будут отключены, то формулы все равно ведь будут видны..... . Тогда, наверное, стандартными, а не программными (VBA) лучше скрыть формулы в ячейках... Пока остановился на следующем: ActiveSheet.Protect 'защита листа, пароль вот только не смог посатвить Application.DisplayFormulaBar = False 'показ строку ввода формул Application.ActiveSheet.Range("A1:IV65536").FormulaHidden = True 'скрыть формулы в выбранном диапазоне, но при этом должно быть прописано ActiveSheet.Protect По каким-то причинам выдает ошибку: ActiveSheet.Protect Password:="Protection" 'защита листа и установка пароля Может пригодиться кому: если человек неправильно ввел пароль или истек срок лицензии что бы файл при закрытии не спрашивал подтверждение о сохранении, а сразу закрывался и сохранялся с изменениями: ActiveWorkbook.Saved = True | Всего записей: 9 | Зарегистр. 30-01-2007 | Отправлено: 09:28 17-01-2010 | Исправлено: demeterz, 10:55 17-01-2010 |
|