Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Jonny am Juni 15, 2012, 16:39:34

Titel: Zu früh gefreut Varibler Formularname
Beitrag von: Jonny am Juni 15, 2012, 16:39:34
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
Titel: Re: Zu früh gefreut Varibler Formularname
Beitrag von: daolix am Juni 15, 2012, 17:26:24
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, ...)