Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Bei neuem Form wird Wert nicht angezeigt
zurück: Gültigkeitswerte mit 2 bedingungen in bezug auf optionsfeld weiter: SQL abfrage mit Domwert(Dlookup)? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 08:47
Rufname:

Bei neuem Form wird Wert nicht angezeigt - Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Hallöchen mal wieder,
ich möchte, dass das 2. Formular den Wert IDKunde aus dem 1. Formular übernimmt. Generell macht er das wohl, nur bleibt das Feld IDKunde aus dem 2. Formular leer und wird auch bei einer Aktualisierung nicht angezeigt. Wo ist denn da der Fehler?
Code:
Private Sub cmdFSerfassen_Click()
    If Me!FSAngaben = True Then
        DoCmd.OpenForm "frmKundenFS", DataMode:=acFormEdit, _
                       WindowMode:=acDialog, _
                       WhereCondition:="IDKunde = " & Me!IDKunde
        Me.Requery
      Else
        Me!FSAngaben = False
        Select Case MsgBox("Es sind noch keine Führerscheindaten " & _
                           "erfasst....." & vbCrLf & _
                           "Möchten Sie die Daten erfassen?", _
                           vbYesNo Or vbExclamation Or vbDefaultButton1, _
                           "Hoppla........")
          Case vbYes
            DoCmd.OpenForm "frmKundenFS", DataMode:=acFormAdd, _
                           WindowMode:=acDialog, OpenArgs:=Me!IDKunde
            Me.Requery
          Case vbNo
            Me!FSAngaben = False
            Me.Undo
        End Select
    End If
End Sub
Hilfe Smile)) und schon mal vielen DAnk
_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
JörgG
Access-Team


Verfasst am:
01. Okt 2007, 10:15
Rufname:
Wohnort: b. Dresden


AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Hallo,

wo tritt das denn auf, bei der 1. Case-Anweisung (neuen Kunden anfügen)? Dann zeige bitte mal den Code aus dem 2. Formular (Ereignis beim Öffnen evtl Laden)

Ist im 2. Formular - Eigenschaftsfenster - Register Daten - Daten eingeben: Nein gesetzt? Ist der Name von IDKunde richtig und es ist ein Zahl-ID?

Probiere mal diese Zeile, die muss funktionieren und das 2. Form nach der IDKunde gefiltert öffnen:
Code:
    DoCmd.OpenForm "frmKundenFS", , , "IDKunde = " & Me!IDKunde, , acDialog

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 11:05
Rufname:

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Danke für den Code... Aber er zeigt den Wert IDKunde immer noch nicht in dem neuen Formular an. Daten kann ich erfassen und werden auch gespeichert, aber halt ohne den IDKunde.... Wenn ich aber den Code mit der Maus "ablaufe",, zeigt er mir eine ID-Nr. an... ?!?!? Der Datentyp stimmt überein...

Ach so.... Habe beim Laden des 2. Form kein Argument. Access soll einfach den Wert IDKunde aus frmKunden in das frmKundeFS IDKunde setzen und es auch anzeigen und speichern Smile

_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
JörgG
Access-Team


Verfasst am:
01. Okt 2007, 11:30
Rufname:
Wohnort: b. Dresden

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Hallo,

Du musst im 2. Formular das OpenArgs, was Du übergibst, auswerten und setzen. Das OpenArgs ist ein optionales Argument (eine Variable), Du musst AC schon sagen was es damit anstellen soll Very Happy , im 2. Form - Ereignis "beim Öffnen":
Code:
Private Sub Form_Open(Cancel As Integer)
    If Nz(Me.OpenArgs, "") <> "" Then Me!IDKunde.DefaultValue = Me.OpenArgs
End Sub

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 11:38
Rufname:


AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Okay... Hab ich gemacht.. Rolling Eyes
Aber.... Er setzt mir den Wert immer noch nicht in das Feld bzw. zeigt ihn nicht an... Hab tun hat er Embarassed
.... Und ich hab doch dem Formular gesagt, dass es den Wert IDKunde aus dem frmKunden in das frmKundenFS, Steuerelement IDKunde übernehmen soll...... Das frmKunden ist übrigens noch geöffnet Smile

Muss mich mal korrigieren.... Ich hab den Eindruck, es ist dem frmKundenFS egal, was ich reinschreib.... er zeigt immer das selbe falsche Ergebnis Sad

_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
JörgG
Access-Team


Verfasst am:
01. Okt 2007, 12:00
Rufname:
Wohnort: b. Dresden

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Hallo,

ok, probieren wir es schrittweise, ändere mal den Code:
Code:
Private Sub cmdFSerfassen_Click()
    If Me!FSAngaben = True Then
        'frmKundenFS wird nach IDKunde gefiltert geöffnet
        DoCmd.OpenForm "frmKundenFS", , , "IDKunde = " & Me!IDKunde, , _
                       acDialog
      Else
        If MsgBox("Es sind noch keine Führerscheindaten erfasst...." & _
                  vbCrLf & "Möchten Sie die Daten erfassen?", _
                  vbYesNo Or vbExclamation Or vbDefaultButton1, "Hoppla") Then
            'frmKundenFS wird mit neuem DS geöffnet
            DoCmd.OpenForm "frmKundenFS", , , , acFormAdd, acDialog, _
                           Me!IDKunde
        End If
    End If
End Sub
Question
Zitat:
Ist im 2. Formular (frmKundenFS) - Eigenschaftsfenster - Register Daten - Daten eingeben: Nein gesetzt?
Idea Im Formular frmKundenFS bleibt die Auswertung des OpenArgs unverändert, wie oben!

Edit: Ist das ein neuer (noch ungespeicherter) DS in frmKunden? Dann probiere am Codeanfang:
Code:
    DoCmd.RunCommand acCmdSaveRecord

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 12:12
Rufname:

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

HURRRRRRRRRRRRRRAAAAAAAAAAAAA....

Nu gehts... Obwohl ich ehrlich gesagt nicht weiss, warum jetzt auf einmal Smile

Hab nämlich noch ein anderes Formular, dass auf die selbe Weise geöffnet werden muss. Dann brauch ich den Code nur kopieren und entsprechend umschreiben

Aber... egal... Razz

Vielen vielen Dank

Ups... muss mich noch berichtigen... Nun nimmt er die Schalftfläche No nicht mehr an sondern öffnet auch das Fenster zum Erfassen... ?

Und noch 'n Zusatz:
Er sollte mir - nach Erfassen der Angaben, das Kästchen FSAngaben auf True setzen. Wo pack ich denn dann diesen Befehl hin?
Hab jetzt die cmd-Zeile (dein edit) nicht eingefügt

_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
Willi Wipp
Moderator


Verfasst am:
01. Okt 2007, 13:35
Rufname:
Wohnort: Raum Wiesbaden

Re: Bei neuem Form wird Wert nicht angezeigt - Re: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Hi Lesmona,

vielleicht so
Code:
Private Sub cmdFSerfassen_Click()
'    If Me.Dirty Then Me.Dirty = False
    If Me!FSAngaben = True Then
        'frmKundenFS wird nach IDKunde gefiltert geöffnet
        DoCmd.OpenForm "frmKundenFS", , , "IDKunde = " & Me!IDKunde, , _
                       acDialog
      Else
        If MsgBox("Es sind noch keine Führerscheindaten erfasst...." & _
                  vbCrLf & "Möchten Sie die Daten erfassen?", _
                  vbYesNo + vbExclamation + vbDefaultButton1, _
                  "Hoppla") = vbYes Then
            'frmKundenFS wird mit neuem DS geöffnet
            DoCmd.OpenForm "frmKundenFS", , , , acFormAdd, acDialog, _
                           Me!IDKunde
            Me!FSAngaben = True
          Else
            Me!FSAngaben = False
            Me.Undo
        End If
    End If
End Sub
vbYes hinzugefuegt
_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)


Zuletzt bearbeitet von Willi Wipp am 01. Okt 2007, 14:42, insgesamt 2-mal bearbeitet
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 13:53
Rufname:

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Und wie definiere ich cmdOK und cmdAbbrechen, dass er auch den Vorgang stoppt? Das war ja vorher durch den Case-Satz definiert (habe für die Msg-Box ein Tool verwendet, dass das automatisiert hat)
_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
Willi Wipp
Moderator


Verfasst am:
01. Okt 2007, 14:01
Rufname:
Wohnort: Raum Wiesbaden

Re: Bei neuem Form wird Wert nicht angezeigt (II) - Re: Bei neuem Form wird Wert nicht angezeigt (II)

Nach oben
       Version: Office 2003

Hi Lesmona,

probieren geht ueber studieren Confused

BTW Ein Hallo und Tschuess hat noch nie geschadet.

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Lesmona
Office-Junkie aber kein Profi


Verfasst am:
01. Okt 2007, 14:15
Rufname:

AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Lesmona am 01. Okt 2007 um 14:04 hat folgendes geschrieben:
ups.... Smile
Also: Hallo erstmal ... Sorry, bin geistig so am werkeln, dass ich glatt die Anrede vergessen hab...

Als ich das letzte mal "probiert" hab, hat es mir nachher die komplette Datenbank verspult... Deswegen bin ich jetzt ein bisschen vorsichtiger.. Smile

Probiers auf jeden Fall aus...

Vielen Dank und cu

Sodele und hallo,
nu hab ichs.... musste noch vbYes definieren... der fertige Code sieht nun so aus:
Code:
Private Sub cmdFSerfassen_Click()
    If Me!FSAngaben = True Then
        'frmKundenFS wird nach IDKunde gefiltert geöffnet
        DoCmd.OpenForm "frmKundenFS", , , "IDKunde = " & Me!IDKunde, , _
                       acDialog
      Else
        If MsgBox("Es sind noch keine Führerscheindaten erfasst...." & _
                  vbCrLf & "Möchten Sie die Daten erfassen?", _
                  vbYesNo + vbExclamation + vbDefaultButton1, _
                  "Hoppla") = vbYes Then
            'frmKundenFS wird mit neuem DS geöffnet
            DoCmd.OpenForm "frmKundenFS", , , , acFormAdd, acDialog, _
                           Me!IDKunde
            Me!FSAngaben = True
        End If
    End If
End Sub

Vielen Lieben Dank nochmal....

_________________
- Jeder Computer ist nur so gut wie derjenige, der ihn bedient - Smile
JörgG
Access-Team


Verfasst am:
01. Okt 2007, 14:24
Rufname:
Wohnort: b. Dresden


AW: Bei neuem Form wird Wert nicht angezeigt - AW: Bei neuem Form wird Wert nicht angezeigt

Nach oben
       Version: Office 2003

Embarassed Embarassed Upps, sorry, sorry, das hab ich oben schon grosszügig weggelassen Very Happy Very Happy
_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
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: formular - daten werden angezeigt, aber nicht veränderbar 2 eddo51 1003 05. Okt 2005, 14:56
eddo51 formular - daten werden angezeigt, aber nicht veränderbar
Keine neuen Beiträge Access Tabellen & Abfragen: Access - MAX Wert in einer Zeitreihe? 20 Zonk 12498 26. Sep 2005, 14:04
Zonk Access - MAX Wert in einer Zeitreihe?
Keine neuen Beiträge Access Tabellen & Abfragen: Bei Eingabe Abfrage erscheint der Wert 5x ?!? 8 Amazonin 786 09. Aug 2005, 14:12
lothi Bei Eingabe Abfrage erscheint der Wert 5x ?!?
Keine neuen Beiträge Access Tabellen & Abfragen: Wert von der Tabelle abziehen 1 elmar9700 892 10. Jul 2005, 22:22
stpimi Wert von der Tabelle abziehen
Keine neuen Beiträge Access Tabellen & Abfragen: im Bericht werden "falsche" Daten angezeigt 19 Sonic 1596 07. Jun 2005, 08:14
Sonic im Bericht werden "falsche" Daten angezeigt
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage über Formular einen Wert übergeben. 4 magnum 1280 29. Mai 2005, 14:55
jens05 Abfrage über Formular einen Wert übergeben.
Keine neuen Beiträge Access Tabellen & Abfragen: Hochzählen ab bestimmten Wert 3 vitalik 893 06. Mai 2005, 12:47
stpimi Hochzählen ab bestimmten Wert
Keine neuen Beiträge Access Tabellen & Abfragen: Überprüfen ob Wert in Tabelle = NULL 3 Cossack 1498 18. Apr 2005, 17:52
Gast Überprüfen ob Wert in Tabelle = NULL
Keine neuen Beiträge Access Tabellen & Abfragen: Bei Abfrage verhindern, dass geöffnete DS angezeigt werden 2 Joshi 485 19. März 2005, 19:30
Joshi Bei Abfrage verhindern, dass geöffnete DS angezeigt werden
Keine neuen Beiträge Access Tabellen & Abfragen: Wert von Kontrollkästchen für Abfrage verwenden? 1 JoHo 1690 21. Jan 2005, 11:41
JoHo Wert von Kontrollkästchen für Abfrage verwenden?
Keine neuen Beiträge Access Tabellen & Abfragen: Wenn Wert nicht vorhanden nimm den nächsten 2 Ogdo 788 29. Dez 2004, 12:40
Gast Wenn Wert nicht vorhanden nimm den nächsten
Keine neuen Beiträge Access Tabellen & Abfragen: Nach Union Abfrage wird der Felddatentyp anders angezeigt 9 Hexenbaendiger 804 22. Dez 2004, 14:56
Hexenbaendiger Nach Union Abfrage wird der Felddatentyp anders angezeigt
 

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