Office: (Office 2003) Kontrollkästchen in VBA

Hallo
noch was zu InputBox:
nach JosefP er ist der Grosse Kenner *Smilie
StrPtr liefert die Speicheradresse eines Strings.
Mit Cancel wird vbnullstring übergeben und vbnullstring zeigt immer auf 0.
Anm.:Ptr steht dabei für Pointer (Zeiger). Es gibt auch noch ObjPtr oder VarPtr.

Code:

OT
@haifisch
ich Wohne am Thunersee da gibt es logischer weise Keine Haifische
aber da für Thunfische *redface *laugh

 

Urgs.
Da frage ich doch nur wenn die Eingabe ein Datum ist, dann tue was auch immer und wenn nicht gib eine messagebox aus.

aber was, wenn man jetzt 2 mal auf abbrechen drückt, also die eingabe des Namen verweigert sozusagen und des Datums....?!

 

Hallo
nicht getestet:
aber ich würde sagen dann ist das Resultat beider INputBox
NULL oder Leer
z.B. If Len(ResultatInputbox(Datum))

 

Wurde schon einmal daran gedacht, die Inputboxen durch ein ordentliches Formular zu ersetzen?
Der Beitrag Inputbox hat sich durch die vorliegende Diskussion weitere Berechtigungspunkte verdient.

Der Code in #1 bezieht sich auf ein Formular. Somit wäre es eine simple und vor allem bedienerfreundliche Variante, dem Anwender über zwei Kombifelder gültige Werte zur Auswahl anzubieten, die zudem durch einen sinnvollen Standardwert vorbelegt sein könnten.

 

Hallo

dazu s. mein Anhang

 

//OT:
@Ruedi: Wenn Du pro Stichwort ein PDF verbreitest, solltest Du vielleicht daran denken, diesen Vorgang zu automatisieren.

 

Nein, es wird kein Formular geöffnet. Es wird direkt ein Berichrt geöffnet, der auf einer Abfrage basiert und ZUSÄTZLICH noch die parameter Name und Datum (nach Wunsch) filtern soll.
und eben außerdem das Kontrollkästchen auf Yes gesetzt sein muss. Das klappt ja auch alles sehr gut so.
Mein Problem ist nur:
Das wenn man die beiden nacheinander folgenden Inputboxen beide mit "abbrechen" bestätigt, dann gibt er einen Fehler zurück, weil bei Datum = NULL eben ein String zurück gegeben wird und das bei als Date deklinierter Variable wohl nicht geht.
Jetzt habe ich varDatum als Variant dekliniert und es wird trotzdem der Fehler "Typenunverträglichkeit" ausgegeben.

 

#15

Ja, ich sage VarDatum, aber nur, weil ich vorher einfach dekliniert habe, dass die Variable varDatum heißen soll. Sonst nichts.
Leider funktioniert es wie gesagt auch nicht wenn ich varDatum als Variant dekliniere.

 

Jetzt kommt der Fehler aber an anderer Stelle, oder?

Code:

sollte keinen Fehler auslösen.

Ich vermute, dass es hier hängen wird:
Code:

Grund: cdbl(vbnullstring) funktioniert nicht.
Du wirst also nach der Inputbox eine Prüfung einbauen müssen, ob varDatum ein Datum (oder vbNullstring) enthält.
Vielleicht willst du in so einem Fall den Bericht gar nicht öffnen.

 

Also der Fehler kommt wie vorhin auch schon immer noch bei:

Code:

Mir würde reichen, wenn man sagen könnte, wenn in varServicemanager, also im Namenfenster, schon nichts eingetragen wurde, dann beende direkt und öffne gar nicht mehr das fenster Datumeingeben.
Aber da habe ich auch noch nicht wirklich herausgefunden wie ich das machen soll.

 

Du willst mir jetzt aber nicht sagen, dass du noch nie mit If gearbeitet hast?

Code:

 

WEnn ich das so einfüge, und außerdem noch einfüge, was passiert, wenn eben DOCH ein richtiges Datum eingegeben wurde, eben, dass er zählen und ausgeben soll und damit den Bericht öffne.
Funktioniert das nicht *frown.gif*
Er springt immer zu dem Punkt
Code:

obwohl in der Datenbank welche vorhanden sind und wenn ich den Teilcode aus dem letzten Beitrag wieder rausnehme kommt zwar der Fehler "Typenunverträglichkeit", der jetzt nicht da ist ABER es ist das problem, dass er keine ordentlichen Daten mehr ausgibt. :-(

 

Hallo

Dein Befehl jezt:

versuche:
C = DCount("Aenderungsdatum", "tbl_themen",_
"Aenderungsdatum >= " & Str$(CDbl(cDate(varDatum))))

CDate-->Konvertiert ein beliebiger gültiger Datum/Zeit–Ausdruck in Date (Deutsch ZDate)


•wenn das nichts Hilft
kannst du eine Kleine Muster Access DB machen (etwas Spieldaten 5-6.. DS)
alle wichtigen Tabellen / Formulare / Berichte /Abfragen / Module
und diese gezipt Hochladen

 

Hey, nein, so geht es auch nicht. Ich lad es jetzt einfach mal so wie es ist hoch. Kann sein, das jetzt irgendwo ein Fehler ist den ich nicht mehr sehe, weil ich die ganze Zeit hin und her probiere und vielleicht irgendwie was vergessen habe umzustellen oder so.

Es geht im Formular "Übersicht" um die Button "Zwischenbericht" und "Bericht KIWI". Lieben Dank!

:-)

 

Hallo
leider kann ich damit nicht Testen
Du solltest uns (mir) schon sage wo wie ich zum Fehler komme
was wir (ich) wo wie eingeben müssen das wir dazu kommen
Danke