Office: (Office 2007) Neuer Datensatz in Ufo des Navigationsformular

Hallo Zusammen,

im Rahmen der Überarbeitung von Access2003 auf Access2010 habe ich mein altes Übersichtsformular als Navigationsformular neu erstellt.

Beim Anklicken eines Navigationsbuttons wird dann das Formular "frm_Material" angezeigt. Dieses besitzt ebenfalls ein Unterformular, das in der Datenblattansicht angezeigt wird. So weit, so gut.
Im Formular "frm_Material" wird mittels eines Kombinationsfeldes ein Produkt ausgewählt und dann im Unterformular auf einen neuen Datensatz gesprungen um Zu- oder Abgänge zu erfassen.
Das Ufo "frm_Ausgabe" erhält zwar den Fokus, zumindest wird das Ereignis "beim Hingehen" ausgelöst, aber ein neuer Datensatz kann nicht angelegt werden. Händisch mittels der Schaltflächen in der Navigationsleiste ist die Befehl ">* (Gehe zu neuem Datensatz)" möglich.
Unter Access2003 hat das reibungslos funktioniert. Aber da war auch kein Navigationsformular drüber.

Ich hofffe, das ganze ist nicht zu verwirrt beschrieben und es hat jemand eine Idee, wie ich das ganze lösen kann.

Gruß
Sonja

:)

 

Hallo Sonja,

zeig doch mal den Code, den du da einsetzt.

 

Hallo Anne,

viel Code gibt es da nicht zu zeigen
Code:

Ich hätte ja gerne 2 Bilder mitgeschickt, wie das ganze ausschaut, aber selbst gezippt sind sie noch zu groß. Und als Grafik einfügen steh ich zweck der URL auf dem Schlauch.

Gruß
Sonja

 

Hallo Sonja,

durch das Einfügen des Formulars in das Navigationsformular wird das ehemalige Hauptformular zu einem Unterformular. Das dort eingefügte Unterformular ist jetzt ein Unter-Unter-Formular. Wenn Du irgendwelche Verweise auf das Unterformular (im VBA-Code oder in Abfragen) gesetzt hast, musst Du diese entsprechend anpassen.

CU

 

Hallo Thomas,

die anderen Verweise hab ich bereits entsprechend angepasst, das ist nicht das Problem.
Nach Eingabe eines Suchbegriffes im Kombinationsfeld "Suche" im "frm_Material" wird im Ereignis "Nach Aktualisierung" folgender Code ausgeführt
Code:

Im Steuerelement "ufrm_Ausgabe" im Hauptformular "frm_Material" passiert dann beim Hingehen folgender code
Code:

Un der erzeugt den Laufzeitfehler 2105 - Sie können nicht zu dem angegebenen Datensatz springen".
Über den entsprechenden button in der Navigationszeile des Ufo kann ich jedoch zu einem neuen Datensatz gehen.

Ich hab auch schon folgenden Befehl versucht Code:

Da kam dann die Meldung, dass das Formular nicht geöffnet sei.

Aber der Cursor springt doch in die erste Zeile des Ufos und ich kann dort meine Eintragungen ändern. Warum also kann ich nicht zu einem neuen Datensatz springen?

Bin verzweifelt
Sonja

 

Hi,

Enter = Beim Hingehen?! Dann sollte der Code also ausgeführt werden.
Aber es ist das Ereignis des Unterformular-Steuerelements, nicht des Unterformulars selbst.
Probiere es mal so: Code:

 

Hallo Anne,

hatte ich auch schon probiert und dann kommt folgende Fehlermeldung:
Laufzeitfehler 2449 - In einem Ausdruck inst eine ungültige Methode angegeben.
Danach ist im Debugger die Zeile "Me!ufrm_Ausgabe.Form.SetFocus" gelb markiert.

Sonja

 

Tut mir leid, da fällt mir jetzt auch nicht mehr zu ein.

Du könntest höchstens noch die andere Variante probieren: Code:

und das vielleicht auch mal direkt im AfterUpdate-Ereignis.

 

Guten Morgen,

diese Variante funktioniert. Danke

Dann kämpf ich jetzt mal mit dem PDF-Druck weiter, da konnte ich letzte Woche wegen eines Seminars nicht mehr weitermachen.

Gruß
Sonja

 

Habe ein ähnliches Problem:
Unterformular über Filterkriterium mit Hauptformular verbunden. UF kann 0 bis n Datensätze enthalten.

Ich will im UF einen neuen Datensatz (per Button ausgelöst, Felder per VBA versorgen, acSave) anlegen, erhalte aber häufig die Meldung 'kein aktueller Datensatz' - lt. Hilfetext weil die UF-Recordsource leer ist (Sie können nicht zu NewRec springen bei leerer RecSouce). Aber genau das will ich ja: Einen neuen UF-Satz anlegen, egal ob schon welche da sind oder nicht. Übrigens funktioniert nach der Meldung alles richtig, nur die Meldung stört eben.

Zusatzinfo1: Die Fehlermeldung erscheint immer nur dann wenn ich im Hauptformular 'geblättert' hatte und das UF des aktuellen HF-Satzes keine Daten hat.

Zusatzinfo2: Im UF ist die Eigenschaft 'AnfügenZulassen' auf Nein gesetzt. Unmittelbar vor dem GoToRecord>acNewRec setze ich Me.allowAdditions auf True - sonst erscheint eine andere VBA-Fehlermeldung. Mit AnfügenZulassen = Ja (ohne die True-False-Umschaltungen) träte die Fehlermeldung nicht auf. Das will ich aber nicht, weil die Dateninhalte nur von VBA gesetzt werden sollen. Auch unter Debug erscheint die Fehlermeldung nicht. Gibt es da eine Zeitbedingung?

Frage: Welche Möglichkeit gibt es, den neuen UF-Datensatz per VBA (auch bei leerer RecSource) anzulegen?
Dass es andere Lösungen gäbe (z.B. die Daten per Query (o.ä.) einzustellen - plus UF.Requery), sollte hier nicht behandelt werden.

 

Hallo VRAccFan (ohne Namen),

hier stellt sich die Frage der Begriffe: Was ist leer? Record-Source oder Record-Set? Ohne Record-Source (Datenherkunft) kannst du natürlich keinen Datensatz anlegen... Wenn das RecordSet leer ist kann man neue Daten einfügen...

Wenn du Daten komplett per VBA eifügen möchtest eignet sich aber ein per VBA erzeugtes Recordset (z.b. DAO.Recordset) besser als die Felder auszufüllen und dann zu speichern.

Gruß

Stefan

 

Hallo VRAccFan,

Dann fange diese doch durch eine Fehlerbehandlung ab.
(Luftcode):
Code:

Geht doch trotzdem, wie Du selber oben gesagt hast (halt nur mit Fehlermeldung).

Warum nicht? Ein INSERT zu schreiben ist doch auch nicht aufwendiger als
das Befüllen der Controls. Ausserdem ist es unabhänging von der Formulareinstellung AllowAdditions.
hth
gruss ekkehard

 

Hallo Stuz1, danke für die Antwort.

Das UF hat natürlich eine RecordSource - die halt manchmal (fachlich sogar ein Normalfall) keine Daten liefert; das ist dann wohl 'RecordSet (nach Filter) = leer' oder?

Dass ich den neuen Satz auch anders anlegen könnte, habe ich schon erwähnt. Mich würde aber interessieren, wie man diese Neuanlage über das UF und seine Felder implementieren müsste. Wie gesagt, die Meldung hängt zwar von 'keine Daten' ab, sie erscheint aber nicht immer.

VRAccFan - trotzdem ;-)

 

Hallo Ekkehard (Beaker s.a.), danke für die gut gemeinten Ratschläge.

Aber solche Meldungen über eine Fehlerroutine auszublenden, widerstrebt mir grundsätzlich: Ich will wissen, warum sie auftritt - und sie 'richtig' vermeiden.

Eine Alternative Lösung müsste ich natürlich dann angehen, wenn es wirklich für meine 'Lösung A' keine Erklärung / Möglichkeit gäbe. Das scheint aber nicht der Fall zu sein, weil ja diese Fehlermeldung nicht immer erscheint.

Und vielleicht sind auch andere Forum-Leser an exakt dieser Fragestellung interessiert.

Grüße von VRAccFan.

 

Kurze Verständnisfrage: Wie ist denn das UFo an das Hauptformular gebunden?

Das ließe vermuten dass du es mit einem Filter gelöst hast?