Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Как отключить блокировку окон word при вызове формы https://www.cyberforum.ru/ vba/ thread2145017.html
Добрый день! Может кто нибудь знает и сможет подсказать. Проблема такая, у меня есть макрос автозаполнения, соответственно к нему привязана форма где текстбоксы куда я забиваюи данные, а они в свою очередь забиваются в шаблон документа по нажатию кнопки. Проблема в том, что при вызове формы я не могу копировать из других документов word данные, то есть пока не заполню форму и не нажму...
Поиск с *, если не удовлетворяет, Ворд VBA
здравствуйте как делать поиск макросом когда находит много текста, а я знаю, что он должен быть не более 80 знаков, то я переставляю курсор сначала влево, потом вправо на 80 знаков, и со следующим текстом который подходит под поиск пролетаю, так как видимо макрос считает, что он там уже поискал и этим переставлением курсора его видимо не обманешь: With ActiveDocument.Range.Find ...
VBA Дублирование ячеек Есть макрос. 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 = Array(10, 11, 12, 13, 14, 15, 16, 17) 'Columns where you want data be copied' n = UBound(colRange) - LBound(colRange) https://www.cyberforum.ru/ vba/ thread2144984.html VBA Прикрепить файл справки СНМ https://www.cyberforum.ru/ vba/ thread2144975.html
Здраствуйте. у меня большая просьба помогите прикрепить файл справки СНМ в VBA Заранее благодарен
VBA Debug.Print ActiveDocument.Paragraphs(m).Range
здравствуйте, строками кода в Ворде получаю много текста, как получить текст строго до абзаца? который в Ворде выглядит как символ (¶)? For m = 1 To ActiveDocument.Paragraphs.Count With ActiveDocument.Paragraphs(m) Debug.Print ActiveDocument.Paragraphs(m).Range Next m это мне нужно для поиска нужного в абзаце, думаю делать так: For m = 1 To...
VBA Границы печати принтера Коллеги, надо из ВБА (программно) получить границы печати принтера https://www.cyberforum.ru/ vba/ thread2144950.html
VBA Перенос значений из формы Access в Word - VBA Есть форма (Главная), в которую вводятся значения. Эти значения нужно подставить в шаблон Word (Кнопка "Печать"). С закладками все работает, когда строка в таблице только одна, но основная проблема в том, что количество строк в таблице может быть изменено (от 1 до 5). Изменение предполагается с помощью флажков на форме. К сожалению, ничего не нашел. Помогите База во вложении. Заранее спасибо https://www.cyberforum.ru/ vba/ thread2144948.html VBA Переконвертировать из Excell в Word
Дали задание. Переконвертировать таблицу из Microsoft Excell в Microsoft Word. Версия 2003 года. Как правильно написать? Изучаю Microsoft Visual Basic 6.
VBA Циклы с заранее неизвестным числом повторений https://www.cyberforum.ru/ vba/ thread2144559.html
В лабораторной дано индивидуальное задание: Фабрика "GRM pic" выпускает два вида каш для завтрака -"Crunchy" и "Chewy". Используемые в производстве обоих продук¬тов ингредиенты в основном одинаковы и, как правило, не являются дефицитными. На настоящий момент нет никаких ограничений на возможные объемы продаж. Имеется возможность продать всю про¬изведенную продукцию. В табл. К 13.1 указано число...
VBA Изменение параметров линий - по определенным критериям Добрый день, гуру экселя. Помогите решить проблему. В определенном диапазоне листа B11:L31 находится множество разноцветных линий. В ячейку N5 - вписано название первой Линии-образца (которая находится на ячейке выше). В ячейку R5 - вписано название второй Линии-образца. В ячейку N9 - вписано название первой сменной Линии-образца (которая находится на ячейке выше). В ячейку R9 - вписано... https://www.cyberforum.ru/ vba/ thread2144542.html
Поиск и копирование накопительных итогом VBA
Всем привет. К сожалению на просторах интернета не нашел интересующей информации. Имеем файл в котором практические нет уникальных значений, нужно посредством впр найти все совпадения и через запятую перечилсить или можно не запихивать в одну ячейку а сделать это в одной строке но других столбца
VBA Объединение нескольких строк в 1 Добрый день! Есть данные, которые могут располагаться в ячейках с А15:А70. Данные расположены в 4 строки. Начинаются они всегда с заголовка "Реквизиты". В следующей строке располагается текст "ИНН:", далее "КПП:", далее "Кор.сч.:" Необходимо объединить данные строк "ИНН:", "КПП:", "Кор.сч.:" в одну строку через пробел, удалив все до знака ":". И переместить результат в ячейку А5, а эти... https://www.cyberforum.ru/ vba/ thread2144410.html
Заблокирован
30.11.2017, 21:10 0

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

30.11.2017, 21:10. Показов 7993. Ответов 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
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.11.2017, 21:10
Готовые ответы и решения:

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

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

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

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

5
30.11.2017, 21:10
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.11.2017, 21:10
Помогаю со студенческими работами здесь

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

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

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

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru