Прескочи на основното съдържание

Как да направя клетка като само за четене в Excel?

Автор: Силувия Последна промяна: 2020-04-26

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

Направете клетката само за четене, като защитите работния лист
Направете клетката само за четене от VBA код, без да защитавате работния лист


Направете клетката само за четене, като защитите работния лист

Можете да заключите само клетките, които искате да направите само за четене, и след това да защитите този работен лист, за да го постигнете. Моля, направете следното.

1. Щракнете върху в горния ляв ъгъл на текущия работен лист, за да изберете целите клетки.

2. Натисни Ctrl + 1 клавиши едновременно, за да отворите Форматиране на клетки диалогов прозорец. В диалоговия прозорец премахнете отметката от Заключен кутия под Защита , след което щракнете върху бутона OK бутон. Вижте екранна снимка:

3. Сега изберете клетките, които искате да направите само за четене (тук избирам клетки от диапазон A1: C18). Натисни Ctrl + 1 клавиши едновременно, за да отворите Форматиране на клетки диалоговия прозорец, проверете Заключен кутия под Защита и кликнете върху OK бутон.

4. Продължете, за да щракнете Оценки на посетители > Защита на листа. Вижте екранна снимка:

5. Посочете и потвърдете паролата си, за да защитите работния лист, както е показано на екранната снимка по-долу.

Сега клетките в заключен диапазон вече са само за четене. Когато се опитате да редактирате тези конкретни клетки в диапазона, ще получите поле за подкана, както е показано на екранната снимка по-долу.


Защитете няколко/всички работни листове с парола едновременно в текущата работна книга:

Microsoft Excel ви позволява да защитите един работен лист с парола наведнъж. Тук можете да използвате Защита на работния лист намлява Премахване на защитата на работния лист комунални услуги на Kutools за Excel за бърза защита или премахване на защитата на множество работни листове или всички работни листове в текущата работна книга с парола едновременно.
Изтеглете и опитайте сега! (30-дневна безплатна пътека)


Направете клетката само за четене от VBA код, без да защитавате работния лист

Ако не искате да защитите работния лист, за да направите клетката само за четене. Скриптът VBA в този раздел ще ви помогне лесно да разрешите този проблем.

1. Щракнете с десния бутон върху раздела на листа, който трябва да направите клетката само за четене, и след това щракнете Преглед на кода от менюто с десен бутон.

2. В откриването Microsoft Visual Basic за приложения прозорец, копирайте и поставете кода на VBA по-долу в прозореца на кода.

VBA код: Направете клетката като само за четене в Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 4 Or Target.Row = 5 Then
            Beep
            Cells(Target.Row, Target.Column).Offset(0, 1).Select
            MsgBox Cells(Target.Row, Target.Column).Address & " cannot be selected and edited as it is a read-only cell", _
            vbInformation, "Kutools for Excel"
        End If
    End If
End Sub

Забележка: Този код може просто да направи определени клетки в една колона само за четене. В този код той ще направи клетка A3, A4 и A5 като само за четене в текущия работен лист.

3. Натисни Друг + Q ключове за затваряне на Microsoft Visual Basic за приложения прозорец.

Когато щракнете върху клетка A3, A4 или A5 в текущия работен лист, ще получите a Kutools за Excel диалогов прозорец, както е показано на екранната снимка по-долу, и курсорът автоматично ще се премести в дясната съседна клетка.

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Very useful!!
This comment was minimized by the moderator on the site
Hi! How about if i want to just make 1 column editable and the rest uneditable? Thanks!
This comment was minimized by the moderator on the site
Hi Jac,
Please click on the column header to select the whole column, then do the steps mentioned in the post to unlock the column cells then protect the worksheet.
This comment was minimized by the moderator on the site
every usefull, thank you with gratitude
This comment was minimized by the moderator on the site
Thanks for the quick guidance.
This comment was minimized by the moderator on the site
Hi



I have mulipe sheets Menu ( option A1& A2) , A1 and A2 and VIEW work sheets ( where i will have BROWSE button) .



1. In menu i will select A1..

2. it will go to VIEW sheet ( which is working fine) till now ..

3. when i click on the BROWSE in the VIEW sheet A1 shee shoulf get displayed and the content present in the cells should be non editable..



Could you please help..
This comment was minimized by the moderator on the site
Good day,
Supposing there is a Command Button (ActiveX Control) in the View sheet. After inserting the below VBA into the worksheet code window, click on the button, in a popping up Kutools for Excel dialog box, specify a password to protect the sheet A1. Then sheet A1 is opened and non editable.

Private Sub CommandButton1_Click()
Dim xSheet As Worksheet
Dim xStr As String
On Error Resume Next
Set xSheet = Sheets("A1")
If xSheet Is Nothing Then Exit Sub
xSheet.UsedRange.Locked = True
xStr = Application.InputBox("Please specify a password to protect the sheet A1", "KuTools for Excel", , , , , , 2)
If xStr = False Or xStr = "" Then Exit Sub
xSheet.Protect xStr
xSheet.Activate
End Sub
This comment was minimized by the moderator on the site
i just want to make few cells of a book locked for input, only they shows the result as i programmed them to do so
This comment was minimized by the moderator on the site
Hey, Thanks a lot for this steps.


However, what if I want to copy the values in the cells that I have locked?
This comment was minimized by the moderator on the site
Dear Yahia,
The locked cells in a protected worksheet can't be copied.
This comment was minimized by the moderator on the site
Very Helpful. Thanks ! :D
This comment was minimized by the moderator on the site
Dear i want to protect the hidden cells from by copying to the new sheet, is there any option in the excel sheet for that. Means no can able to view the formulaes after copying from one sheet to other sheet.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations