If commando

Place the \"knapper\" in a Frame then in the frames After Update event you can do soemthing like this

Select Case Me.TheFrame.Value
        Case 1
            Me.YourTextField = \"Some value\"
        Case 2
            Me.YourTextField = \"Some other value\"

    End Select

By Frame I mean an option group, and you can use the wizard for creating this with radio buttons.

kan jeg ikke kalde denne gruppe fra tekstfeltet, således at det faktisk er den anden vej omkring at funktionen laves?

Not sure I understand, do you want to select one of the buttons depending on what text there is in the text field?

Jo du kan. i nedenstående eksempel er Tekst108 dit tekstfelt, det tildeler gruppeboksen Ramme101 værdien 1, hvis indholdet i Tekst108 er a.

Select Case Tekst108
Case Is = \"a\"
Ramme101 = 1
End Select

Det jeg vil er at teksten skal tilpasse sig resultatet fra alternativknapperne, men jeg har i forvejen en dlookup funktion på disse knapper og har lidt problemer med at få den til at reagere korrekt når jeg også tilføjer select case funktionen.

Hvordan sætter jeg den ind?

Du kunne også lave det med en sub, hvis argument kommer fra Optionfeltet.
I optionfelternes Click-event skriver du: =OptKlik(1)
    Nyt tal for hver optionfelt.

I formens kodeark laver du sub\'en:

Sub OptKlik(ByVal lNr as long)
    Dim strTekst

    Select Case lNr
        Case 1
            strTekst = \"BlaBla1\"
        Case 2
            strTekst = \"BlaBla2\"
    End Select

    \'DinTekstBoks\'.SetFocus
    \'DinTekstBoks\'.Text = strTekst

End Sub

=OptKlik(tal) skal stå direkte i egenskabsarket ud for VedKlik

-Sorry, så ikke din kommentar med DlookUp.
Men så kan du kalde OptKlik(tal) inde i koden til dit Click-event.

cqleerup Kl 13:28 skrev du, at teksrfeltet skulle styre indholdet af alternativboksen - nu vil du den anden vej rundt som dit spørgsmål oprindelig lød på.

Så: Definer dit problem så nøjagtig som muligt.

Kunne du forresten ikke afslutte disse:
http://www.eksperten.dk/spm/153097
http://www.eksperten.dk/spm/148532

nu har jeg brugt terrys første løsning på \"ved klik\" - men får hele tiden en fejl på end sub komandoen, skal den fjernes ?

det øverste kan jeg desværre ikke afslutte da jeg stadig ikke har noget grundlag for at bedømme hvorvidt det er muligt eller ej - ikke at jeg betvivler din kompentance på området, men andre har måske erfarring med situationen!

Håber der er ok!

Med hensyn til dette spørgsmål, er jeg interesseret i at min tekstboks skal skrive en forskellige tekst alt efter hvilken alternativknap der er valgt.
As simple as that!

Derfor har jeg placeret terrys løsningsforslag i grupperammens \"ved klik\" hændelse - men får en fejl med hensyn til end sub.

hvad skla det betyde

no the End sub must be there to end the sub procedure. Are you sure you have only one end sub, and what is the error?

Hændelsen ser således ud, men der er noget galt!

Private Sub Ramme237_Click()

Select Case Me.Ramme237.Value
        Case 1
            Me.tilmail = \"Nyhed\"
        Case 2
            Me.tilmail = \"Remake\"
End Sub

you need an end select

Private Sub Ramme237_Click()

Select Case Me.Ramme237.Value
        Case 1
            Me.tilmail = \"Nyhed\"
        Case 2
            Me.tilmail = \"Remake\"
end select
End Sub

Tak for hjælpen, det var jo ikke just den mest imponerende fejl der skulle findes - men ok, jeg havde ikke selv set den!

Mange tak!

selv tak :o) I will take a look at the other question if I can find a hole (time)

allright - hope you can come up with a sollution