Brugers input skal være et bestemt bogstav

Det kan sikkert lade sig gøre via VBA, hvis en af de dygtige herinde hjælper dig.

Du kan også indsætte en kommentar i cellerne, som fortæller at kun 'x' er tilladt. Men det retter ingenting, oplyser kun.

højreklik på cellen og vælg 'indsæt kommentar'
en lille trekant i cellen viser at der findes en kommentar i den.

Det er rigtigt, og den tanke har jeg også haft. Problemet med en kommentar er, at brugeren er nødt til aktiv at bruge musen for at få vist kommentaren. Idet mange blot bruger pilene til at bevæge sig rundt i skemaet, vil den ikke blive vist.

Forslag:

Indsættes på det pågældende ark
Alle tegn i området bliver til et "x"
Et sat "x" kan slettes igen ved at slette det eller indtaste en blank (mellemrum)

Dim flag As Boolean
Private Sub Worksheet_Activate()
    flag = False
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
Rem Bestem aktuelle celle-adresse - C10-AL24
    If flag = False Then
        ræk = Target.Row
        kol = Target.Column
        værdi = Target.Text
       
        If (ræk >= 10 And ræk <= 24) And (kol >= 3 And kol <= 38) Then
            flag = True
            If værdi <> "" And værdi <> " " Then
                Target = "x"
            Else
                Target = ""
            End If
        End If
    End If
   
    flag = False
End Sub

Supertekst > Næsten perfekt. Jeg kan ikke få lov til at slette i cellerne. Jeg får beskeden "Run-time error: Method'_Default' of object 'Range' failed".
Dvs. at i kodens 7. sidste linje "Target=""" er der fejl.

Supertekst > Jeg får desuden at vide, at jeg ikke kan starte med "Dim..." efter en "End Sub" (jeg har flere makroer på arket).

Jeg ville nu blot anvende Data/Datavalidering/Brugerdefineret

formler er : =KODE(C19)=120

denne virker i celle C19, ret til aktuel celle

Dim skal så flyttes øverst - foran første Sub.

Har ingen problemer med at slette forkerte x'er

Du er velkommen til at sende din fil - mailadr. under profil

Supertekst > Perfekt. Jeg flyttede Dim op i toppen sammen med den anden makro, som du lavede tidligere (forbindKrydser). Nu virker det.

Smid et svar. :-)

Excelent > Tak for dit bud, men jeg valgte Superteksts forslag, idet det helt automatisk ændrer indtastede værdier til det ønskede. Dit forslag vil komme med en besked til brugere, hvorefter brugeren skal taste ny værdi.

Jeg ønsker at lave en løsning til brugerne, hvor de bliver forstyrret mindst muligt. Dertil er Superteksts forslag det bedste. I mit spørgsmål havde jeg Superteksts forslag som 1. prioritet og dit som 2.

Ok - godt det lykkedes. (Kan godt huske de forbundne krydser :-)