Přejít k hlavnímu obsahu

Jak vytvořit buňku pouze pro čtení v aplikaci Excel?

V mnoha případech možná budete muset zabránit ostatním v úpravách některých zadaných buněk v listu. Tento článek poskytuje dvě metody, které vám pomohou vytvořit určené buňky pouze pro čtení, aby ostatní tyto buňky nemohly upravovat, kromě čtení.

Chraňte buňku tak, aby byla pouze pro čtení
Udělejte buňku pouze pro čtení kódem VBA bez ochrany listu


Chraňte buňku tak, aby byla pouze pro čtení

Můžete zamknout pouze buňky, u kterých chcete, aby byly jen pro čtení, a poté tento list chránit, abyste toho dosáhli. Postupujte prosím následovně.

1. Klepněte na tlačítko tlačítko v levém horním rohu aktuálního listu vyberte celé buňky.

2. zmáčkni Ctrl + 1 současně otevřete Formát buněk dialogové okno. V dialogovém okně zrušte zaškrtnutí políčka Zamčený rámeček pod Ochrana a potom klepněte na tlačítko OK knoflík. Viz screenshot:

3. Nyní vyberte buňky, které chcete nastavit jako pouze pro čtení (zde vyberu buňky rozsahu A1: C18). zmáčkni Ctrl + 1 současně otevřete Formát buněk V dialogovém okně zaškrtněte Zamčený rámeček pod Ochrana a klepněte na tlačítko OK .

4. Pokračujte kliknutím přezkoumání > Chraňte plech. Viz snímek obrazovky:

5. Zadejte a potvrďte své heslo k ochraně listu, jak je uvedeno níže.

Nyní jsou buňky v uzamčeném rozsahu pouze pro čtení. Když se pokusíte upravit tyto konkrétní buňky uvnitř rozsahu, zobrazí se okno s výzvou, jak je ukázáno níže.


Chraňte více / všechny listy s heslem současně v aktuálním sešitu:

Microsoft Excel umožňuje chránit jeden list současně heslem. Zde můžete použít Chraňte pracovní list a Odemknout pracovní list nástroje Kutools pro Excel rychle chránit nebo zrušit ochranu více pracovních listů nebo všech pracovních listů v aktuálním sešitu pomocí hesla současně.
Stáhněte si a vyzkoušejte to hned! (30denní bezplatná trasa)


Udělejte buňku pouze pro čtení kódem VBA bez ochrany listu

Pokud nechcete chránit list, aby byla buňka jen pro čtení. Skript VBA v této části vám pomůže tento problém snadno vyřešit.

1. Klepněte pravým tlačítkem myši na kartu listu, kterou potřebujete, aby byla buňka jen pro čtení, a poté klepněte na Zobrazit kód z nabídky pravého tlačítka myši.

2. V otvoru Microsoft Visual Basic pro aplikace zkopírujte a vložte níže uvedený kód VBA do okna Kód.

Kód VBA: Vytvořte buňku jako pouze pro čtení v aplikaci 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

Poznámka: Tento kód může pouze vytvořit určené buňky v jednom sloupci jen pro čtení. V tomto kódu vytvoří buňku A3, A4 a A5 pouze pro čtení v aktuálním listu.

3. zmáčkni Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno.

Po kliknutí na buňku A3, A4 nebo A5 v aktuálním listu dostanete a Kutools pro Excel dialogové okno, jak je ukázáno níže, a kurzor se automaticky přesune do pravé sousední buňky.

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
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