Supportnet / Forum / Datenbanken

Hallo Ich habe folgendes Problem: Ich habe ein Formular erstellt, über welches der Anwender neue Datensätze in eine Tabelle einträgt. Wenn der Anwender nun das Formular öffnet, bekommt er immer den ersten Datensatz der Tabelle angezeigt. Was muss ich tun, damit bei Öffnen des Formulars ein "leerer" Datensatz, i.S. letzter Datensatz + 1, angezeigt wird. Schonmal Danke Connie

Hallo Connie,

um einen neuen Datensatz beim Formularöffnen anzeigen zu lassen, gehe folgendermaßen vor.

Gehe in das Formularereignis Beim Öffnen, klicke auf die drei Punkte am Zeilenende und öffne den VBA-Editor. Trage nun zwischen Privat Sub.. und End Sub folgenden Code ein:

[Code]Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord acDataForm, "Formular1", acNewRec
End Sub[/Code]

"Formular1" musst du natürlich durch deinen Formularnamen ersetzten.

Gruß

Oliver

Hallo
Noch eine Frage :-)
Gibt es die Möglichkeit die Farbe der Befehlbutton anzupassen. Über die Eigenschaften sehe ich die Möglickeit nicht.

Schon mal Danke
Connie

Die Eigenschaft gibt es in Access leider nicht, du kannst aber einen "Umweg" gehen, indem du ein Bild erstellst und dieses mit der Bild-Eigenschaft des Buttons auswählst.

Gruß

Oliver

Habe jetzt ein bmp eingefügt. Vielen Dank Connie

...aber nimm vielleicht lieber ein .gif, oder .jpg.

Hallo Oliver
Vielleicht könntes du mir bei einem ähnlichen Problem wie oben weiterhelfen.

Ich habe einen Button "Datensatz speichern" eingefügt. Nun würde ich gern, dass gleichzeitig mit dem DS speichern ein leeren Datensatz anzeigt wird.

Ich habe das Statement

Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord acDataForm, "Formular1", acNewRec
End Sub

eingefügt, leider ohne Erfolg (kommt ne Fehlermeldung).

Was kann ich tun?
Vielen Dank Connie

Hallo Connie,

erweitere sinngemäß deinen Schaltflächencode:

Private Sub Schaltflächenname_Click(Cancel As Integer) 
...
(Dein bisheriger Code)
...
DoCmd.GoToRecord acDataForm, "Formular1", acNewRec 
End Sub

"Formular1" musst du durch deinen Formularnamen ersetzten.


Gruß

Oliver

Hallo Oliver,
Vielen Dank für deine Hilfe. Ich denke ich habe jetzt kapiert, wo was in den Code kopiert werden muss.

Ich hätte ne ganz einfache Frage:

Wie kennzeiche ich eigentlich KOmmentarfelder ?
IN SQL ist es doch /*...*/ scheint hier aber nicht zu funktionieren.

Vielen Dank
Connie

Hallo,

Kommentare werden am Zeilenbeginn durch ein Hochkomma gekennzeichnet

Gruß
OmaDuck

Hallo Oliver
Ich habe ein kniffliges Problem, welches ich eigentlich schon gelöst hatte aber nun funktioniert es plötzlich nicht mehr. Vielleicht kannst du mir da weiterhelfen.

Ich habe ein Formular_1 mit welchem Daten erfasst werden. In diesem Formular kann ich auch Selektionskriterien für eine Suche eingeben. Über einen Button "Formular öffnen" starte ich die Anfrage und in einem neuen Fenster (Formular_2) wird der gefundene Datensatz ausgeben.
Der BUG ist nun, dass das Suchkriertium aus Formular_1 als eigenständiger Datensatz gespeichert wird.

Ich habe versucht sowohl beim Button "Formular öffnen" bzw. beim Button Formular schliessen" (Formular_2) folgende Befehle einzubauen:
Fornular leeren (der von dir)
Datensatz löäschen
Datensatz rückgängig
aber leider ohne Erfolg. Hast du ne Idee, wo es hier klempt?

Vielen Dank schonmal
Connie

PS Hier mal als Beispiel der Code für den Button aus Formular_2
Private Sub Befehl31_Click()
On Error GoTo Err_Befehl31_Click

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70

DoCmd.Close




Exit_Befehl31_Click:
Exit Sub

Err_Befehl31_Click:
MsgBox Err.Description
Resume Exit_Befehl31_Click

End Sub

• wie lade ich ein leeres Formular
• Textfelder beim Öffnen automatisch leeren
• Datensatz / Formular
• Brauch Hilfe mit MS Access Makro
• Globale Variable im Formular Anzeigen