In een cel mag pas een letter ingetikt worden als andere cellen gevuld zijn

[CasperEx]

Beste allemaal

Zie het bijgesloten bestand

Ik wil voorkomen dat op een regel in de blauwe kolom een "x" wordt ingetikt als op diezelfde regel in de gele kolom en/of de groene kolom niets is ingevuld

*In het bestand ontbreekt op de eerste regel de letter "A" in de gele kolom, dus mag er geen "x" in de blauwe kolom worden ingetikt

*In het bestand ontbreekt op de 2e regel het cijfer "2" in de groene kolom, dus mag er geen "x" in de blauwe kolom worden ingetikt

*In het bestand is de 3e regel in orde (gele kolom en groene kolom zijn op dezelfde regel gevuld) dus mag er nu wél een "x" in de blauwe kolom worden ingetikt

Ik vermoed dat je dit met vba kan regelen, maar heb geen idee hoe

Heeft iemand een idee?

Alvast bedankt voor de moeite

 

[Warme bakkertje]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 5 Then
        If Application.CountA(Target.Offset(, -2).Resize(, 2)) <> 2 Then
            MsgBox "Eerst andere velden invullen"
            Application.EnableEvents = False
            Target.Value = vbNullString
            Application.EnableEvents = True
        End If
    End If
End Sub

 

[popipipo]

Dit kan ook zonder VBA maar met Datavalidatie

 

[CasperEx]

Bedankt wederom voor het meedenken !!

Beide methoden werken perfect en precies wat ik bedoel. Top !! Ik bedenk nog even welke ik inzet. Voel mij nog niet zo thuis in vba dus neig naar de validatie. Maar ik ga de vba code zeker bestuderen en er van leren

Graag tot de volgende keer