Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Настройка макроса при заблокированной странице - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Настройка макроса при заблокированной странице (Макросы/Sub)
Настройка макроса при заблокированной странице
Kombinator Дата: Среда, 28.01.2015, 21:36 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 48
Репутация: 0 ±
Замечаний: 20% ±

Excel 2003
Добрый вечер уважаемые пользователи контента.

Столкнулся с проблемой:

1. В случае если заблокировать возможность редакции в ячейках которые заполнять нельзя макрос при нажатии кнопки save не очищает страницу BLANK до конца.

2. Просьба посмотреть макрос сохраняет в листе DATA с переменным успехом только когда первая строка уже заполнена.
К сообщению приложен файл: 7995255.rar (81.1 Kb)


Сообщение отредактировал Kombinator - Среда, 28.01.2015, 21:38
 
Ответить
СообщениеДобрый вечер уважаемые пользователи контента.

Столкнулся с проблемой:

1. В случае если заблокировать возможность редакции в ячейках которые заполнять нельзя макрос при нажатии кнопки save не очищает страницу BLANK до конца.

2. Просьба посмотреть макрос сохраняет в листе DATA с переменным успехом только когда первая строка уже заполнена.
Автор - Kombinator
Дата добавления - 28.01.2015 в 21:36
Wasilich Дата: Среда, 28.01.2015, 23:18 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Чёй то, у меня конвертер не раскрывает. :( Или это только у меня?
Да и, не мешало бы 3-й пункт правил до конца читать.
Цитата
Старайтесь прилагать файлы в версии Excel 2003-го офиса(xls), так как эти файлы могут открыть пользователи с любой версией Excel
А это значит, что помощь могли бы оказать обладатели всех версий.
 
Ответить
СообщениеЧёй то, у меня конвертер не раскрывает. :( Или это только у меня?
Да и, не мешало бы 3-й пункт правил до конца читать.
Цитата
Старайтесь прилагать файлы в версии Excel 2003-го офиса(xls), так как эти файлы могут открыть пользователи с любой версией Excel
А это значит, что помощь могли бы оказать обладатели всех версий.
Автор - Wasilich
Дата добавления - 28.01.2015 в 23:18
RAN Дата: Среда, 28.01.2015, 23:33 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Как защитить лист от пользователя, но не от макроса?

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеКак защитить лист от пользователя, но не от макроса?
Автор - RAN
Дата добавления - 28.01.2015 в 23:33
Kombinator Дата: Четверг, 29.01.2015, 18:48 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 48
Репутация: 0 ±
Замечаний: 20% ±

Excel 2003
Wasilic, Добрый вечер доюовляю версию в 2003 Excel разобраться по прежнему не получилось.

Надеюсь на вашу помощь.

RAN, Ознакомился со статьёй весьма и весьмы но к сожалению как не проывал нечего не получается
К сообщению приложен файл: Red_Bud_Slittin.rar (79.4 Kb)


Сообщение отредактировал Kombinator - Четверг, 29.01.2015, 18:49
 
Ответить
СообщениеWasilic, Добрый вечер доюовляю версию в 2003 Excel разобраться по прежнему не получилось.

Надеюсь на вашу помощь.

RAN, Ознакомился со статьёй весьма и весьмы но к сожалению как не проывал нечего не получается
Автор - Kombinator
Дата добавления - 29.01.2015 в 18:48
RAN Дата: Четверг, 29.01.2015, 18:55 | Сообщение № 5
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Как не пробовал, вижу, а как пробовал - нет.

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеКак не пробовал, вижу, а как пробовал - нет.
Автор - RAN
Дата добавления - 29.01.2015 в 18:55
Kombinator Дата: Четверг, 29.01.2015, 19:08 | Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 48
Репутация: 0 ±
Замечаний: 20% ±

Excel 2003
RAN, Пардон вот файл в котором я произвёл манипуляции пишет ошибку RUN TIME ERROR 1004
К сообщению приложен файл: Experimental.rar (78.7 Kb)
 
Ответить
СообщениеRAN, Пардон вот файл в котором я произвёл манипуляции пишет ошибку RUN TIME ERROR 1004
Автор - Kombinator
Дата добавления - 29.01.2015 в 19:08
RAN Дата: Четверг, 29.01.2015, 19:43 | Сообщение № 7
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
[vba]
Код
Sub Protect_for_User_Non_for_VBA()
     Sheets(2).Protect Password:="1111", UserInterfaceOnly:=True
     Sheets("DATA").Protect Password:="1111", UserInterfaceOnly:=True
     Sheets(2).[a8:a30] = "работает"
     Sheets("DATA").[b21:s21] = "работает"
      
     ' и что сие за лист?
'    Sheets("????1").Protect Password:="1111", UserInterfaceOnly:=True
End Sub
[/vba]

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[vba]
Код
Sub Protect_for_User_Non_for_VBA()
     Sheets(2).Protect Password:="1111", UserInterfaceOnly:=True
     Sheets("DATA").Protect Password:="1111", UserInterfaceOnly:=True
     Sheets(2).[a8:a30] = "работает"
     Sheets("DATA").[b21:s21] = "работает"
      
     ' и что сие за лист?
'    Sheets("????1").Protect Password:="1111", UserInterfaceOnly:=True
End Sub
[/vba]
Автор - RAN
Дата добавления - 29.01.2015 в 19:43
Kombinator Дата: Четверг, 29.01.2015, 22:52 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 48
Репутация: 0 ±
Замечаний: 20% ±

Excel 2003
RAN, К сожалению я не силён в макросах, скажите могу я вас попросить настроить данную функцию

буду вам весьма признателен
 
Ответить
СообщениеRAN, К сожалению я не силён в макросах, скажите могу я вас попросить настроить данную функцию

буду вам весьма признателен
Автор - Kombinator
Дата добавления - 29.01.2015 в 22:52
RAN Дата: Четверг, 29.01.2015, 23:16 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
В статье по ссылке все подробно расписано, в т.ч. и как автоматически ставить такую защиту.
Вышеприведенный код тоже рабочий.
Что вам не ясно?

Быть или не быть, вот в чем загвоздка!

Сообщение отредактировал RAN - Четверг, 29.01.2015, 23:16
 
Ответить
СообщениеВ статье по ссылке все подробно расписано, в т.ч. и как автоматически ставить такую защиту.
Вышеприведенный код тоже рабочий.
Что вам не ясно?
Автор - RAN
Дата добавления - 29.01.2015 в 23:16
Wasilich Дата: Пятница, 30.01.2015, 12:27 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Цитата Kombinator, 28.01.2015 в 21:36, в сообщении № 1
если заблокировать возможность редакции в ячейках которые заполнять нельзя макрос при нажатии кнопки save не очищает страницу BLANK до конца.
Не снята защита с ячейки "Название клиента" - E7:G7.
Да и сам код очистки ячеек можно короче написать [vba]
Код
Range("E2:F2").ClearContents
[/vba]
Цитата Kombinator, 28.01.2015 в 21:36, в сообщении № 1
макрос сохраняет в листе DATA с переменным успехом только когда первая строка уже заполнена.
В строке [vba]
Код
rinda = Sheets("DATA").Range("B9").End(xlDown).Row
[/vba] "В9" замените на "В8"


Сообщение отредактировал Wasilic - Пятница, 30.01.2015, 12:34
 
Ответить
Сообщение
Цитата Kombinator, 28.01.2015 в 21:36, в сообщении № 1
если заблокировать возможность редакции в ячейках которые заполнять нельзя макрос при нажатии кнопки save не очищает страницу BLANK до конца.
Не снята защита с ячейки "Название клиента" - E7:G7.
Да и сам код очистки ячеек можно короче написать [vba]
Код
Range("E2:F2").ClearContents
[/vba]
Цитата Kombinator, 28.01.2015 в 21:36, в сообщении № 1
макрос сохраняет в листе DATA с переменным успехом только когда первая строка уже заполнена.
В строке [vba]
Код
rinda = Sheets("DATA").Range("B9").End(xlDown).Row
[/vba] "В9" замените на "В8"
Автор - Wasilich
Дата добавления - 30.01.2015 в 12:27
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Настройка макроса при заблокированной странице (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!