cellen blokkeren na ivullen van een andere cel.

[roycke]

probleem:
ik kolom A regel 1 t/m 10 kan ik op alle plaatsen waardes de invullen. Echter dit wil ik niet.
Wanneer in in A1 een waarde invul moeten de cellen A2 t/m A10 geblokkeerd worden.
vul ik in A2 een waarde in dan moeten de cellen A1 en A3 t/m A10 op slot gaan.
is dit mogelijk???

Bedankt voor de hulp!.

 

[Cobbe]

Dat kan via Validatie, zie jpg'tje

 

[Thoralf]

Selecteer het bereik A1:A10, kies voor Validatie en dan voor aangepast. Geef als formule op: =AANTAL.ARG($A$1:$A$10)<=1

 

[roycke]

foutmelding

Als ik dat doe krijg ik een foutmelding...
zie bijlage.
(is het voorbeeld is het kolom B geworden, dus als ik B1 invul mag B2/tm b10 niet meer invulbaar zijn)Bekijk bijlage helpmij.xls

 

[HSV]

Dit zou het moeten doen volgens mij.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
  ActiveSheet.Unprotect
    Cells.Locked = False
  Select Case Target
     Case Is <> ""
       Range("B1:B10").Locked = True
       Target.Locked = False
       ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
     End Select
  End If
End Sub

 

[Cobbe]

Klopt ze waren alletwee mis:

=AANTALARG($B$1:$B$11)<=1

 

[Thoralf]

Zie bijlage. Ik had een klein foutje in mijn eerdere bericht gemaakt: AANTAL.ARG moest zijn AANTALARG.

Toevoeging @Cobbe: Zo kun je nooit iets invullen: B11 zal altijd al ingevuld zijn invulling van een andere cel zal de grens doen overschrijden, Wijzig derhalve 11 in 10.

 

[Cobbe]

Ja sorry ik ben weer slordig bezig.

 

[roycke]

opegelost.

ik heb de punt tussen aantal en arg verwijderd en nu werkt t.
thanks voor de snelle reacties