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

Вход

Регистрация

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

 

= Мир MS Excel/Права только на добавление текста - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Права только на добавление текста (Форматирование/Formattings)
Права только на добавление текста
Asretyq Дата: Среда, 04.04.2018, 07:43 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 104
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Доброго утра всем
Возможно ли в ексели ввод данных в ячейки одними пользователями без прав удаления и редактирования?
Только полные права у одного пользователя, ну или у админа!
Прикреплять файл думаю нет смысла
 
Ответить
СообщениеДоброго утра всем
Возможно ли в ексели ввод данных в ячейки одними пользователями без прав удаления и редактирования?
Только полные права у одного пользователя, ну или у админа!
Прикреплять файл думаю нет смысла

Автор - Asretyq
Дата добавления - 04.04.2018 в 07:43
китин Дата: Среда, 04.04.2018, 07:49 | Сообщение № 2
Группа: Модераторы
Ранг: Участник клуба
Сообщений: 5071
Репутация: 807 ±
Замечаний: 0% ±

Excel 2007;Excel 2010


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщениеможет поможет?

Автор - китин
Дата добавления - 04.04.2018 в 07:49
Asretyq Дата: Среда, 04.04.2018, 08:05 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 104
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
китин, это не то, тогда может создать условие например если ячейка пуста, тогда можно ввести текст, если заполнена, то запрещено редактирование. Можно ли применить эту идею?
 
Ответить
Сообщениекитин, это не то, тогда может создать условие например если ячейка пуста, тогда можно ввести текст, если заполнена, то запрещено редактирование. Можно ли применить эту идею?

Автор - Asretyq
Дата добавления - 04.04.2018 в 08:05
pechkin Дата: Среда, 04.04.2018, 09:16 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 255
Репутация: 31 ±
Замечаний: 0% ±

2003
Здравствуйте! А может так подойдет?
К сообщению приложен файл: _1.xls(18.5 Kb)


Сообщение отредактировал pechkin - Среда, 04.04.2018, 09:22
 
Ответить
СообщениеЗдравствуйте! А может так подойдет?

Автор - pechkin
Дата добавления - 04.04.2018 в 09:16
Asretyq Дата: Среда, 04.04.2018, 09:37 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 104
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
pechkin, можно обойти эту защиту, выделив несколько ячеек можно форматировать текст, который уже заполнен
 
Ответить
Сообщениеpechkin, можно обойти эту защиту, выделив несколько ячеек можно форматировать текст, который уже заполнен

Автор - Asretyq
Дата добавления - 04.04.2018 в 09:37
pechkin Дата: Среда, 04.04.2018, 10:00 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 255
Репутация: 31 ±
Замечаний: 0% ±

2003
Вы правы! Обойти можно любую защиту В файле поправил по выделению более одной ячейки, а с форматированием не понял...
К сообщению приложен файл: 4913511.xls(23.0 Kb)
 
Ответить
СообщениеВы правы! Обойти можно любую защиту В файле поправил по выделению более одной ячейки, а с форматированием не понял...

Автор - pechkin
Дата добавления - 04.04.2018 в 10:00
sboy Дата: Среда, 04.04.2018, 10:04 | Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 2105
Репутация: 604 ±
Замечаний: 0% ±

Excel 2010
pechkin, а зачем цикл по ячейкам, если выделить можно только одну?)
Вот подправил чуток
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count > 1 Then
        Cells(1, 1).Select
        Exit Sub
    End If
    If Target = "" Then Exit Sub
    If Target = Range("A1") Then Exit Sub
    MsgBox "РЕДАКТИРОВАНИЕ ЗАПРЕЩЕНО"
    Cells(1, 1).Select
End Sub
[/vba]
[p.s.]И старайтесь выкладывать решение в пост
К сообщению приложен файл: _1-3-.xls(31.0 Kb)
 
Ответить
Сообщениеpechkin, а зачем цикл по ячейкам, если выделить можно только одну?)
Вот подправил чуток
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count > 1 Then
        Cells(1, 1).Select
        Exit Sub
    End If
    If Target = "" Then Exit Sub
    If Target = Range("A1") Then Exit Sub
    MsgBox "РЕДАКТИРОВАНИЕ ЗАПРЕЩЕНО"
    Cells(1, 1).Select
End Sub
[/vba]
[p.s.]И старайтесь выкладывать решение в пост

Автор - sboy
Дата добавления - 04.04.2018 в 10:04
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Права только на добавление текста (Форматирование/Formattings)
  • Страница 1 из 1
  • 1
Поиск:

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