Celler fra et til mange text felter i en form

me.textbox1.value = cell(ræk,kol)
o.s.v.

Ja. jeg kunne jo bare lave 10 linier. Men det er ikke altid at jeg har 10 linier men måske 6 eller 12.

Så hvordan laver man "me.textbox1.value" variabel så den i næste loop hedder "me.textbox2.value" osv osv

Via VBA kan der gennemløber alle "controls" i Userformen.
Hvis det er en tekstboks - controllens navn indeholder "Textbox" - så kan den tilsvarende række F1 - F10 overføres til den pågældende box.

Sig til, hvis du vil have et eks. - evt. send en mail til: pb@supertekst-it.dk - så returnerer jeg dette.

Ja, tak. Det vil jeg meget gerne. Jeg sender en mail til dig.

Her er det så...

Det svar som jeg fik fra supertekst.

Tak for hjælpen.

Dim cc, kolonneFværdi

Rem gennemløb alle controls i userformen - hent navn og Nr
    For Each cc In Me.Controls
        cnavn = LCase(cc.Name)
        cnr = Val(Mid(cnavn, 8))

Rem Hvis det er en textbox - hent fra den cellen i kolonne F(6) Række = textbox-nr
        If InStr(cnavn, "textbox") = 1 Then
            kolonneFværdi = ActiveWorkbook.Sheets(1).Cells(cnr, 6)
           
            If kolonneFværdi <> "" Then
                cc.Value = kolonneFværdi
                cc.Visible = True
Rem hvis cellen er tomme - skjules textbox
            Else
                cc.Visible = False
            End If
        End If
    Next