Neueste Beiträge

#71

Tabelle/Abfrage / Re: Eingabe einer Zahl inklusi...

Letzter Beitrag von Knobbi38 - November 24, 2025, 21:51:29

Hallo Markus,

leider unterstützt VBA keine Pointer auf Funktionen, insofern dürften Auswertungen mit VBA nicht ganz einfach sein. Was die Tabellen betrifft, geht so etwas mit Textfeldern.

Hier mal eine Idee, wie man so etwas mit VBA nachbilden könnte:

Code [Auswählen] Erweitern

s$ = "> 98.6"
? Cbool(Eval("98 " & s))
Falsch
? Cbool(Eval("98.7 " & s) )
Wahr
Allerdings rate ich in diesem speziellen Fall auf eine andere Programmiersprache als VBA auszuweichen, bei der es mehr modernere Möglichkeiten gibt. Suche mal mit den Begriffen "programmiersprache eval von ausdrücken", vielleicht wird es dann etwas deutlicher.

Eine mögliche Plattform für solche Aufgaben wäre hier eventuell "https://de.mathworks.com/products/matlab.html"

Knobbi38
 

#72

Tabelle/Abfrage / Eingabe einer Zahl inklusive V...

Letzter Beitrag von Markus R. - November 24, 2025, 20:17:15

Hallo,

aus einer chem. Analyse stammt der Messwert "> 98,6". Diesen möchte ich dokumentieren und später mit einem Sollwert ">= 98,0" vergleichen.
Wie geht man beim Tabellenentwurf mit einer Zahl plus Vergleichszeichen um? Welcher Datentyp ist zu wählen und wie erleichtert man ggf. schon in der DB Struktur den Vergleich mit dem Sollwert?

Bei meiner bisherigen Suche wurde ich auf Gültigkeitsregeln verwiesen, doch darum geht es nicht. In dem Feld für den Messwert ist auch z.B. die Eingabe der Zahl "50" erlaubt.

Vielen Dank vorab,
Markus

#73

Tabelle/Abfrage / Re: Bedingte Formartierung im ...

Letzter Beitrag von Knobbi38 - November 24, 2025, 19:18:35

Hier ist der Einsatz von VBA-Code nicht erforderlich, da eine Kombobox FCs unterstützt. Man muss allerdings für die Bedingung das richtige Feld bzw. Spalte auswählen.

Knobbi38

#74

Tabelle/Abfrage / Re: Bedingte Formartierung im ...

Letzter Beitrag von Beaker s.a. - November 24, 2025, 18:39:36

Hallo,

Mir fällt zwar im Moment auch nichts Besseres ein, aber sehr generisch
ist das nicht,- Code ändern zu müssen, wenn ein Service dazu kommt.

Oder doch. Wenn du den Farbcode in der Tabelle in jedem DS hinterlegst,
kannst du die Farbe After-Update zuweisen

Code [Auswählen] Erweitern

Me.DeinKombi.BackColour = Me.DeinKombi.Column(SpalteN) SpalteN = SpaltenNummer des Farbfeldes (Basis 0)

gruss ekkehard

#75

Formular / Re: Formular "vergisst" Datenq...

Letzter Beitrag von Beaker s.a. - November 24, 2025, 18:30:22

Hallo Rene,

Bevor du weitermachst, beherzige Ulrichs Hinweis bezügl. Nachschlagefeldern.
Mach das mit 1:n Beziehungen, da hast du bessere Kontrolle.
Wie viele Absender hast du denn überhaupt?
Ein Kennzeichen für Absender/Empfänger hast du ja scheinbar, sonst könntest
du ja keine zwei getrennte Abfragen haben.
Ohne mehr zu wissen, lässt sich schlecht helfen. Ich würde als erstes es wohl
mit zwei UFo versuchen.

gruss ekkehard

#76

Tabelle/Abfrage / Re: Bedingte Formartierung im ...

Letzter Beitrag von Debus - November 24, 2025, 14:22:43

Hey, versuch mal das hier:

Code [Auswählen] Erweitern

Private Sub cbo_Service_AfterUpdate()
    Select Case Me.cbo_Service.Value
        Case "Offen"
            Me.cbo_Service.BackColor = RGB(255, 200, 200) ' Hellrot
        Case "Erledigt"
            Me.cbo_Service.BackColor = RGB(200, 255, 200) ' Hellgrün
        Case "In Bearbeitung"
            Me.cbo_Service.BackColor = RGB(200, 200, 255) ' Hellblau
        Case Else
            Me.cbo_Service.BackColor = RGB(255, 255, 255) ' Weiß (Standard)
    End Select
End Sub
Sollte gehen

Holger

#77

Tabelle/Abfrage / Re: Bedingte Formartierung im ...

Letzter Beitrag von Knobbi38 - November 24, 2025, 13:08:42

Dann dürfte deine Bedingung bzw. der Ausdruck nicht stimmen. Du musst schon das richtige Feld prüfen.

Knobbi38

#78

Formular / Re: Formular "vergisst" Datenq...

Letzter Beitrag von Knobbi38 - November 24, 2025, 13:02:04

Hallo René,

kannst du eine Beispiel-DB mit ein paar Testdaten und dem von dir beschriebenen Formular hochladen, damit man das nachvollziehen kann?

Im Übrigen solltest du auf solche Nachschlagefelder in Tabellen verzichten und diese durch "normale" Tabellen mit einer 1:N Beziehung ersetzen. Mit den Nachschlagefeldern baut Access auch so eine Struktur auf, versteckt sie aber und das Ganze wird damit eigentlich nur schwieriger zu handhaben. Besser gleich "richtig" machen.


Knobbi38

#79

Tabelle/Abfrage / Bedingte Formartierung im Komb...

Letzter Beitrag von mbdi - November 24, 2025, 12:28:36

Moin

Ich suche mir leider einen Wolf und finde nichts passendes 
Folgendes. Ich habe ein Kombinationsfeld "cbo_Service" Gefüllt mit Werten aus einer Tabelle.
Wenn ich nun eine Auswahl treffe, möchte ich, das das Kombifeld je nach Auswahl farbig hinterlegt wird.

z.B. Auswahl "In Bearbeitung" dann gelb hinterlegt.
Wenn ich die Auswahl in ein extra Feld übergebe, funktioniert das. Wenn ich aber nur das Kombinationsfeld habe nicht.

Ich nutze Access für Office 365

#80

Formular / Re: Formular "vergisst" Datenq...

Letzter Beitrag von rene.hundert - November 23, 2025, 19:03:23

Servus,

ich habe in der tblVersandartikel die Mehrfachauswahl Empfänger und Absender (im Hintergrund ergeben sich dann die Werte Empfänger.Value und Absender.value) beide greifen als Quelle auf tblAdressat zu.

Um mir jetzt in einem Formular zum Beispiel die E-Mail-Adresse sowohl des Empfängers, als auch des Absender anzeigen zu lassen, habe ich die beiden Abfragen qryEmpfänger und qryAbsender erstellt.

Nun habe ich wiederrum eine qryEmailVersand erstellt, in welcher ich natürlich nach der Versandart E-Mail filtere und mir natürlich auch Empfänger und Absender mit deren E-Mail-Adressen anzeigen lassen will.

Die qryEmailVersand funktioniert auch einwandfrei. Sie zeigt mir die Felder tblAdressen.Adressat sowohl der Tabelle qryAbsender, als auch der Tabelle qryEmpfänger an.

Die Namen habe ich angepasst mit ctlAbsenderEmail und ctlEmpfängerEmail

Vielen Dank schon einmal dafür