VBA

Форум программистов и сисадминов Киберфорум

Войти

Другие темы раздела
VBA Изменение параметров линий - по определенным критериям https://www.cyberforum.ru/ vba/ thread2144542.html Добрый день, гуру экселя. Помогите решить проблему. В определенном диапазоне листа B11:L31 находится множество разноцветных линий. В ячейку N5 - вписано название первой Линии-образца (которая... Эталонные линии 1-1 и 2-1, нужны для того, чтобы макрос понял - линии с какими параметрами изменять в диапазоне. Может макрос умней меня и поймёт, но я не понял ничего сменить параметры линий в...	VBA Прикрепить файл справки СНМ Здраствуйте. у меня большая просьба помогите прикрепить файл справки СНМ в VBA Заранее благодарен У вас есть файл СНМ, и его нужно открыть с помощью vba? Что по вашему означает - прикрепить файл в vba, расшифруйте. https://www.cyberforum.ru/ vba/ thread2144975.html
VBA Объединение нескольких строк в 1 Добрый день! Есть данные, которые могут располагаться в ячейках с А15:А70. Данные расположены в 4 строки. Начинаются они всегда с заголовка "Реквизиты". В следующей строке располагается текст... В модуль: Function Реквизиты() Dim rx As Range, rf As Range, r, c, i, t, u Set rf = Range("A15:A70") Set rx = rf.Find("Реквизиты") If Not rx Is Nothing Then r = rx.Row ...	VBA Границы печати принтера Коллеги, надо из ВБА (программно) получить границы печати принтера
*VBA Поиск с , если не удовлетворяет, Ворд** https://www.cyberforum.ru/ vba/ thread2144985.html здравствуйте как делать поиск макросом когда находит много текста, а я знаю, что он должен быть не более 80 знаков, то я переставляю курсор сначала влево, потом вправо на 80 знаков, и со следующим...	VBA Перенос значений из формы Access в Word - VBA https://www.cyberforum.ru/ vba/ thread2144948.html Есть форма (Главная), в которую вводятся значения. Эти значения нужно подставить в шаблон Word (Кнопка "Печать"). С закладками все работает, когда строка в таблице только одна, но основная проблема в...
Поиск и копирование накопительных итогом VBA Всем привет. К сожалению на просторах интернета не нашел интересующей информации. Имеем файл в котором практические нет уникальных значений, нужно посредством впр найти все совпадения и через... Спасибо всем за помощь. На просторах интернета нашел ответ на свой вопрос, но пришлось постараться, если кому то пригодится, во вложении.	VBA Переконвертировать из Excell в Word Дали задание. Переконвертировать таблицу из Microsoft Excell в Microsoft Word. Версия 2003 года. Как правильно написать? Изучаю Microsoft Visual Basic 6. Изучаю Microsoft Visual Basic 6. каким боком тут тогда VBA?
VBA Циклы с заранее неизвестным числом повторений https://www.cyberforum.ru/ vba/ thread2144559.html В лабораторной дано индивидуальное задание: Фабрика "GRM pic" выпускает два вида каш для завтрака -"Crunchy" и "Chewy". Используемые в производстве обоих продук¬тов ингредиенты в основном одинаковы... в задание не вникал, а чисто по сабжу Do While .... Loop	VBA Дублирование ячеек https://www.cyberforum.ru/ vba/ thread2144984.html Есть макрос. Sub copyTable() Dim colRange As Variant colRange = Array(1, 2, 3, 4, 5, 6, 7) 'Columns where your data is' Dim destColRange As Variant destColRange =... То же самое, только с переносом на другую страницу. (спасибо vikttur) Sub copyTable2() Const lClmn As Long = 5 ' проверяемый столбец' Const lMaxLen As Long = 20 ' допустимая длина текста' Dim...
VBA Как отключить блокировку окон word при вызове формы Добрый день! Может кто нибудь знает и сможет подсказать. Проблема такая, у меня есть макрос автозаполнения, соответственно к нему привязана форма где текстбоксы куда я забиваюи данные, а они в... UserForm1.Show 0ноль добавьте в ваш код. https://www.cyberforum.ru/ vba/ thread2145017.html	VBA Debug.Print ActiveDocument.Paragraphs(m).Range здравствуйте, строками кода в Ворде получаю много текста, как получить текст строго до абзаца? который в Ворде выглядит как символ (¶)? For m = 1 To ActiveDocument.Paragraphs.Count ... https://www.cyberforum.ru/ vba/ thread2144968.html

~~Остап Бонд~~

Заблокирован

30.11.2017, 21:10

Блокировать листы в Excel после определенной даты - VBA - Ответ 11900028

30.11.2017, 21:10. Показов 8213. Ответов 5

Метки (Все метки)

Сообщение было отмечено KrisTal как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub Auto_Open()
Dim n As Date, x As Worksheet
For Each x In Worksheets
  If IsDate(x.Range("F1")) Then
    n = x.Range("F1")
    If Date - n > 1 Then
      
      x.Unprotect 1234 'не нужна эта строка, если лист защищен с опцией UserInterfaceOnly:=True
      
      x.Cells.Locked = True 'блокируем все ячейки
 
      x.Range("A1,A3,B4:B7").Locked = False 'разблокируем нужные
      
      x.Protect Password:="1234", UserInterfaceOnly:=True
    End If
  End If
Next
End Sub

Вернуться к обсуждению:
Блокировать листы в Excel после определенной даты VBA

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

30.11.2017, 21:10

Готовые ответы и решения:

Ограничение фунционала базы после определенной даты
Доброго времени суток! Вопрос в следующем: Есть база данных с формами на локальных компах и таблицами на серваке. Возможно ли сделать...

Запретить открытие документа после определенной даты
Можно ли запретить открытие документа после определенной даты? Можно написать макрос, но макросы можно же и не запускать. Есть другие...

Копировать одноименные листы из файлов Excel в один файл Excel
nshardarbekov@mail.ru Добрый день, уважаемые! Помогите пожалуйста создать макрос, для того чтобы собрать (скопировать) листы с...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

30.11.2017, 21:10

Помогаю со студенческими работами здесь

Программа должна работать до определенной даты у пользователя, независимо, что он выставит в настройках даты и времени
Добрый день, уважаемые! Уже сломал голову, но ничего не могу придумать. Дело вот в чем: есть программа (клиент обращений в поддержку),...

Копировать листы из файлов Excel в один файл Excel
Добрый день, господа! Помогите создать макрос, для того чтобы собрать(скопировать) листы из разных файлов Excel в один файл Excel. ...

При выборе даты в календаре - заполнять ячейки по порядку до определенной даты и рядом высвечивать день недели
Здравствуйте. Нужна ваша помощь. В программе есть написанный на VBA календарь. нужно написать код, что бы при выборе даты заполнялись...

Перенос данных excel -excel на разные листы
Доброго времени суток. Возникла небольшая проблема: Переношу данные из книги в книгу, но в каждой книге по 3 листа, а данные...

Блокировать диапазон ячеек макросом, в зависимости от текущей даты
Доброго времени суток. Есть документ Excel, в нем код на блокировку столбцов, в зависимости от значения в ячейке, вот сам код: ...

Новые блоги и статьи Все статьи Все блоги /
Исследование байт-кода Python: подключаем дизассемблер stackOverflow 19.02.2025 Многие знают, что Python - интерпретируемый язык, но мало кто задумывается о том, что происходит между написанием кода и его выполнением. На самом деле Python использует промежуточное представление. . .	Исследование байт-кода Python: компиляторы против интерпретаторов stackOverflow 19.02.2025 Понимание байт-кода Python - основополагающий аспект для разработчиков, стремящихся глубже понять внутренние механизмы языка и оптимизировать производительность своих программ. Байт-код представляет. . .	Comprehensions в Python - что это такое? stackOverflow 19.02.2025 Когда речь заходит о Python, одной из его самых красивых и мощных возможностей являются списковые включения или comprehensions. Это особые синтаксические конструкции, позволяющие создавать новые. . .	Python правда такой медленный? Развенчиваем миф о медлительности stackOverflow 19.02.2025 Когда речь заходит о выборе языка программирования для нового проекта, вопрос производительности часто становится одним из ключевых факторов. Python, несмотря на свою популярность и простоту. . .	Динамические формы в Flask stackOverflow 19.02.2025 Работа с веб-формами часто требует гибкости в отношении количества полей, которые пользователь может заполнить. Представьте ситуацию, когда вам нужно создать форму для ввода контактных данных, где у. . .
Обнаружение объектов в реальном времени на Raspberry Pi с OpenCV и Movidius NCS stackOverflow 19.02.2025 Технология обнаружения объектов в реальном времени становится все более востребованной в различных областях - от систем безопасности до автономных транспортных средств. Особый интерес представляет. . .	где chromium хранит пароли и как их обнулить в пожарном варианте jigi33 19.02.2025 Where is the chromium browser stores passwords for a sites где chromium-подобный браузер хранит пароли и как их обнулить в пожарном варианте (see screenshot)	howto get access to external internet resources with kinit jigi33 19.02.2025 Решение проблемы с необходимостью доп. авторизации по Керберос для автоотработки аутентификации на прокси-сервер (see screenshot)	Отслеживание автомобилей и определение скорости с OpenCV и Python на Raspberry Pi stackOverflow 19.02.2025 В этой статье мы рассмотрим создание системы отслеживания транспортных средств и определения их скорости с использованием компьютерного зрения и библиотеки OpenCV. Наше решение основано на принципе. . .	ENV (environments) valid paths in linux jigi33 19.02.2025 Environments paths (see screenshot)

Наверх