Как скопировать защищенную ячейку в excel

 Как скопировать данные с защищенного листа?

Предположим, вы получили файл Excel от другого человека, рабочие листы которого защищены пользователем, теперь вы хотите скопировать и вставить необработанные данные в другую новую книгу. Но данные на защищенном листе не могут быть выбраны и скопированы из-за того, что пользователь снял флажки «Выбрать заблокированные ячейки» и «Выбрать разблокированные ячейки» при защите рабочего листа. В этой статье я расскажу о некоторых быстрых приемах решения этой задачи в Excel.

документ копировать данные в защищенный лист 1

Скопируйте данные с защищенного листа с кодом VBA

Копирование данных с защищенного листа с помощью поля имени

стрелка синий правый пузырь Скопируйте данные с защищенного листа с кодом VBA

Следующий простой код может помочь вам скопировать данные в активный защищенный лист, сделайте следующее:

1. Активируйте защищенный лист, с которого вы хотите скопировать данные, а затем удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно, затем нажмите Ctrl + G Ключи для открытия Немедленная окно, а затем скопируйте приведенный ниже код сценария в Немедленная окна:

Activesheet.Cells.Select

документ копировать данные в защищенный лист 2

2. И нажмите Enter клавишу, затем нажмите Ctrl + C , чтобы скопировать данные листа, а затем активировать другую книгу или новый лист, куда вы хотите вставить этот лист, и поместите курсор в ячейку A1, а затем удерживайте Ctrl + V чтобы вставить его.

стрелка синий правый пузырь Копирование данных с защищенного листа с помощью поля имени

Если вам нужно скопировать определенный диапазон данных с листа защиты, вы можете применить Имя Box чтобы закончить эту работу.

1. Введите диапазон ячеек (D2: H13) в поле Имя Box напрямую и нажмите Enter ключ, см. снимок экрана:

документ копировать данные в защищенный лист 3

2. После нажатия Enter ключ, видимо ничего не происходит. Пожалуйста, ничего не делайте, просто нажмите Ctrl + C чтобы скопировать определенный диапазон, вы увидите, что данные в диапазоне D2: H13 были окружены пунктирной линией, см. снимок экрана:

документ копировать данные в защищенный лист 4

3, Затем нажмите Ctrl + V чтобы вставить его на другой лист, куда вы хотите скопировать данные.

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Комментарии (27)


Оценок пока нет. Оцените первым!

Источник

Как скопировать данные с защищенного листа?

На чтение 3 мин. Просмотров 1k. Опубликовано 23.05.2021

Предположим, вы получили файл Excel от другого человека, рабочие листы которого защищены пользователем. Теперь вы хотите скопировать и вставить необработанные данные в другую новую книгу. Но данные на защищенном листе не могут быть выбраны и скопированы из-за того, что пользователь снял флажки «Выбрать заблокированные ячейки» и «Выбрать разблокированные ячейки» при защите рабочего листа. В этой статье я расскажу о некоторых быстрых приемах решения этой задачи в Excel.

Копировать данные с защищенного листа с помощью кода VBA

Копировать данные с защищенного листа с помощью поля имени

Вкладка Office Включает редактирование и просмотр с вкладками в Office и делает вашу работу намного проще …

Подробнее … Бесплатная загрузка …

Kutools for Excel решает большинство ваших проблем и увеличивает ваши Производительность на 80%.

  • Повторное использование чего угодно: добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте их в будущем.
  • Более 20 текстовых функций: извлечение числа из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
  • Инструменты слияния: несколько книг и листов в одну; Объединить несколько ячеек/строк/столбцов без потери данных; Объедините повторяющиеся строки и суммируйте.
  • Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Из одной книги в несколько файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
  • Вставить пропуск скрытых/отфильтрованных строк; Подсчет и сумма по цвету фона; Массовая отправка персонализированных писем нескольким получателям.
  • Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделе, дню, частоте и т. Д. Фильтр жирным шрифтом, формулами, комментарием …
  • Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

Подробнее … Бесплатная загрузка …

->

Копировать данные из защищенных лист с кодом VBA

Следующий простой код может помочь вам скопировать данные в активный защищенный лист, сделайте следующее:

1 . Активируйте защищенный лист, с которого вы хотите скопировать данные, а затем удерживайте клавиши ALT + F11 , чтобы открыть окно Microsoft Visual Basic для приложений , затем нажмите клавиши Ctrl + G , чтобы открыть окно Немедленное , а затем скопируйте приведенный ниже код скрипта в окно Немедленное . :

Activesheet.Cells.Select

2 . И нажмите клавишу Enter , затем вы должны нажать Ctrl + C , чтобы скопировать данные листа, а затем активировать другую книгу или новый лист, куда вы хотите вставить этот лист и поместите курсор в ячейку A1, а затем удерживайте Ctrl + V , чтобы вставить его.

Копировать данные с защищенного листа с помощью поля имени

Если вам нужно скопировать определенный диапазон данные из защитного листа, вы можете применить Name Box , чтобы завершить эту работу.

1 . Введите диапазон ячеек (D2: H13) непосредственно в поле Имя и нажмите клавишу Enter , см. Снимок экрана:

2 . После нажатия клавиши Enter , очевидно, ничего не происходит. Пожалуйста, ничего не делайте, просто нажмите Ctrl + C , чтобы скопировать конкретный диапазон, после чего вы увидите, что данные в диапазоне D2: H13 были окружены пунктирной линией, см. Снимок экрана:

3 . Затем нажмите Ctrl + V , чтобы вставить его на другой лист, где вы хотите скопировать данные.

Источник
 

Добрый день, форумчани! Если в таблице зашишены несколько ячейки, то как их копировать и ставить в другое место (в том же листе), чтобы сохранялась зашита? Заранее блогадарю.
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

Выделить диапазон, Ctrl+C, поставить курсор на нужную ячейку, Ctrl+V.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 

Наверное я не правильно выразился. В таблицу периодически добавляются новые строки. Я хочу скопировать зашишенные ячейки с одной строки и  ставить их в другое место, так чтобы опять не понадобилось их зашишать.  
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

Признак заЩиты — это свойство ячейки. Когда копируете и вставляете ячейку(и) то и это свойство наследуется, как и формат, формулы и пр. содержимое.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 

?!  ест еще кто? :)
 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

Вам мало?
Чем не нравится ответ? Если не подходит, то причина  не в количестве помогающих, а в куцем описании проблемы.
 

Выделить диапазон, Ctrl+C, поставить курсор на нужную ячейку, Ctrl+V.   не помогает
 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

Я Вам скажу, что у меня кот живет с лошадиными ушами — поверите или показать попросите?  Как понять, что Вы делаете и как, на каком листе? Показывать на примере нужно.
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

bahruzbahruz, покажите, пожалуйста, в файле как есть после копипаста, объясните что не так, и на отдельном листе той же книги покажите как должно быть после копипаста.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 
JayBhagavan

, файл добавлен. Если без макроса не получается, пусть будет с макросом. Спасибо всем.
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

bahruzbahruz, теперь понятно. Когда лист защищён, то при копировании ячеек с защитой признак защиты не наследуется.
Надо понять, с какой целью Вы копируете яч. с защитой и тогда попробуем найти решение данного вопроса.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 

vitareiki

Пользователь

Сообщений: 82
Регистрация: 12.04.2017

На ЗАЩИЩЕННОМ ЛИСТЕ — многие Функции ОГРАНИЧЕНЫ или вообще НЕ РАБОТАЮТ !!!
ЕСЛИ это ваш файл и вы знаете ПАРОЛЬ, то как вариант, можно :
1 — сначала СНЯТЬ ЗАЩИТУ с листа
2 — скопировать что нужно …  

3 — и снова поставить ЗАЩИТУ

ЕСЛИ это чужой файл и вы НЕ знаете ПАРОЛЬ, то можно :
1 — просто СКОПИРОВАТЬ содержимое листа и вставить на другой лист
и можете редактировать содержимое листа как пожелаете ….

Из формулировки вопроса не совсем понятно, что ИМЕННО нужно сделать …
 

Добрый день. Но, ребята, что здесь не понятного. Хочу скопировать строку в котором имеется защищенные ячейки и ставить его в другом месте. В этом случае в вставленном сроке те ячейки которые имели защиты они оказываются не защищенными. Что надо делать, чтобы при копирование и вставке защита сохранялось? Чтобы заново их не приходилось защищать. Спасибо за понимание и терпение.
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

#14

21.10.2018 09:57:07

Цитата
bahruzbahruz написал: Что надо делать, чтобы при копирование и вставке защита сохранялось?

Снять защиту с листа, скопировать яч., вставить, установить защиту на лист.
Запишите эти действия в макросе, на лист добавьте кнопку, на кнопу повесьте макрос.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 

vitareiki

Пользователь

Сообщений: 82
Регистрация: 12.04.2017

#15

21.10.2018 12:56:55

bahruzbahruz

 что здесь не понятного ?.. Ну, ясно же написано :

Цитата
vitareiki написал:
На ЗАЩИЩЕННОМ ЛИСТЕ — многие Функции ОГРАНИЧЕНЫ или вообще НЕ РАБОТАЮТ !!!

в том числе и Команды «КОПИРОВАТЬ-ВСТАВИТЬ» — тоже ОГРАНИЧЕНЫ !!!  —  в частности, например, защита ячеек НЕ КОПИРУЕТСЯ, что вас как раз и не устраивает …
Вы работаете как раз на ЗАЩИЩЕННОМ ЛИСТЕ !!! — Следовательно, самый простой способ решения данного вопроса :

Цитата
vitareiki написал:
1 — сначала СНЯТЬ ЗАЩИТУ с листа ,..  2 — скопировать что нужно и вставить куда нужно ,..  3 — и снова поставить ЗАЩИТУ

ВСЕ ГЕНИАЛЬНОЕ — ПРОСТО !!!   :)

Изменено: vitareiki — 21.10.2018 13:08:08
 

всем спасибо. не возможно, значить не возможно. но очень жаль.
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

bahruzbahruz, возможно макросом. Вас устроит?

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 
 

JayBhagavan

Пользователь

Сообщений: 11833
Регистрация: 17.01.2014

ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64

Выделили что надо скопировать на защищённом листе, нажали кнопку, указали куда копировать, Ок или Отмена, если передумали.
Работает только для листа с именем «Sheet1». Если нужно для листа с другим именем, то измените значение константы s_WSH_NAME на требуемое.
Пароль на защиту сейчас пустой. Требуемый пароль присвойте константе s_PWD. Как защитить пароль от посторонних глаз — это уже поищите самостоятельно.

<#0>
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori

 
JayBhagavan

, большое спасибо. вот это то, что хотел. вы облегчили работу на многое.
 

Евгений Заикин

Пользователь

Сообщений: 6
Регистрация: 28.10.2021

#21

28.10.2021 16:02:55

Цитата
JayBhagavan написал:
Работает только для листа с именем «Sheet1». Если нужно для листа с другим именем, то измените значение константы s_WSH_NAME на требуемое.

кто подскажет как исправить этот макрос чтобы он работал на всех листах книги?
буду бесконечно благодарен!

поясню: если исправлять s_WSH_NAME на имя второго листа , на первом листе он перестает работать
 

New

Пользователь

Сообщений: 4582
Регистрация: 06.01.2013

#22

28.10.2021 16:18:08

не тестировал, но попробуйте

Код 
Public Const s_PWD As String = "" 'укажите пароль внутри кавычек

Sub jjj_copy_rng_on_protected_wsh()
    On Error GoTo err_handler
    If StrComp(TypeName(Selection), "Range", vbTextCompare) <> 0 Then Exit Sub
    'If StrComp(ActiveSheet.Name, s_WSH_NAME, vbTextCompare) <> 0 Then Exit Sub
    Dim vTmp As Variant
    On Error Resume Next
    Set vTmp = Application.InputBox(Type:=8, Prompt:="Укажите ячейку, куда скопировать выделенный диапазон.")
    If vTmp Is Nothing Then Exit Sub
    On Error GoTo err_handler
    'If StrComp(vTmp.Parent.Name, s_WSH_NAME, vbTextCompare) <> 0 Then Exit Sub
    If ActiveSheet.ProtectContents Then ActiveSheet.Unprotect s_PWD
    Selection.Copy vTmp
    If Not ActiveSheet.ProtectContents Then ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:=s_PWD
    On Error GoTo 0
err_handler:
    If Err <> 0 Then MsgBox Err.Number & " - " & Err.Description, vbCritical 'Else Debug.Print "Ladno!"
End Sub
 

Евгений Заикин

Пользователь

Сообщений: 6
Регистрация: 28.10.2021

#23

29.10.2021 09:50:34

Большое человеческое спасибо!
Источник

Как скопировать значения с защищенного листа

maryo

 Дата: Вторник, 12.06.2018, 11:24 |
Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

Уважаемые господа Программисты! У меня вопрос, как можно скопировать данные с защищенного листа только к «открытым» ячейкам другого файла? К примеру, у меня имеется файлы «Регион» и «Общий». Применял макросы но они дали ошибку — файл защищен. Ни как не смог скопировать значения листа «Сводный» файла Регион только «»открытым» ячейкам листа «Все» файла «Общий».

К сообщению приложен файл:

3848898.xlsx
(18.9 Kb)
 

Ответить

Nic70y

 Дата: Вторник, 12.06.2018, 11:51 |
Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 8136


Репутация:
1999
±

Замечаний:
0% ±


Excel 2010

только к «открытым» ячейкам другого файла?

а вообще думали, когда знали?

ЮMoney 41001841029809

 

Ответить

maryo

 Дата: Вторник, 12.06.2018, 12:20 |
Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

Nic70y, к «верхушке» не отправить- же файлы с формулами. Вот и суммирую по региону и этих сводных данных перекинув в пустую форму отправлю.

Сообщение отредактировал maryo — Вторник, 12.06.2018, 13:17
 

Ответить

StoTisteg

 Дата: Вторник, 12.06.2018, 12:41 |
Сообщение № 4

Группа: Авторы

Ранг: Старожил

Сообщений: 1161


Репутация:
103
±

Замечаний:
0% ±


Excel 2010

Подсказка: LibreOffice плевать хотел на все защиты.

Интуитивно понятный код — это когда интуитивно понятно, что это код.

 

Ответить

maryo

 Дата: Среда, 20.06.2018, 08:48 |
Сообщение № 5

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

Неужели никто не знает копирование значений (переброс данных без формул) в аналогичный защищенный лист файла эксель, в этом форуме ???

Сообщение отредактировал maryo — Среда, 20.06.2018, 08:49
 

Ответить

_Boroda_

 Дата: Среда, 20.06.2018, 09:13 |
Сообщение № 6

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16618


Репутация:
6465
±

Замечаний:
0% ±


2003; 2007; 2010; 2013 RUS

Поставьте прямые ссылки. Можно даже на закрытый файл.
Например, в А1 своего листа напишите

Код

=’G:МояСтереть[3848898.xlsx]Все’!A1

, где G:МояСтереть[3848898.xlsx] — путь к тому файлу, а Все — название листа

Скажи мне, кудесник, любимец ба’гов…
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

 

Ответить

SLAVICK

 Дата: Среда, 20.06.2018, 09:17 |
Сообщение № 7

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290


Репутация:
766
±

Замечаний:
0% ±


2019


Вам уже StoTisteg дал подсказку.
А вообще пишите формулу на незащищенном листе, в ячейку A1:

Применял макросы но они дали ошибку

макросом тоже можно — при чем макрос на одну строку…
[vba]

Код

Sheets(«Сводный»).Range(«a1:aa100»).Value = Sheets(«Куда скопировать»).Range(«a1:aa100»).Value

[/vba]

Иногда все проще чем кажется с первого взгляда.

 

Ответить

maryo

 Дата: Среда, 20.06.2018, 09:21 |
Сообщение № 8

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

_Boroda_, не вставить ссылку, а просто переносить только значения со сводного в пустой лист имеющий одинаковую структуру и защищенные ячейки.
Здесь просто макрос помогает.

Сообщение отредактировал maryo — Среда, 20.06.2018, 09:25
 

Ответить

maryo

 Дата: Среда, 20.06.2018, 09:34 |
Сообщение № 9

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

SLAVICK, касательно LibreOffice, просто с «верхушки» отправили эксель файл. Я свои сводные данные состоящий из формул должен переносить на их ни эксель файл. А касательно макроса попробую.

Сообщение отредактировал maryo — Среда, 20.06.2018, 09:35
 

Ответить

SLAVICK

 Дата: Среда, 20.06.2018, 09:35 |
Сообщение № 10

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290


Репутация:
766
±

Замечаний:
0% ±


2019

пустой лист …. и защищенные ячейки.

а зачем на пустом листе защита? — снимите ее.
КАК? — тут не спрашивайте — запрещено обсуждать по правилам форума — скажу только что в инете есть куча инфы по этому вопросу.

А касательно макроса попробую.

не этот макрос не поможет — он может скопировать значения С защищенного листа, но не В
Дам подсказку по подмене значений — копайте структуру файла, и xml листа:

Цитата

xlworksheetssheet1.xml

Иногда все проще чем кажется с первого взгляда.

 

Ответить

maryo

 Дата: Среда, 20.06.2018, 09:37 |
Сообщение № 11

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9


Репутация:
0
±

Замечаний:
0% ±


Excel 2016

запрещено обсуждать по правилам форума

SLAVICK, понимаю))) спасибо..
 

Ответить

boa

 Дата: Среда, 20.06.2018, 15:26 |
Сообщение № 12

Группа: Друзья

Ранг: Ветеран

Сообщений: 543


Репутация:
166
±

Замечаний:
0% ±


2013, 365

maryo, данные с защищенного листа?
да пожалуйста, хоть с закрытой книги
[vba]

Код

Option Explicit
Const Filename$ = «C:[путь к Excel’евскому файлу с данными]»

  Sub DownloadData()
    Dim sSQL$: sSQL = «select * from [Лист1$]»  ‘имя защищенного листа с данными и «$»
    Dim CON As Object: Set CON = ExcelConnect(Filename)
    Dim RST As Object: Set RST = CreateObject(«ADODB.Recordset»)
    Dim MyArr()
    RST.Open Source:=sSQL, ActiveConnection:=CON
    If Not RST.EOF Then
        With ActiveSheet
‘выгружаем все
        .Range(«A1»).CopyFromRecordset RST

‘ а можно конкретную ячейку выгрузить, например
‘        MyArr = RST.GetRows
‘        .Range(«A1») = MyArr(3, 4)  ‘4-я строка, 5-й столбец
        End With
    Else
        ‘ Если нет данных то вывод сообщения:
        MsgBox «Нет данных удовлетворяющих условиям.», vbInformation + vbOKOnly, «Ошибка»
    End If
    Set RST = Nothing
    Set CON = Nothing
End Sub

  Function ExcelConnect(ByVal PatchFile$, Optional TableHeader As Boolean = False) As Object
‘TableHeader — Отметить True, если есть заголовки у таблицы и надо к столбцам обращаться по имени,
‘ иначе к столбцам можно обращаться F1, F2, F3 и т.д.
    Dim VersionFile$
    Dim strCon$
    Select Case Split(PatchFile, «.»)(UBound(Split(PatchFile, «.»)))
        Case «xls»:  VersionFile = «Excel 8.0»
        Case «xlsb»: VersionFile = «Excel 12.0»
        Case «xlsm»: VersionFile = «Excel 12.0 Macro»
        Case «xlsx»: VersionFile = «Excel 12.0 Xml»
    End Select
    strCon = «Provider=» & IIf(Val(Application.Version) > 11, «Microsoft.ACE.OLEDB.12.0», «Microsoft.Jet.OLEDB.4.0») & «;» & _
              «Data Source=»»» & PatchFile & «»»;» & _
              «Extended Properties=»»» & VersionFile & «;HDR=» & IIf(TableHeader, «YES», «NO») & «»»;»
    Set ExcelConnect = CreateObject(«ADODB.Connection»)
    ExcelConnect.Open strCon
End Function

[/vba]

Сообщение отредактировал boa — Среда, 20.06.2018, 15:47
 

Ответить
Источник

Я защищал определенные ячейки в листе Excel без редактирования («Просмотр»> «Защищенный лист»), но при копировании листа заблокированные ячейки превращаются в незапертые ячейки, и пароль удаляется.

Я хочу скопировать лист из одной и той же книги на разные листы, а также сохранить пароль без разблокировки ячеек (редактирования) даже после копирования листа. Могу ли я сделать это, Мастера ???

Существует более одного способа копирования.

  • Если вы используете копирование и вставку для группы ячеек, защита не попадет.

  • Если щелкнуть правой кнопкой мыши вкладку с именем листа и выбрать «Копировать», вы можете скопировать весь лист в другую рабочую книгу или создать другой лист внутри текущей рабочей книги. Этот случай сохраняет защиту, означающую, что он там и с оригинальным паролем.

Пожалуйста, попробуйте это, 1. Скопируйте ячейку заблокирован / Защищенный лист.
2. Вставьте на следующий лист или любой другой лист.
3. Щелкните правой кнопкой мыши на вкладке.
4. И нажмите кнопку «Защитить лист».
5. Бинго! Вы найдете защищенные клетки как на исходном листе.

Спасибо,

как сохранить защиту

Всё ещё ищете ответ? Посмотрите другие вопросы с метками microsoft-excel microsoft-excel-2010 worksheet-function microsoft-excel-2007 cell-format.

Источник

В некоторых ситуациях, пользователям необходимо в Excel снять защиту листа, на который установлен пароль для защиты от изменений содержимого документа. Нам нужно получить доступ к редактированию или изменению листа книги Excel, не имея пароля.

Программа Excel входит в состав Microsoft Office, который массово используется в организациях и на предприятиях. В приложении создаются электронные таблицы для бухгалтерских, производственных или других нужд.

Содержание:

  1. Защита листа в Excel
  2. Как снять пароль с листа Excel при помощи архиватора
  3. Как убрать в Excel пароль на лист, используя Google Таблицы
  4. Выводы статьи

Часто доступ к одному документу есть у разных людей в силу производственных причин, для совместной работы над документами и т. д. Непреднамеренное или, наоборот, преднамеренное изменение документа Excel может привести к печальным последствиям, потому что, в этом случае, многочасовую работу придется заново переделывать.

Защита листа в Excel

В популярной программе Microsoft Excel существуют разные степени защиты документа, в том числе защита листа паролем. Это означает, что защищенный лист книги Excel нельзя отредактировать, внести в него изменения, потому что в программе работает функция защиты отдельного листа документа.

Самый надежный метод защитить документ Excel: установить пароль на Excel для открытия файла. В этом случае, другое лицо не сможет получить доступ к книге Excel без ввода правильного пароля.

Для снятия защиты с листа книги потребуется ввести пароль, после этого защита листа Excel будет отключена, содержимое документа можно изменить.

В некоторых ситуациях, необходимо снять защиту с листа Excel не зная пароля. Например, если пользователь забыл пароль защиты листа Excel, или пароль, записанный на бумаге, был утерян. Как снять защиту Excel не зная пароль?

Существуют несколько способов открыть Excel для редактирования, внесения изменений, если в книге установлен пароль на лист:

  • путем удаления участка кода, отвечающего за защиту, при помощи архиватора;
  • созданием копии документа с помощью онлайн сервиса Google Таблицы.

Инструкции подходят для использования в программах MS Office: Microsoft Excel 2019, Microsoft Excel 2016, Microsoft Excel 2013, Microsoft Excel 2010, Microsoft Excel 2007.

Как снять пароль с листа Excel при помощи архиватора

Первым способом мы изменим расширения у файла MS Excel для того, чтобы открыть файл с помощью архиватора, а затем вручную удалим участок кода, который защищает лист Excel от изменений.

Выполните следующие последовательные шаги:

  1. Откройте Проводник во вкладке «Вид», поставьте галку напротив пункта «Расширения имен файлов». Или включите отображение имен файлов из Панели управления, через Параметры Проводника.

расширения имен файлов

  1. Затем необходимо изменить расширение файла у документа (книги) Microsoft Excel. Измените расширение файла Excel с родного «.xlsx» на формат архива «.zip».
  2. В открывшемся окне с предупреждением согласитесь на переименование расширения файла.

Файл в формате «ZIP» можно открыть встроенным средством системы с помощью Проводника Windows, или с помощью стороннего архиватора, например, WinRAR или 7-Zip. Оба варианта ничем не отличаются. В этой статье я открываю файл в Проводнике.

файл excel в архиве

  1. После открытия файла в Проводнике или в архиваторе, войдите в папку «xl», а затем перейдите в папку «worksheets». Здесь вы увидите файлы «sheepN.xml» (N – порядковый номер листа книги Excel, в зависимости от того, сколько листов было создано в данной книге Excel).

выбор файла

  1. Выберите порядковый номер листа книги, на котором стоит защита. Скопируйте файл «sheepN.xml» на Рабочий стол компьютера (пока не закрывайте Проводник).

Проще всего открыть файл в формате «xml» в браузере, но в браузере у нас не получится внести изменения в открытом файле. Поэтому мы воспользуемся текстовым редактором Блокнот, который есть на любом компьютере.

  1. Откройте файл «sheepN.xml» в программе Блокнот. Войдите в меню «Правка» выберите «Найти…», или нажмите одновременно на клавиши клавиатуры «Ctrl» + «F».
  2. В окне «Найти» в поле «Что:» введите выражение: «sheetProtection», а затем нажмите на кнопку «Найти далее». Найденное выражение в окне Блокнота окрасится в синий цвет.

найти

  1. Далее необходимо удалить этот участок кода (внутри кода у вас будут другие знаки и цифры) с хешем и солями:
<sheetProtection algorithmName="SHA-512" hashValue="ZDUKlxPAXfhB1Gt+YKj/b1Lh4GmR0EKcmEgo51EUVMhWn0DfiTpP8UgzSX5xWjb34Y9hXGuYUA8XrGyYgghUeQ==" saltValue="iwbq55nXcLXy3mDXJUnXeg==" spinCount="100000" sheet="1" objects="1" scenarios="1"/>
  1. После удаления участка кода (код нужно удалить вместе с открывающимся и закрывающимся тегами, в виде горизонтальных стрелок «<» и «>»), изменения в файле.
  2. Скопируйте с заменой измененный файл с Рабочего стола обратно в архив, а затем закройте Проводник.
  3. Измените расширение файла Excel с «.zip» обратно на «.xlsx».

файл excel

Откройте документ Excel для того, чтобы убедиться в том, что защита с листа книги Excel снята. Пароль был удален, вы сможете вносить изменения в ячейки или диаграммы листа книги.

Как убрать в Excel пароль на лист, используя Google Таблицы

Следующим способом мы снимем защиту с листа Excel при помощи онлайн сервиса Таблицы Google, которые входят в состав облачного сервиса Google Диск.

Для этого выполните следующие действия:

  1. Добавьте защищенный файл Excel в облачное хранилище Google Диск.
  2. Кликните по загруженному файлу Excel правой кнопкой мыши, в контекстном меню сначала выберите «Открыть с помощью», а затем выберите «Google Таблицы».
  3. В таблице Гугла войдите в меню «Файл», в контекстном меню нажмите на пункт «Создать копию».
  4. В окне «Копирование документа» нажмите на кнопку «ОК».

копирование документа

  1. Перейдите в окно Google Диск, выберите созданную копию файла, скачайте копию файла Excel на компьютер.

Откройте скачанный файл Excel, убедитесь в отсутствии защиты листа. Лист книги теперь можно отредактировать.

Выводы статьи

Если у пользователя нет пароля от защищенного листа Excel, снять защиту можно при помощи удаления участка кода в файле Excel при помощи архиватора, или с помощью онлайн сервиса Google Таблицы.

Похожие публикации:

  • Как включить линейку в Word
  • Как посчитать количество символов в Word: все способы
  • 15 советов по работе в Word
  • Как сделать ссылку в документе Word
  • Как поставить пароль на документ Word
Источник

По умолчанию при защите всех ячеек все ячейки заблокированы, поэтому ни одна из них не может быть редактируемой. Чтобы включить редактирование некоторых ячеек, при этом другие ячейки можно разблокировать. Перед защитой листа можно заблокировать только определенные ячейки и диапазоны и при желании позволить определенным пользователям изменять только определенные диапазоны защищенного листа.

Блокировка только определенных ячеек и диапазонов ячеек на защищенном листе

Сделайте следующее:

  1. Если лист защищен, сделайте следующее:

    1. На вкладке Рецензировка нажмите кнопку Отостановка листа (в группе Изменения).

      Команда "Снять защиту листа"

      Нажмите кнопку Защитить лист, чтобы отопрестить защиту листа, если лист защищен.

    2. Если будет предложено, введите пароль, чтобы отоблести защиты.

  2. Выделите лист целиком, нажав кнопку Выделить все.

    Кнопка Выбрать все

  3. На вкладке Главная щелкните всплывающее кнопку запуска Формат шрифта ячейки. Вы также можете нажать клавиши CTRL+SHIFT+F или CTRL+1.

    Кнопка вызова диалогового окна "Формат ячеек"

  4. Во всплываемом окне Формат ячеек на вкладке Защита отоберем поле Блокировка и нажмите кнопку ОК.

    Вкладка "Защита" в диалоговом окне "Формат ячеек"

    При защите листа все ячейки будут разблокированы. Теперь вы можете выбрать конкретные ячейки, которые нужно защитить.

  5. Выделите на листе только те ячейки, которые необходимо заблокировать.

  6. Снова отключим всплывающее окно Формат ячеек (CTRL+SHIFT+F).

  7. В этот раз на вкладке Защита выберите поле Заблокировано и нажмите кнопку ОК.

  8. На вкладке Рецензирование нажмите кнопку Защитить лист.

    Команда "Защитить лист"

  9. В списке Разрешить всем пользователям этого таблицы выберите элементы, которые пользователи должны иметь возможность изменять.

    Дополнительные сведения об элементах листа

    Снятый флажок

    Запрещаемые действия

    выделение заблокированных ячеек

    Перемещение указателя на ячейки, для которых установлен флажок Защищаемая ячейка на вкладке Защита в диалоговом окне Формат ячеек. По умолчанию пользователям разрешено выделять защищенные ячейки.

    выделение незаблокированных ячеек

    Перемещение указателя на ячейки, для которых снят флажок Защищаемая ячейка на вкладке Защита в диалоговом окне Формат ячеек. По умолчанию пользователям разрешено выделять незаблокированные ячейки, а также перемещаться между незаблокированными ячейками на защищенном листе с помощью клавиши TAB.

    формат ячеек

    Изменение параметров в диалоговых окнах Формат ячеек или Условное форматирование. Если условное форматирование было применено до установки защиты листа, форматирование будет изменяться при вводе значения, удовлетворяющего определенному условию.

    форматирование столбцов

    Использование любых команд форматирования столбцов, включая изменение ширины столбца или скрытие столбцов (вкладка Главная, группа Ячейки, кнопка Формат).

    форматирование строк

    Использование любых команд форматирования строк, включая изменение высоты строки или скрытие строк (вкладка Главная, группа Ячейки, кнопка Формат).

    вставку столбцов

    Вставка столбцов.

    вставку строк

    Вставка строк.

    вставку гиперссылок

    Вставка новых гиперссылок (даже в незаблокированных ячейках).

    удаление столбцов

    Удаление столбцов.

    Если команда удаление столбцов защищена, а команда вставку столбцов не защищена, пользователь не сможет удалять столбцы, которые он вставит.

    удаление строк

    Удаление строк.

    Если команда удаление строк защищена, а команда вставку строк не защищена, пользователь не сможет удалять строки, которые он вставит.

    сортировка

    Использование команд для сортировки данных (вкладка Данные, группа Сортировка и фильтр).

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

    использование автофильтра

    Использование стрелок раскрывающегося списка для изменения фильтра в диапазонах, если применяются автофильтры.

    Пользователи не смогут применить или удалить автофильтры на защищенном листе независимо от настройки этого параметра.

    использование отчетов сводной таблицы

    Форматирование, изменение макета, обновление или изменение отчетов сводной таблицы каким-либо иным образом, а также создание новых отчетов.

    изменение объектов

    Выполнять следующие действия:

    • Внесение изменений в графические объекты, в том числе карты, встроенные диаграммы, фигуры, текстовые поля и элементы управления, которые не были разблокированы перед установкой защиты листа. Например, если на листе есть кнопка, запускающая макрос, ее можно нажать, чтобы запустить макрос, но нельзя удалить.

    • Внесение каких-либо изменений (например, форматирование) во встроенную диаграмму. Диаграмма по-прежнему будет обновляться при изменениях ее исходных данных.

    • Добавление или изменение примечаний.

    изменение сценариев

    Просмотр скрытых сценариев, изменение сценариев с установленным запретом на изменения и удаление этих сценариев. Пользователи могут изменять значения в изменяемых ячейках, если ячейки не защищены, и добавлять новые сценарии.

    Элементы листа диаграммы

    Флажок

    Запрещаемые действия

    Содержание

    Изменение элементов, являющихся частью диаграммы, таких как ряды данных, оси и легенды. При этом в диаграммах будут отображаться изменения, вносимые в исходные данные.

    Объекты

    Изменение графических объектов, включая фигуры, текстовые поля и элементы управления (если объекты не были разблокированы до включения защиты листа диаграммы).

  10. В поле Пароль для отключения защиты листа введите пароль для листа, нажмите кнопку ОК, а затем повторно введите пароль для подтверждения.

    • Пароль необязателен. Если не задать пароль, любой пользователь сможет снять защиту с листа и изменить защищенные элементы.

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

Разблокировка диапазонов ячеек на защищенном листе для их изменения пользователями

Чтобы предоставить определенным пользователям разрешение изменять диапазоны на защищенном листе, на компьютере должна быть установлена операционная система Microsoft Windows XP или более поздней версии, а сам компьютер должен находиться в домене. Вместо использования разрешений, для которых требуется домен, можно также задать пароль для диапазона.

  1. Выберите листы, которые нужно защитить.

  2. На вкладке Рецензирование в группе Изменения нажмите кнопку Разрешить изменение диапазонов.

    Команда "Разрешить изменение диапазонов"

    Эта команда доступна, только если лист не защищен.

  3. Выполните одно из следующих действий:

    • Чтобы добавить новый редактируемый диапазон, нажмите кнопку Создать.

    • Чтобы изменить существующий редактируемый диапазон, выберите поле Диапазоны защищенного листа, разблокируемые паролем, затем нажмите кнопку Изменить.

    • Чтобы удалить редактируемый диапазон, выберите поле Диапазоны защищенного листа, разблокируемые паролем, затем нажмите кнопку Удалить.

  4. В поле Название введите имя диапазона, который необходимо разблокировать.

  5. В поле Содержит ячейки введите знак равенства (=), а затем ссылку на диапазон, который необходимо разблокировать.

    Также можно нажать кнопку Свернуть диалоговое окно, выбрать на листе диапазон, а затем снова нажать кнопку Свернуть диалоговое окно, чтобы вернуться к диалоговому окну.

  6. Для управления доступом с помощью пароля в поле Пароль диапазона введите пароль для доступа к диапазону.

    При использовании разрешений на доступ задавать пароль необязательно. Использование пароля позволяет просматривать учетные данные всех полномочных пользователей, изменяющих диапазон.

  7. Для установки разрешений на доступ выберите пункт Разрешения и нажмите кнопку Добавить.

  8. В поле Введите имена объектов для выбора (примеры) введите имена пользователей, которым нужно разрешить изменять диапазоны.

    Чтобы посмотреть, как должны вводиться имена пользователей, щелкните примеры. Чтобы проверить правильность имен, нажмите кнопку Проверить имена.

  9. Нажмите кнопку ОК.

  10. Чтобы указать тип разрешений для выбранного пользователя, в поле Разрешения установите или снимите флажок Разрешить или Запретить, а затем нажмите кнопку Применить.

  11. Нажмите кнопку ОК два раза.

    При необходимости введите заданный пароль.

  12. В диалоговом окне Разрешить изменение диапазонов нажмите кнопку Защитить лист.

  13. В списке Разрешить всем пользователям этого листа выберите элементы, которые должны изменять пользователи.

    Дополнительные сведения об элементах листа

    Снятый флажок

    Запрещаемые действия

    выделение заблокированных ячеек

    Перемещение указателя на ячейки, для которых установлен флажок Защищаемая ячейка на вкладке Защита в диалоговом окне Формат ячеек. По умолчанию пользователям разрешено выделять защищенные ячейки.

    выделение незаблокированных ячеек

    Перемещение указателя на ячейки, для которых снят флажок Защищаемая ячейка на вкладке Защита в диалоговом окне Формат ячеек. По умолчанию пользователям разрешено выделять незаблокированные ячейки, а также перемещаться между незаблокированными ячейками на защищенном листе с помощью клавиши TAB.

    формат ячеек

    Изменение параметров в диалоговых окнах Формат ячеек или Условное форматирование. Если условное форматирование было применено до установки защиты листа, форматирование будет изменяться при вводе значения, удовлетворяющего определенному условию.

    форматирование столбцов

    Использование любых команд форматирования столбцов, включая изменение ширины столбца или скрытие столбцов (вкладка Главная, группа Ячейки, кнопка Формат).

    форматирование строк

    Использование любых команд форматирования строк, включая изменение высоты строки или скрытие строк (вкладка Главная, группа Ячейки, кнопка Формат).

    вставку столбцов

    Вставка столбцов.

    вставку строк

    Вставка строк.

    вставку гиперссылок

    Вставка новых гиперссылок (даже в незаблокированных ячейках).

    удаление столбцов

    Удаление столбцов.

    Если команда удаление столбцов защищена, а команда вставку столбцов не защищена, пользователь не сможет удалять столбцы, которые он вставит.

    удаление строк

    Удаление строк.

    Если команда удаление строк защищена, а команда вставку строк не защищена, пользователь не сможет удалять строки, которые он вставит.

    сортировка

    Использование команд для сортировки данных (вкладка Данные, группа Сортировка и фильтр).

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

    использование автофильтра

    Использование стрелок раскрывающегося списка для изменения фильтра в диапазонах, если применяются автофильтры.

    Пользователи не смогут применить или удалить автофильтры на защищенном листе независимо от настройки этого параметра.

    использование отчетов сводной таблицы

    Форматирование, изменение макета, обновление или изменение отчетов сводной таблицы каким-либо иным образом, а также создание новых отчетов.

    изменение объектов

    Выполнять следующие действия:

    • Внесение изменений в графические объекты, в том числе карты, встроенные диаграммы, фигуры, текстовые поля и элементы управления, которые не были разблокированы перед установкой защиты листа. Например, если на листе есть кнопка, запускающая макрос, ее можно нажать, чтобы запустить макрос, но нельзя удалить.

    • Внесение каких-либо изменений (например, форматирование) во встроенную диаграмму. Диаграмма по-прежнему будет обновляться при изменениях ее исходных данных.

    • Добавление или изменение примечаний.

    изменение сценариев

    Просмотр скрытых сценариев, изменение сценариев с установленным запретом на изменения и удаление этих сценариев. Пользователи могут изменять значения в изменяемых ячейках, если ячейки не защищены, и добавлять новые сценарии.

    Элементы листа диаграммы

    Флажок

    Запрещаемые действия

    Содержание

    Изменение элементов, являющихся частью диаграммы, таких как ряды данных, оси и легенды. При этом в диаграммах будут отображаться изменения, вносимые в исходные данные.

    Объекты

    Изменение графических объектов, включая фигуры, текстовые поля и элементы управления (если объекты не были разблокированы до включения защиты листа диаграммы).

  14. В поле Пароль для отключения защиты листа введите пароль, нажмите кнопку ОК, а затем повторно введите пароль для подтверждения.

  • Пароль необязателен. Если его не задать, любой пользователь сможет снять защиту с листа и изменить защищенные элементы.

  • Убедитесь, что вы выбрали пароль, который можете запомнить. Если вы потеряете пароль, вы не сможете получить доступ к защищенным элементам на этом сайте.

  • Если ячейка принадлежит к нескольким диапазонам, ее смогут редактировать пользователи, имеющие права на редактирование любого из этих диапазонов.

  • Если пользователь пытается редактировать несколько ячеек одновременно и имеет разрешение на изменение только некоторых из них, пользователю будет предложено изменить ячейки по одному.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

Источник

Понравилась статья? Поделить с друзьями:

А вот еще интересные статьи:

  • Как скопировать лист в excel на другой лист без изменений без формул
  • Как скопировать заливку ячейки в excel
  • Как скопировать лист в excel если нет списка листов
  • Как скопировать заливку в word
  • Как скопировать лист в excel в эту же книгу

    • 0 0 голоса
    Рейтинг статьи
    Подписаться
    Уведомить о
    guest

    0 комментариев
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии