Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Variablen in andere Formulare übergeben
zurück: Access doppelt Datensätze bei Aktualisierung? weiter: leeres UFO beim Öffnen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Flame
Pisa Verantwortlicher


Verfasst am:
12. Aug 2005, 10:23
Rufname:
Wohnort: Bremen

Variablen in andere Formulare übergeben - Variablen in andere Formulare übergeben

Nach oben
       

Hallo, ne einfach Frage:

Ich möchte eine Variable beim öffnen eines neuen Formulars dem neuen Formular übergeben.

Felder zu übergeben funkioniert ganz gut:
Code:
    Forms![Targetform]![Targetfield] = Forms![Sourceform]![Sourcefield]
Aber ich will mir nicht jedes mal nen Dummyfeld einrichten.

Danke schonmal im Vorraus für eure Hilfe.

_________________
Wenn ich groß bin möchte ich mal Mod werden
jens05
Moderator


Verfasst am:
12. Aug 2005, 10:28
Rufname:
Wohnort: ~~~~~


AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

Hallo,
dafür gibts das OpenArgs-Argument
Code:
    DoCmd.OpenForm "Formname", , , , , , Variable
Im neuen Formular kann mit
Code:
    Debug.Print Me.OpenArgs
darauf zugegriffen werden.
_________________
mfg jens05 Wink
Flame
Pisa Verantwortlicher


Verfasst am:
12. Aug 2005, 10:42
Rufname:
Wohnort: Bremen

AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

hi, danke für die Antwort, läuft noch nicht so ganz, evtl hab ichs auch noch nicht verstanden.

Ich rufe auf:
Code:
    DoCmd.OpenForm "auswdatum", , , , , , windowsource = "test1"
Im neuen Auswahlfenster habe ich jetzt
Code:
    sourcewindow = Me.OpenArgs
zur laufzeit hat sourcewindow aber den Wert "1" und nicht test1.

Vermutlich weise ich die Variable im neuen Fenster falsch zu, vermutlich siehste den Fehler schon.

_________________
Wenn ich groß bin möchte ich mal Mod werden
jens05
Moderator


Verfasst am:
12. Aug 2005, 11:15
Rufname:
Wohnort: ~~~~~

AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

Hallo,
Code:
    DoCmd.OpenForm "auswdatum", , , , , , "test1"
Im Ereignis "Beim öffnen" des neues Forms
Code:
    sourcewindow = Me.OpenArgs

_________________
mfg jens05 Wink
Flame
Pisa Verantwortlicher


Verfasst am:
12. Aug 2005, 11:40
Rufname:
Wohnort: Bremen

AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

hmmm, auf einmal heißt es "rien ne va plus", nur noch die Fehlermeldung
Zitat:
Laufzeitfehler '2501' die Aktion OpenForm wurde abgebrochen.
Code:
Private Sub datumbis_Click()
    DoCmd.OpenForm "auswdatum", , , , , , "test1"
End Sub

_________________
Wenn ich groß bin möchte ich mal Mod werden
jens05
Moderator


Verfasst am:
12. Aug 2005, 11:44
Rufname:
Wohnort: ~~~~~

AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

Hallo,
und wie sieht der Code im Formular "auswdatum" aus?

_________________
mfg jens05 Wink
Flame
Pisa Verantwortlicher


Verfasst am:
12. Aug 2005, 11:53
Rufname:
Wohnort: Bremen

AW: Variablen in andere Formulare übergeben - AW: Variablen in andere Formulare übergeben

Nach oben
       

Kurz zur erläuterung, ich will nicht immer ein neues Formular erstellen sondern auf das selbe Formular mehrfach zugreifen um ein Datum auszuwählen. Um das Rückschreibeziel des Datums zu Variieren muss ich ja die Variable beim öffenen des Forms mitgeben.
Code:
Option Compare Database

Public sourcewindow As Variant

Private Sub Befehl1_Click()
    Dim datum As Variant
   
    sourcewindow = Me.OpenArgs
    If sourcewindow = "test1" Then
        Forms![Eventsuche]![Datumvon] = Forms![auswdatum]![datumausw]
      ElseIf sourcewindow = "test2" Then
        Forms![Eventsuche]![datumbis] = Forms![auswdatum]![datumausw]
    End If
    DoCmd.Close
End Sub

Private Sub Form_Open(Cancel As Integer)
    sourcewindow = Me.OpenArgs
End Sub

_________________
Wenn ich groß bin möchte ich mal Mod werden
Willi Wipp
Moderator


Verfasst am:
12. Aug 2005, 12:29
Rufname:
Wohnort: Raum Wiesbaden


Re: Variablen in andere Formulare übergeben - Re: Variablen in andere Formulare übergeben

Nach oben
       

Hi Flame,

ich sehe zwar jetzt nicht direkt einen Grund, aber versuch es mal im Menue mit Debuggen -> Kompilieren von ....
Vielleicht liegt der Fehler ja ganz woanders.
Und dann als Code veilleicht einfach nur
Code:
Option Compare Database
Option Explicit

Private Sub Befehl1_Click()
    Select Case Me.OpenArgs
      Case "test1"
        Forms![Eventsuche]![Datumvon] = Forms![auswdatum]![datumausw]
      Case "test2"
        Forms![Eventsuche]![datumbis] = Forms![auswdatum]![datumausw]
    End Select
    DoCmd.Close
End Sub

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Access2007 Formulare 7 IliasB 483 22. Okt 2008, 15:59
Marmeladenglas Access2007 Formulare
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage in csv exportieren mit variablen Dateinamen 2 hikx76 2929 15. Okt 2008, 11:47
hikx76 Abfrage in csv exportieren mit variablen Dateinamen
Keine neuen Beiträge Access Tabellen & Abfragen: Variablen Dateinamen einlesen 0 Gast 484 24. Sep 2008, 08:36
Gast Variablen Dateinamen einlesen
Keine neuen Beiträge Access Tabellen & Abfragen: DOMWERT & DOMSUMME machen Formulare langsam! 0 Mini25 1903 23. Sep 2008, 12:12
Mini25 DOMWERT & DOMSUMME machen Formulare langsam!
Keine neuen Beiträge Access Tabellen & Abfragen: Eingegebenes Datum an Abfrage übergeben 6 metalbeetle 2111 11. Jan 2008, 23:08
metalbeetle Eingegebenes Datum an Abfrage übergeben
Keine neuen Beiträge Access Tabellen & Abfragen: mehrere Werte einer Tabelle übergeben 3 Frank_Oso 603 02. Dez 2007, 21:05
jens05 mehrere Werte einer Tabelle übergeben
Keine neuen Beiträge Access Tabellen & Abfragen: Kann keine Formulare erstellen :-( 4 zecloin 407 26. Jul 2007, 09:23
zecloin Kann keine Formulare erstellen :-(
Keine neuen Beiträge Access Tabellen & Abfragen: Inhalt von Listenfeld in Bericht übergeben 3 Sandnet 1126 12. Jul 2007, 09:36
KlausMz Inhalt von Listenfeld in Bericht übergeben
Keine neuen Beiträge Access Tabellen & Abfragen: Name einer Tabelle übergeben und Anfügeabfrage durchführen 1 cleopatra48 487 26. Jun 2007, 07:13
blicki Name einer Tabelle übergeben und Anfügeabfrage durchführen
Keine neuen Beiträge Access Tabellen & Abfragen: sql-String an Abfrage übergeben 2 Gastuser 1912 01. Jun 2007, 10:32
Gastuser sql-String an Abfrage übergeben
Keine neuen Beiträge Access Tabellen & Abfragen: Eintrag in Listenfeld bei klick an abfrage übergeben? 5 Zamp 1013 07. Dez 2006, 07:58
derArb Eintrag in Listenfeld bei klick an abfrage übergeben?
Keine neuen Beiträge Access Tabellen & Abfragen: Kriterium an Unterabfrage von einer Unterabfrage übergeben 0 Willifighter 1114 23. Aug 2006, 14:31
Willifighter Kriterium an Unterabfrage von einer Unterabfrage übergeben
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP Forum