Hallo zusammen,
ich möchte gerne das aktivieren in einer Optionsgruppe nur erlauben, wenn in einer entsprechenden Spalte ein Wert steht (Siehe Bild im Anhang).
(https://ibb.co/Lvyr4GW)
Also wenn in der Spalte Telefonnummer nichts steht und man will im Optionsfeld Telefon anklick, soll eine Meldung kommen und das Optionsfeld soll nicht aktiviert werden sondern der Fokus soll dann zum Eingabefeld Telefonnummer wechseln.
Es kommt der Laufzeitfehler 2448 - Sie können dem Objekt keinen Wert zuweisen
Private Sub obtTel_GotFocus()
If Not IsNull(Me.txtTelefon.Value) Then
MsgBox ("Telefonnummer vorhanden!")
Else
MsgBox ("Bitte eine Telefonnummer eingeben!")
Me.obtTel.Value = False
Me.txtTelefon.SetFocus
End If
End Sub
Debugger springt auf diesen Wert: Me.obtTel.Value = False
Kann ich hier kein True oder False zuweisen? ::)
Wie könnte ich den die Optionsgruppe auf default zurücksetzen, damit wenn der Focus zurück auf das Feld Telefonummer springt wieder alles deaktiviert ist?
Zitat von: neuland14 am März 14, 2023, 16:57:28Also wenn in der Spalte Telefonnummer nichts steht und man will im Optionsfeld Telefon anklick, soll eine Meldung kommen und das Optionsfeld soll nicht aktiviert werden sondern der Fokus soll dann zum Eingabefeld Telefonnummer wechseln.
Warum so kompliziert?
Wäre es nicht viel einfacher beim Wechsel des Datensatzes im Formular (BeimAnzeigen-Ereignis) die Optionsgruppe entweder zu aktivieren oder zu deaktivieren, abhängig davon, ob eine Telefonnummer eingetragen ist?
Hallo,
wenn ich das recht verstehe, soll ein bevorzugter Kontakt auch wählbar sein, wenn z.B. alle 3 Kontaktmöglichkeiten ausgefüllt sind, richtig ?
In einer Optionsgruppe kann ein einzelner Wert nicht abgefragt werden. Eine Optionsgruppe hat Zahlen als Rückgabewert, die beim Anlegen der Opt.Gruppe von Dir festgelegt wurden. Daher ist die Abfrage auf True oder False nicht möglich bzw. falsch. Es muss die Zahl abgefragt werden über den Namen der Optionsgruppe. An den Namen der Gruppe kommst wenn der Rahmen der Gruppe markiert wird.
Die (von Dir) vergebenen Zahlen kannst Du in den Eigenschaften ermitteln.
Was Du auch machen kannst, Du kannst die einzelnen Optionsfelder in Abhängigkeit eines Eintrags sichtbar machen, ist keine Email eingetragen, ist das Optionsfeld auch nicht sichtbar.
Ich würde das ganze Vorhaben aber so nicht machen. Ich würde heir eine n:m Beziehung anlegen.
- Eine Tabelle für die Art der Kontakte (Email, Telefon Festnetz, Mobil, Fax, Homepage usw.) als je eine Datensatz.
- Eine Tabelle zur Zuordnung der Art zur Adresse in je einem Datensatz. In diese Tabelle kommt ein Ja/Nein Feld (zuBevorzugen) das einfach angehakt wird. Per VBA kann man auch dafür sorgen, dass nur ein Haken möglich ist.
Die Optionsgruppe entfällt ersatzlos.
Zeige bitte das aktelle Beziehungsbild.
Zitat von: MzKlMu am März 14, 2023, 17:24:55wenn ich das recht verstehe, soll ein bevorzugter Kontakt auch wählbar sein, wenn z.B. alle 3 Kontaktmöglichkeiten ausgefüllt sind, richtig ?
Ja, genau!
Zitat von: MzKlMu am März 14, 2023, 17:24:55Ich würde das ganze Vorhaben aber so nicht machen. Ich würde heir eine n:m Beziehung anlegen.
- Eine Tabelle für die Art der Kontakte (Email, Telefon Festnetz, Mobil, Fax, Homepage usw.) als je eine Datensatz.
- Eine Tabelle zur Zuordnung der Art zur Adresse in je einem Datensatz. In diese Tabelle kommt ein Ja/Nein Feld (zuBevorzugen) das einfach angehakt wird. Per VBA kann man auch dafür sorgen, dass nur ein Haken möglich ist.
Die Optionsgruppe entfällt ersatzlos.
Das hört sich für mich als Anfänger erstmal nicht so einfach an ::)
Hier ist wieder meine Test-DB im Einsatz (lege ich mal bei)!
Noch eine Allgemeine Frage, wie macht ihr das hier mit Screenshots im Beitrag?
Ich versucht bei ImgBB ein Bild hochzuladen damit man dies hier über die URL Anzeigen kann https://ibb.co/Lvyr4GW
Leider erscheint kein Bild, daher habe ich es als Anhang mitgeschickt!
Hallo,
wird es auch zukünftig nur diese 3 Kontaktmöglichkeiten geben?
Bitte meinen letzten Beitrag noch einmal lesen, habe noch was ergänzt.
Bilder kannst du wie die DB hochgeladen, muß aber nicht gezippt werden.
Zitat von: MzKlMu am März 14, 2023, 17:24:55Was Du auch machen kannst, Du kannst die einzelnen Optionsfelder in Abhängigkeit eines Eintrags sichtbar machen, ist keine Email eingetragen, ist das Optionsfeld auch nicht sichtbar.
Hört sich auch gut an :) nur wie kann ich das umsetzen :o
Zitat von: MzKlMu am März 14, 2023, 18:00:08wird es auch zukünftig nur diese 3 Kontaktmöglichkeiten geben?
In der Test-DB schon aber im geplanten Projekt könnten bei den heutigen Möglichkeiten noch andere Varianten dazu kommen ;)
Hallo,
ZitatIn der Test-DB schon aber im geplanten Projekt könnten bei den heutigen Möglichkeiten noch andere Varianten dazu kommen
Unter diesen Bedingungen bleibt nur der Vorschlag mit der n:m Beziehung. Bei Deiner jetzigen Version, erfordert eine neue Möglichkeit das Anpassen von Formularen, Abfragen und VBA Code und das darf nicht sein.
Ich baue Dir das später mal um, wird aber etwas dauern.
Hallo,
im Anhang die etwas umgebaute DB.
Ich habe jetzt keine Lust viel zu schreiben, es ist schon spät. Schaue es Dir an.
Bei Fragen bitte melden.
PS:
Auch das Genre ist als n:m Beziehung aufzubauen. Ein Film kann zu mehr als einem Genre gehören.
Zitat von: MzKlMu am März 15, 2023, 00:32:34Bei Fragen bitte melden.
Hi Klaus,
super, danke für deine Mühe :)