Datum formular Button Endzeit Hauptformular

Aus Hauptformular das Unterformular steuern

Von: , Frage gestellt am Do, 15. Jan 2009

Hallo zusammen,

ich habe ein Hauptformular aus einer Tabelle erzeugt. Dieses Formular enthält ein Uform., welches aus einer Abfrage generiert ist.
Jetzt möchte ich aus dem Hauptform. per Button das Uform steuern.

In diesem Fall ein Datum und eine Zeit in die entsprechenden Felder eintragen lassen. Wie kann ich das in VBA lösen?
Der funktionierende Code sieht so aus:

Private Sub Befehl20_Click()
'Start Datum und Zeit setzen

Me!DatumBeginn = Date
Me!UhrzeitBeginn = Time()

End Sub

Ein zweiter Button soll nun (auch im Hauptform) die Endzeit und -datum in das UFO entragen. Wie muss da der Code aussehen bzw. verändert werden? Bin auf dem Gebiet totaler Anfänger :-(

Danke und Gruß
Olaf

4 Antworten zu dieser Frage

1. Antwort von nach 29 Minuten 0 hilfreich

   Re: Aus Hauptformular das Unterformular steuern

   Hallo Olaf,
   
   mit welchem Access arbeitest du? Gebe die Version bitte IMMER an! ich habe ein Hauptformular aus einer Tabelle erzeugt. Dieses
   Formular enthält ein Uform., welches aus einer Abfrage
   generiert ist.
   Das Hauptformular hat welchen Namen?
   Das UFO hat welchen Namen? Jetzt möchte ich aus dem Hauptform. per Button das Uform
   steuern.
   kein Problem, allerdings verstehe ich nicht, warum die die Button nicht im UFO erstellst? In diesem Fall ein Datum und eine Zeit in die entsprechenden
   Felder eintragen lassen. Wie kann ich das in VBA lösen?
   Der funktionierende Code sieht so aus:
   das kann nicht funktionieren, wenn ein neuer Datensatz erzeugt werden soll. Private Sub Befehl20_Click()
   'Start Datum und Zeit setzen
   hier fehlt die Erzeugung eines neuen Datensatzes Me!DatumBeginn = Date
   Me!UhrzeitBeginn = Time()
   ME ist der ALIAS für das Hauptformular
   es fehlt die Bezeichnung des UFOs
   
   Beispiel:
   Me.UFO!Datumbeginn = Date End Sub
   
   Ein zweiter Button soll nun (auch im Hauptform) die Endzeit
   und -datum in das UFO entragen. Wie muss da der Code aussehen
   bzw. verändert werden? Bin auf dem Gebiet totaler Anfänger :-(
   so wie oben beschrieben.
   Wobei wichtig zu wissen wäre, ob du ein UFO in Einzelformularansicht, oder Endlosformularansicht nutzt.
   
   
   Grüße aus Schönberg (Lübeck)
   Wolfgang
   (Netwolf)
   

   • Antwort von nach einer Stunde 0 hilfreich

     Re^2: Aus Hauptformular das Unterformular steuern

     Hallo Wolfgang,
     danke für deine suuuperschnelle Antwort mit welchem Access arbeitest du? Gebe die Version bitte IMMER
     an!
     
     Access 2003
     Das Hauptformular hat welchen Namen?
     Das UFO hat welchen Namen?
     
     frmEingabe ist der Name des Hauptforms
     frmAbrechnung ist der Name des UFO's
     kein Problem, allerdings verstehe ich nicht, warum die die
     Button nicht im UFO erstellst?
     Weil's so einfach schöner aussieht :-) In diesem Fall ein Datum und eine Zeit in die entsprechenden
     Felder eintragen lassen. Wie kann ich das in VBA lösen?
     Der funktionierende Code sieht so aus:
     das kann nicht funktionieren, wenn ein neuer Datensatz erzeugt
     werden soll.
     Oh das funktioniert prima, nur eben nicht im UFo Private Sub Befehl20_Click()
     'Start Datum und Zeit setzen
     hier fehlt die Erzeugung eines neuen Datensatzes Me!DatumBeginn = Date
     Me!UhrzeitBeginn = Time()
     ME ist der ALIAS für das Hauptformular
     es fehlt die Bezeichnung des UFOs
     
     Beispiel:
     Me.UFO!Datumbeginn = Date End Sub
     
     so wie oben beschrieben.
     Wobei wichtig zu wissen wäre, ob du ein UFO in
     Einzelformularansicht, oder Endlosformularansicht nutzt.
     
     
     hab ich wie von dir beschrieben probiert und folgende Fehlermeldung erhalten
     
     Laufzeitfehler 424 Objekt erforderlich ....
     
     Gruß Olaf
     

     • Antwort von nach einer Stunde 0 hilfreich

       Re^3: funktioniert doch :-)

       Hallo Wolfgang,
       
       funktioniert jetzt -> hatte einen Punkt vergessen
       
       Danke!
       
       Gruß Olaf
       

     • Antwort von nach einer Stunde 0 hilfreich

       Re^3: Aus Hauptformular das Unterformular steuern

       Hallo Olaf, frmEingabe ist der Name des Hauptforms
       frmAbrechnung ist der Name des UFO's
       das kann nicht funktionieren, wenn ein neuer Datensatz erzeugt
       werden soll.
       Oh das funktioniert prima, nur eben nicht im UFo
       eben, das meinte ich
       
       Mangels Beschreibung rate ich mal:
       
       Beim drücken der Taste soll...
       - im UFO soll ein neuer Datensatz hinzugefügt werden?
       - das Feld DatumBeginn mit Date gefüllt werden?
       - das Feld UhrzeitBeginn mit Time() gefüllt werden?
       
       Diese Felder mit dieser Bezeichnung existieren im UFO?
       
       dann reicht dieser Code
       
       DoCmd.GoToControl "frmAbrechnung"
       DoCmd.GoToRecord , , acNewRec
       
       Me.frmAbrechnung!datumbeginn = Date
       Me.frmAbrechnung!zeitbeginn = Time
       
       Ansicht UFO = Endlosformular
       
       
       Grüße aus Schönberg (Lübeck)
       Wolfgang
       (Netwolf)
       

Keine passende Antwort gefunden? Jetzt eigene Frage stellen!