The Excel følgende VBA-kode kan hjelpe deg raskt å velge alle ulåste celler på en gang, kan du gjøre som dette:?
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen vindu
VBA-kode. Velge alle ulåste celler
Sub SelectUnlockedCells () 'Update 20130830Dim WorkRng Som RangeDim OutRng Som RangeDim RNG Som RangeOn Error Resume NextSet WorkRng = Application.ActiveSheet. UsedRangeApplication.ScreenUpdating = FalseFor Hver RNG I WorkRng Hvis Rng.Locked = False Deretter Hvis OutRng.Count = 0 Then Set OutRng = RNG Else Sett OutRng = Union (OutRng, RNG) End If End IfNextIf OutRng.Count > 0 Then OutRng.SelectApplication.ScreenUpdating = TrueEnd Sub3. Deretter trykker F5 for å kjøre denne koden, og alle de ulåste celler er valgt. . Deretter kan du endre disse celleverdiene når regnearket er beskyttet
Merknader:
1.If det er ingen ulåste celler i regnearket, vil denne koden ikke trer i kraft
<. li> 2. Dette VBA-kode brukes bare for den brukte utvalg