Zu früh gefreut Varibler Formularname

[Jonny]

Hallo,
Daniel hat mir zwar die richtige Syntax erklärt aber jetzt hab ich das Problem das ich immer noch nicht varibel bin.
hier der Befehl:
    Set FormVar = Forms(FirmenFRM).Controls("AngebotslisteUFO").Form
der ja auch klappt.
Aber ich spreche die Routine von verschiedene HFO/UFO an und muss deshalb die Einträge bei forms und Controls
variabel haben.

Gruß

Johann

[daolix]

Hallo Johann

ich hab zwar keinen Plan wo du hin willst, aber statt der festen Stringübergabe könntest du einen Stringvariable übergeben

in etwa
dim sHFName as string, sUFName as string

sHFName = "DerNamedeinesHF's"
sUFName = "DerNamedeinesUF's"
oder wenn das ganze über einer Funktion gemacht wird
Function DeineRoutine(byval sHFName  as string, byval sUFName as string, ......)

und der Aufruf erfolgt dann
Set FormVar = Forms(sHFName).Controls(sUFName).Form

Alternativ könntst du deine Routine gleich das UF als Form mitgeben, so das du es nicht in deiner Routine zusammensetzem musst

Function DeineRoutine(oUFRM as Access.form, ...)