Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Datenbanken
Datenbanken
Fragevon tina79 vom 08.07.2021, 16:31 Options
ampel in formular einbauen
hallo experten,
ich möchte gerne in mein formular eine ampel einbauen die je nachdem welcher wert in einem feld steht unterschiedlich leuchtet.
wo bekomme ich so eine ampel her?
und wie kann ich die mittels vb ansteuern, dass sie bei unter 80% rot, bei 80-90& gelb und bei 90-100% grün leuchtet.
um ein paar schlaue tips bin ich euch jetzt schon dankbar
gruss aus münchen
tina
ich möchte gerne in mein formular eine ampel einbauen die je nachdem welcher wert in einem feld steht unterschiedlich leuchtet.
wo bekomme ich so eine ampel her?
und wie kann ich die mittels vb ansteuern, dass sie bei unter 80% rot, bei 80-90& gelb und bei 90-100% grün leuchtet.
um ein paar schlaue tips bin ich euch jetzt schon dankbar
gruss aus münchen
tina
Antwort 1 von RalfH vom 09.07.2021, 12:00 Options
Hallo Tina,
man nehme, 3 Kreise in Kreis1=Rot,Kreis2=Gelb und Kreis3=Grün.
Diese werden Standartmäßig auf unsichtbar gesetzt.
Wenn im Feld1 die Werte stehen, kann eine If Then Else Konstruktion dir weiter helfen.
If Text1.value < 80 then
Me.Kreis1.visible=true
Elseif Text1.value >=80 or <=90 then
Me.Kreis2.visible = true
usw.
man nehme, 3 Kreise in Kreis1=Rot,Kreis2=Gelb und Kreis3=Grün.
Diese werden Standartmäßig auf unsichtbar gesetzt.
Wenn im Feld1 die Werte stehen, kann eine If Then Else Konstruktion dir weiter helfen.
If Text1.value < 80 then
Me.Kreis1.visible=true
Elseif Text1.value >=80 or <=90 then
Me.Kreis2.visible = true
usw.
Antwort 2 von tina79 vom 09.07.2021, 13:04 Options
hallo ralf,
klingt gut dein vorschlag..
aber wie kann ich in access ein kreis in einem formular zeichnen?
gehen da nicht nur rechtecke?
danke & gruss
tina
klingt gut dein vorschlag..
aber wie kann ich in access ein kreis in einem formular zeichnen?
gehen da nicht nur rechtecke?
danke & gruss
tina
Antwort 3 von tina79 vom 09.07.2021, 14:09 Options
ich nochmal..
funktioniert soweit..
nur bei dem ampelwert
>=80 or <=90
sagt er mir ein fehler an
idee?
gruss
funktioniert soweit..
nur bei dem ampelwert
>=80 or <=90
sagt er mir ein fehler an
idee?
gruss
Antwort 4 von RalfH vom 09.07.2021, 14:53 Options
Hi tina79,
Zu Antwort1:
Ich erstell sowas in Powerpoint, speicher das als Grafik, und benutze diese dann, oder mal im Netz schauen.
Zu Antwort2;
Die Fehlermeldung bitte im Detail.
Zu Antwort1:
Ich erstell sowas in Powerpoint, speicher das als Grafik, und benutze diese dann, oder mal im Netz schauen.
Zu Antwort2;
Die Fehlermeldung bitte im Detail.
Antwort 5 von tina79 vom 09.07.2021, 16:04 Options
hy ralf,
richtig. so habe ich es auch gemacht. funktioniert perfekt im PP.
fehlermeldung sagt er :
kriterium unverträglich, erwarte ausdrucksende.
???
ohne > 80 OR < 90 funktioniert es.
gruss
tina
richtig. so habe ich es auch gemacht. funktioniert perfekt im PP.
fehlermeldung sagt er :
kriterium unverträglich, erwarte ausdrucksende.
???
ohne > 80 OR < 90 funktioniert es.
gruss
tina
Antwort 6 von KJG17 vom 09.07.2021, 17:13 Options
Hallo Tina,
ohne davon wirklich Ahnung zu haben erscheint mir OR unlogisch, da damit auch Kriterien eingeschlossen sind, weche eigentlich nur für 'Rot' und 'Grün' gelten sollen. Kleiner 80 (Rot) ist auch kleiner 90 (Gelb) und größer 90 (Grün) ist auch größer 80 (Gelb).
Versuche es mal mit AND um Unter- UND Obergrenze für 'Gelb' festzulegen.
Gruß
Kalle
ohne davon wirklich Ahnung zu haben erscheint mir OR unlogisch, da damit auch Kriterien eingeschlossen sind, weche eigentlich nur für 'Rot' und 'Grün' gelten sollen. Kleiner 80 (Rot) ist auch kleiner 90 (Gelb) und größer 90 (Grün) ist auch größer 80 (Gelb).
Versuche es mal mit AND um Unter- UND Obergrenze für 'Gelb' festzulegen.
Gruß
Kalle
Antwort 7 von RaHi vom 09.07.2021, 17:55 Options
Hallo tina79,
ich realisiere das mit Graphiken aus Google, suche unter Bilder einfach nach "Ampel rot", Ampel gelb" und "Ampel grün" Die findest da viele Graphiken (Lizenz evtl. beachten), die zusammen passen. Diese Graphiken lade ich in mein Formular ein und lege sie alle übereinander und verpassen denen die Namen "ampel_rot" etc. Je nach "Ampelwert" setze ich die Eigenschaft "visible" entsprechend. Mein Code dafür sieht so aus:
Evtl. muss du noch ein leeres Feld berücksichtigen.
Gruß
Ralf
ich realisiere das mit Graphiken aus Google, suche unter Bilder einfach nach "Ampel rot", Ampel gelb" und "Ampel grün" Die findest da viele Graphiken (Lizenz evtl. beachten), die zusammen passen. Diese Graphiken lade ich in mein Formular ein und lege sie alle übereinander und verpassen denen die Namen "ampel_rot" etc. Je nach "Ampelwert" setze ich die Eigenschaft "visible" entsprechend. Mein Code dafür sieht so aus:
Private Sub Ampelwert_Change()
Me!ampel_grün.Visible = Me!Ampelwert.Text > 80
Me!ampel_gelb.Visible = Me!Ampelwert.Text <= 80 And Me!Ampelwert.Text >= 20
Me!Ampel_rot.Visible = Me!Ampelwert.Text < 20 And Me!Ampelwert.Text > 0
End SubEvtl. muss du noch ein leeres Feld berücksichtigen.
Gruß
Ralf
Ähnliche Themen
AccessAbfragekriterium aus formular auslesen
Haas-Meier 13.02.2008 - 84 Hits - 2 Antworten
Acces Formular um Inputfaktor erweitern
Dr.Hardy 17.03.2008 - 11 Hits - 2 Antworten
Access-Formular erstellen VBA
stirlitz 27.04.2008 - 53 Hits - 1 Antwort
Filtern aus Formular
era 03.09.2008 - 63 Hits - 6 Antworten
Formular automatisch aktualisieren?
Hans_83 13.07.2009 - 337 Hits - 5 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
