online 1
gast (50)

/ Forum / Datenbanken

DatenbankenDatenbanken

Fragevon Sylmo_HB vom 02.09.2020, 15:06 Options

Acces Inhalt eines feldes in anderes feld übertragen

Hallo

habe wieder mall ein Problem,

In einem Formular "firma" befindet sich ein Feld "Firmaname "
und ein Unterformular mit einigen daten von "kontaktpersonen" auf dem sich auch ein Button "Neu" befindet, der ein folstendigen "kontaktpersonen" Formular öffnet wo mann einen neuen Datensatz mit derr neue Kontaktperson eintragen lässt.

Ich möchte aber das wehrend des öffnens gleichzeitig die "Firmaname" aus dem Formular "Firma" mit übernomen und in entsprechendes Feld von "kontaktpersonen" eingetragen wird das ich die Firma nicht erst im Droppdown Menu suchen muss.

Hier noch mein Script der natürlich ergetzt werden muss

Private Sub cmdNeu_Click()

    Dim DocName As String  
    DocName = "t_f_kontaktpersonen"
    DoCmd.OpenForm DocName, dataMode:=acFormAdd, WindowMode:=acDialog
    Me.Requery

End Sub


Danke für antworten im voraus

Sylmo


Antwort schreiben

Antwort 1 von Marie vom 08.09.2020, 01:43 Options

Ich verstehe nicht wirklich was Du da tust? Um einen neuen Datensatz anzulegen musst Du doch nicht ein neues Formular öffnen??

Ferner musst Du nicht schreiben
dataMode:=acFormAdd, WindowMode:=acDialog, es genügt doch zu schreiben....... , acFormAdd, acDialog.

Ist "Firmaname " in einer eigenen Tabelle? Dann hast Du doch bestimmt für jede Firma eine eigene ID oder Autonummer, und die würde ich übernehmen, damit eindeutig der Kontaktperson die richtige Firma zugeordnet ist.

Verknüpft 1:n, Firma auf der 1Seite.

Gruß Marie

Ähnliche Themen

Acces Ja/Nein Abfrage (bin Acces Anfänger)
Mercedes2007  24.05.2007 - 98 Hits - 3 Antworten

Inhalt Kombi-Feld in andere Tabelle schreiben
mbalrog  16.08.2007 - 21 Hits - 1 Antwort

Summe von Feld A wenn Feld B = XYZ
osi  14.11.2007 - 79 Hits - 2 Antworten

Acces Berechnetes Feld in Bericht summieren
Nathi  15.03.2008 - 97 Hits - 4 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026