Office: (Office 2007) Unterformular per VBA Daten zuweisen

Hallo zusammen,

da ich noch neu in der Access VBA Welt bin, habe ich hier ein Problem, wo ich nicht weiterkomme.

Ich habe ein Unterformular auf ein Formular platziert. Das Ufo ist noch nicht Datengebunden. Nun will ich per VBA diesem Datensätze zuweisen. Einen Beitrag dazu fand ich hier Unterformular mit VBA ansprechen

Es erscheint aber die Meldung, dass das Objekt geschlossen sei.

Meine Frage lautet nun: Wie kann ich einem Ufo per VBA mit einer SQL Abfrage Datensätze zuweisen? *Smilie

:)

 

Hallo,

zeige doch bitte auch deinen Code dazu und beschreibe die näheren Umstände, also wann und wo
du das machen möchtest und wo sich das Unterformular befindet etc.

Und was die Formulierung betrifft:
Du kannst einem Formular eine SQL-Anweisung als Datenquelle zuweisen, aber keine "Datensätze".

 

Vom Hauptformular aus:
Code:

 

\@Maxel
So gehe ich auch vor *Smilie

@MaggieMay

Beispielszenario:

Das Ufo (ufoHaus) befindet sich auf ein Formular (frmHauseigenschaften). Das Ufo ist an keine Datenquelle angebunden.
Nun möchte ich aus der Tabelle tblHaus die Werte aus den Spalten Secure, Standort im Ufo anzeigen.
Code:

Bei der Ausführung erscheint die Fehlermeldung:
Laufzeitfehler 2467

In dem von Ihnen eingegebenen Ausdruck wird auf ein Objekt verweisen, das geschlossen oder nicht vorhanden ist.

Das Formular ist aber offen *confused.gif*

 

Der Klassiker unter den Fehlern wäre, dass ufoHaus der Name des Formulars ist, das im Unterformularsteuerelement dargestellt wird, nicht aber der Name des Unterformularsteuerelements selbst.

Klicke dessen Rahmen an und lies in den Eigenschaften den Namen ab.

Deine Mitteilung

passt zu meiner Vermutung: Ein Unterformularsteuerelement hat keine Eigenschaft "geöffnet". Man kann es nur sichtbar/unsichtbar oder aktiv/inaktiv setzen.

 

Hatte ich bereits überprüft. Es würde stattdessen auch die Meldung erscheinen:
Fehler beim Kompilieren:

Methode oder Datenobjekt nicht gefunden

 

Dann empfehle ich Dir, eine DB hochzuladen:

Die Objekte und Datensätze auf das wesentliche beschränkt und anonymisiert, mdb-Format, komprimiert und gezipt.

Alternativ:

Zeige uns ein ausdrucksvolles Bild von der Entwurfsansicht Haupt-/Unterformular.

 

Habe eine DummyDB beigefügt. Einfach auf den Button klicken *Smilie

 

Kann es sein, da beim zuweisen von Daten die Columns nicht automatisch erstellt werden?

 

Hallo,

es gibt kein Ufo, sondern nur ein Ufo-Steuerelement. Dem kannst du aber keinen SQL-String zuweisen, höchstens eine gespeicherte Abfrage.

 

Du hast ja kein Herkunftsobjekt gesetzt.

um Me.UfoName.Form.RecordSource zu verwenden, muss es ein Form geben, was aber in deinem Fall nicht existiert.

Du könntest entweder die Tabelle oder ein Abfrage als Herkunfstobjekt einsetzen, oder eben ein Formular.
LG Markus

 

Ahh, ok, das leuchtet ein.

Nur das Doing erscheint mir noch nicht ganz klar zu sein (jeder Einstieg ist schwer *wink.gif* )

Wie könnte ich denn Tabellen als Herkunftsobjekt einsetzen? Die Daten werden im weiteren Verlauf über mehrere Tabellen zusammen getragen, die dann angezeigt werden sollen.

Daraus interpretiere ich folgendes:

1. Leere Tabelle (tblAbfrage ) erstellen und dem Ufo zuweisen
2. Vor jeder Abfrage den Tabelleninhalt löschen und die Spalten je nach Abfrage per DAO.TableDef neu erstellen
3. Die Abfrage endlich starten ;-)

Sieht ihr das genauso?

P.S.: Danke für eure Geduld

 

Einfach eine Abfrage erstellen und die dann bei Herkunfstobjekt des Unterform Steuerelements eintragen. Die Abfrage bezieht sich ja auf die gewünschten Tabellen.

Falls das dynamisch gehen soll, entweder mehrere Abfragen erstellen und das Herkunftsobjekt per VBA zu Laufzeit einstellen, oder die Abfrage immer neu erstellen.
Mit den restlichen Möglichkeiten möchte ich dich jetzt nicht verwirren.
LG Markus

 

Ich bin bereits verwirrt. Mir sind die ganzen Möglichkeiten noch nicht richtig bekannt *tongue.gif*

Aus dem ganzen was nun mir mitgeteilt wurde, würde ich folgendes machen wollen:
1. Abfrage erstellen
2. Dem Ufo zuweisen.
3. Nach dem schließen des Formulars die Abfrage wieder löschen.


Eine Abfrage wäre letztendlich nur eine neu erstellte Tabelle, richtig?

Code:

 

Du solltest dich vor dem Programmieren mit den Basics beschäftigen.
Eine Tabelle hat den Zweck Daten zu speichern. Eine Abfrage verwendet die Daten einer Tabelle. Weitere Nachhilfe gibts von mir nicht.

Im Grunde kannst du es so umsetzen, einfach testen.
Ich hab so was noch nie verwendet, da ich als Unterformular immer ein echtes Formular verwende.

LG Markus