Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte Excel , ktorý chcete pracovať .
2
Vyberte bunku , ktorú chcete , aby niekto zadať informácie do . Kliknite pravým tlačidlom myši na vybranú bunku a vyberte " Formát buniek " . Kliknite na záložku " Ochrana " v hornej časti okna , a zrušte " LOCKED " políčko . Kliknite na tlačidlo " OK " .
3
Kliknite na záložku " hodnotenie " v hornej časti okna programu Excel , a potom kliknite na tlačidlo " Zamknúť list " . Zadajte heslo , ak budete potrebovať , a kliknite na tlačidlo " OK " . Ak ste zadali heslo , budete musieť zadať ho znova . Uistite sa , že napísať heslo nadol , takže nebudete na to nezabudnem . Všetky bunky okrem jedného vybraného teraz uzamknutá.
4
Stlačte tlačidlo " Alt " + " F11 " otvorte Visual Basic konzoly . Vyberte list , ktorý ste pracovali zo zoznamu listov
5
Skopírujte nasledujúci kód do otvoreného priestoru na pravej strane jazyka okna : .
Private Sub Worksheet_Change ( byval cieľ ako rozsah )
Dim KeyCells ako rozsah
Set KeyCells = Range ( " A1 " )
Ak nie je Application.Intersect ( KeyCells , rozsah ( Target. adresa ) ) _
nie je nič Potom
s listami ( " Hárok1 " )
Odomknúť Heslo : .. = " qqq "
Range ( " B1 " .. ) Locked = False
Chráňte Heslo : = " qqq "
End With
End If
End Sub
6
Upravte kód pre konkrétne listu . Zmeňte " A1 " , do bunky , ktorú chcete , aby používatelia mohli meniť . Zmeňte " B1 " na bunku , ktoré chcete automaticky odomknú , keď používatelia vstupné dáta do prvej bunky . Zmeňte " Hárok1 " na názov listu . Zmeňte " qqq " pre čo heslo , ktoré používate na uzamknutie buniek . Ak nie ste pomocou hesla , vymažte obe inštancie " Password : = " . Qqq " .
7
Stlačte tlačidlo " Alt " + " F11 " zatvorte Visual Basic okno List bude teraz odomknúť špecifikované bunky , keď užívateľ zadá informácie do pôvodnej bunky . Uložte prácu teraz , pretože pri testovaní listu sa bude cieľová bunka odomknutá .
Copyright © počítačové znalosti Všetky práva vyhradené