Office: Steuerelemente Ungebundenes Feld

Hallo,
ich habe folgende Formel drin:

=Wenn(Null[Kunde];"";[FaName] & " | " & [Ort])

Leider wirft es mir wenn das Feld Kunde leer ist immer diesen "|" in das Feld, das soll aber leer bleiben, wenn das Feld Kunde leer ist.
habe schon gegoogelt, bin da bisher nicht fündig geworden, oder hab nach was falschem gesucht.
ich hoffe ihr könnt mir helfen.
Vielen lieben Dank schon mal für eure Hilfe
Gruss Stephan

 

habe es herausgefunden:

=Wenn(IstNull([Kunde]);"";[QKunde])

danke

gruss stephan

 

Hallo,
jetzt ergibt sich doch noch ein kleines Problem, wenn ich jetzt die Daten nicht von einer qry oder tbl befülle, möchte ich eventuell per Hand da einen Namen eintragen, leider hab ich das nicht bedacht und finde keine Lösung. Vielleicht hat jemand eine Idee für mich.
vielen lieben Dank
gruss Stephan

 

Hallo Stephan,

Was wird da wie "befüllt?"

Grundsätzlich kann ein Steuerelement, welches einen Ausdruck als Steuerelementinhalt verwendet, nicht mehr editiert werden.
Kannst du einmal erläutern, was du mit dem Ausdruck "=Wenn(IstNull([Kunde]);"";[QKunde])" eigentlich erreichen möchtest?

Knobbi38

 

Hallo Knobii38,

Es soll eigentlich ein ungebundenes Feld befüllt werden, entweder mit einer Vorauswahl an angelegten Kunden, oder auch manuell da eingetragen werden.

über Buttom Auswahl

gruss stephan

 

Ja schon, aber welchen Nährwert soll das haben, wenn das Feld nicht gespeichert wird?
Für eine "Vorauswahl" nimmt man eigentlich eine Kombobox, nur mal so ...

Wieso soll eigentlich dann dort ein Wert von QKunde angezeigt werden, wenn das Feld Kunde NULL ist? Da stimmt wahrscheinlich dein Datenmodell noch nicht ganz.

 

Hallo,

also das Feld "Kunde" enthält die KundenID, und das QKunde ist von der Abfrage da wird "Firma | Ort" generiert der mit auf den Ausdruck soll, aber es gibt auch Kunden die keine Stammdaten haben, die sollten dort per Hand eingetragen werden können.

gruss stephan

 

Tut mir leid Stephan, aber da kann ich dir nicht mehr folgen.

 

Moin Stephan,

die Voreingabe =Wenn(IstNull([Kunde]);"";[QKunde]) nimmst Du aus dem Feld raus, damit es komplett ungebunden ist.
Dann nimmst Du das Ereignis, welches zur Auswahl des Datensatzes führt (Beim Öffnen, nach Aktualisierung...je nachdem) und schreibst in den VBA-Code

Code:

Me.TextfeldKundeOrt = Nz(QKunde, "")

Das wird dann einmalig ins Feld geschrieben und kann danach locker verändert werden.

Gruß
Doming

 

Hallo,
ich hab mal die Datenbank angehängt.
@Doming: ich habs versucht aber nichts hat gewollt, hat mir immer nur ein leeres Feld angezeigt.
gruss stephan

 

Hallo,

4 Datenbanken? Viele Formulare.... um welches geht es?
Ich hoffe die Datensätze sind anonymisiert...

Gruß
Doming

 

Hallo,

es sind meine Testdaten
die HauptDB ist das mit Quittung_ ....

es geht um das Formular frm_Quittung
gruss stephan

 

Hallo,

ich habe mal ein gebundenes Textfeld txtQKunde eingefügt (unsichtbar)


und Deinen Code so angepasst

Code:

Private Sub Form_Current()
    Me.AllowEdits = Not Me.cboSperren
    If Me.cboSperren = True Then
        Me!löschen.Enabled = False
        Me!speichern.Enabled = False
    Else
        Me!löschen.Enabled = True
        Me!speichern.Enabled = True
    End If
    If Nz(Me.txtQKunde, "") <> "" Then Me.txtKunden = Me.txtQKunde
End Sub

Wenn Du ohne neues Textfeld arbeiten möchtest, kannst Du im Code den QKunden auch mit DLookup heraussuchen, aber da der Datensatz sowieso aktiv ist, kann man sich die erneute Abfrage auch sparen.

Noch eine Anmerkung: Umlaute in Steuerelementnamen sind nicht sinnvoll, besser mit „loeschen” arbeiten.

Edit: Wenn die Kundennamen & Ort so sehr lang sind, solltest Du vielleicht Deine Textbox etwas vergrößern. Abgeschnittene Texte sehen unschön aus.

Noch ein Edit: Wenn Du die Daten in dem Textfeld veränderst, werden sie natürlich nicht in den Datensatz übernommen. Das müsstest Du dann evtl. noch ins After_Update einbauen

Gruß
Doming

 

Hallo Doming,

habe es so gemacht, aber wenn ich einen neuen Datensatz erstellen möchte übernimmt er den letzten eintrag aus QKunde und wenn ich das m al ändern möchte bleibt der alte Name bestehen erst nach einem Wechsel anderer Datensatz und zurück zeigt mir das richtige dann an.
hab es wie du beschrieben auch nach After_Update gemacht.
danke
gruss stephan

 

Du weißt, wofür das AllowEdits steht?