Objekte aus Form auslesen / Übergabe Formularname

12/11/2008 - 15:44 von Thomas Mauritz | Report spam
Objekt erforderlichHallo,

ich sitze vor einem kleinen Problem und komme einfach nicht auf due Zündende
Idee:

Ich möchte alle Objekte eines Formulars nach Objekttyp in eine Textdatei
ausgeben und zwar mit Objekttyp und dem Namen des Objektes:

Beispiel:
Typ Beschriftungsfelder (acLabel)
-
100 lblDatum
100 lblFeldname
100 lblArtKontaktaufnahme
etc.

Das klappt auch alles einwandfrei solange ich in meinem Code den
Formularname fest hinterlege. Jetzt habe ich aber die Idee alle Formulare in
meiner DB in einerm Lsitenfeld anzeigen zu lassen und das Formular zu
markieren für das ich die Objekte auslesen lassen möchte. und genau das
bekomme ich nicht hin. Ich erhalte immer die Meldung "Laufzeitfehler 424:
Objekt erforderlich".

Mein Code sieht wie folgt aus:
Sub btnExport_Click()
...
Dim frm As Form
Dim SelectedForm
SelectedForm = "Form_" & Me.lstFormularliste
Set frm = SelectedForm <-- Hier erscheint der Fehler
...
End Sub

Wenn ich den Formularname fest hinterlege ( set frm = Form_frmAnfrage ) dann
làuft das einwandfrei durch.

Wie kann ich nun den Formularnamen aus meiner Listbox übergeben. hat jemand
eine Idee?

Gruß aus Bremen
Thomas Mauritz
 

Lesen sie die antworten

#1 Mark Doerbandt
12/11/2008 - 15:50 | Warnen spam
Hallo, Thomas,

Thomas Mauritz:

Dim frm As Form
Dim SelectedForm



Dim SelectedForm As String

SelectedForm = "Form_" & Me.lstFormularliste
Set frm = SelectedForm <-- Hier erscheint der Fehler



Set frm = Forms(SelectedForm)

- das Formular muss geöffnet sein.

Gruss - Mark

Informationen fuer Neulinge in den Access-Newsgroups unter
http://www.doerbandt.de/Access/Newbie.htm

Bitte keine eMails auf Newsgroup-Beitràge senden.

Ähnliche fragen