När jag kör koden nedan får jag type mismatch. Varför? Hej! Skall du på något sätt loopa igenom kontroller på formulär så får du loopa igenom en collection. Jag har för mig att Me inte är en collection i sig så det är därför det inte fungerar. Sen kan du inte loopa igenom alla textboxar på et formulär utan du får loopa igenom alla kontroller och göra urval på vilken typ det är på den kontrollen du är på vid tillfället... En beskrivning av for each ... next:For Each ger Type Mismatch
Dim txtBox As TextBox
For Each txtBox In Me
'...
Next txtBox
/ PeterSv: For Each ger Type Mismatch
<code>
For Each t In Me.Controls
If TypeOf t Is TextBox Then
'Här har du alla textboxar
End If
Next t
</code>
/BuddaSv: For Each ger Type Mismatch
for each EN_VARIANT in ARRAY
next
Arrayen är en array
varianten är en variabel där datatypen är en variant.
Poblemt med din kod är:
for each EN_TEXTBOX in ETT_FORMULÄR
next
...