dimme alle felter i ´samme formular

ved indgang hændelsen:
me.feltnavn.backgroundcolour nummer
og igen ved udgang hændelsen

Det med at cykle rundt, der følger man jo tabulator rækkefølgen!~)

ja det er jeg klar over...
men jeg skal lige lave en løkke der går alle felter igennem og sætter dem til en farve

Prøv at sætte et mærke på hver tekstboks (Tag) feks. A, og indsæt så nedenstående kode på din knap

Dim Ctrl As Control
   
    For Each Ctrl In Screen.ActiveForm
        Select Case Ctrl.Tag
            Case "A"
Ctrl.Backcolor = "En eller ande frave"

End select

Next Ctrl

PS ikke testet

Du finder egenskaben Mærke i design på tekstboksen under fanebladet andre (den nederste egenskab)

fandt en løsning.

Dim Ctrl As Control
   
    For Each Ctrl In Screen.ActiveForm
        Ctrl.BackColor = 0

      Exit For    ' Exit loop.
Next

ahh ser din løsning aandersen ...
men hvorfor ville du ikke bare gøre som min kode .. den "cykler" jo alle igennem også selvom de ikke er "tagget"

Well, en etiket er jo også en kontrol, så for at undgå problemer med dette forslog jeg at mærke tekstboksene, men så længe din egen løsning virker er det jo fint :o)

hehe mit problem er at det virker´i en test formular og den ændre ikke etikkeret... men ikke i min formular....

hmmm den kan ikke finde .. activeform

For at Screen.ActiveForm skal virke kræver det at den formen er aktiv, altså vises på skærmen og har fokus, du kunne også prøve:

For Each Ctrl In Me

Dette ref. altid til den aktive form

ahh
kan se hvorfor du bruger tag. nu

meget smartere..
men det virker tosset men ikke kan angive det kun er textboxe den skal gøre dem på

Det kan man også, men så er der jo combobokse, og eller lister, efterhånden bliver koden længere og længere, dette undgår man ved at benytte egneskaben Tag, egenskaben er så vidt jeg kan vurdere moget overset, men er faktisk ganske anvendelig i mange sammenhænge

men bruger din løsning med at tagge dem ellers, får jeg en masse problemer med sub forms ...
takker for hjælpen..

men hvis du finder en løsning hvor man kan def. kun textbox vil jeg meget gerne høre det ,..

mvh
J

den skal også tage combo box og lister med ...

Denne spørger på om det er en tekstboks der er tale om

Dim Ctrl As Control
For Each Ctrl In Me
If Ctrl.ControlType = acTextBox Then
    Ctrl.BackColor = 0
       
    End If

Next Ctrl

Jeg mener at combokse angives som AcComboBox som kontroltypenavn og listbokse som AcListBox, men er ikke helt sikker, prøv evt. at lege lidt med det

Tak for point, forsat god arbejdslyst med projektet