piomode1

Hi, schoecki! Wenn es sich um Access handelt, lautet die Funktion folgendermaßen: <Berechnetes Feld>: Jahr(<Datum-Feld>) (In den Kriterien des berechneten Feldes kannst Du dann fest eine Jahreszahl eingeben oder: [Jahr]. Damit wird der User beim Öffnen der Abfrage nach dem Jahr gefragt und bekommt nur die Datensätze des eingegebenen Jahres. (Das berechnete Feld selbst kannst Du noch ausblenden.) In VBA entsprechend Year(<Datum>).

Hi, Leute! Wie geschrieben, habe ich mir die beiden günstigen Fahrstühlen downgeloaded. Für alle "Original"-Objekte gibt es eine mehr oder weniger schöne Beschreibung in der "blauen Box". Und manchmal sind dort auch Wertungspunkte angegeben für - Raum - Komfort - Arbeiszimmer - usw. Das gab es beides bei den Fahrstühlen nicht. Warum denn nicht? Ist es denn so, daß Objektprogrammierer dann wahnsinnig hohe Punktezahlen eintragen würden für Objekte die es für 1S$ gibt und man damit die "tollsten" Räume erschaffen könnte? Und überhaupt: Was hat es denn mit den Aufwertungspunkten "Arbeitszimmer" bei Computern und Bücherborden auf sich? Wofür ist ein Arbeitszimmer eigentlich wirklich gut/nützlich? Für die Kinder? Mechanische Fähigkeiten? Reparieren mir die Kleinen dann den Herd, das Klo, usw.?

Hi, Yakuzza! Für Formulare bzw. Textfelder gibt es die Eigenschaft Hintergrundfarbe (VBA: .BackColor). Damit kannst Du die gewünschte Farbe einstellen...

Hi, CK82! Vielleicht löst folgendes Dein Problem: Merke Dir in zwei globalen Variablen die Datensatznummern aus Haupt- und Unterformular. Dann schließt Du das Hauptformular mit 'DoCmd...' und öffnest es wieder (auch mit DoCmd...). Bewege Dich dann mit 'DoCmd.GotoRecord...' zum entsprechnenden Datensatz im Hauptformular, dann mit 'DoCmd.GotoControl ("DerNameDesUnterformulars")' ins Unterformular und mit 'DoCmd.GotoRecord...' zum Datensatz des Unterformulars. Mit entsprechender Vervollständigung müßte es funktionieren!

Hi, kartoffeln! Leider geht aus Deiner Frage nicht genau hervor, was Du mit dem Formular machen möchtest. Wenn es einfach geöffnet werden soll, nimmst Du folgenden Befehl: DoCmd.OpenForm ("DeinFormularName") Für 'DeinFormularName' trägst Du den Namen Deines Formulars ein.

Hi ,Majoon! Hilft Dir folgender Vorschlag weiter? Erstelle eine Abfrage in die Du als Zielfeld einfach Deine cbo ziehst. Erstelle ein berechnetes Feld, d.h. schreibe in der (leeren) Zelle rechts neben Deinem Zielfeld sinngemäß folgendes: MeinZähler: 1 Aktiviere dann die Funktionen mit dem Summenzeichen in der Symbolleiste. Du bekommst als Standardfunktion 'Gruppierung'. Ändere die Funktion für 'MeinZähler' in 'Summe'. Wenn Du diese Abfrage ausführst bekommst Du jeden Wert aus dem cbo-Feld einmal ausgegeben, und im benachbarten Feld, wie oft der jeweilige Inhalt in der Tabelle vorhanden ist. (Wieder in der Entwurfsansicht wirst Du feststellen, daß sich Dein berechnetes Feld ein wenig verändert hat. Macht aber nix!) Möchtest Du nur ein bestimmten Inhalt ausgeben lassen, kannst Du natürlich auch Kriterien definieren. Speichere diese Abfrage. Für den Bericht hast Du wahrscheinlich ebenfalls eine Abfrage geschrieben. Lasse Die die Tabellen/Abfragen anzeigen und füge die eben erstellte Abfrage mit den Funktionen einfach hinzu und natürlich auch die beiden Felder als Zielfelder. (Ggf. Verknüpfung nicht vergessen!) Im Berichtsentwurf kannst Du dann ganz einfach auf die beiden neuen Felder zugreifen und sie anzeigen lassen, wo Du möchtest. Ich hoffe, das war Dein Problem...

Hi, Arthur Dent! War ja auch nur für "die anderen" gedacht, die ein ähnliches Problem haben und im Streß an solche (wichtigen) Kleinigkeiten nicht denken... Bis demnächst!

Hi, Ihr alle zusammen! Ich habe mal von der o.g. Simorphor die beiden Fahrstühle gezogen, die ich dort gefunden habe! Hier sind sie! SUPER: Günstig (500 für das Gerät + (2*3)*75 für die Wände = 875) (-->Treppe: 900) Platzsparend (2*1 Kachel = 2) (-->Treppe: 2*4 = 8) ... und gar nicht schwer aufzubauen! Im Tutorial ist die Konstruktion 1a beschrieben. Ein kleiner Nachteil: Die Objekte 'Tür unten' und 'Tür oben' liegen immer direkt übereinander. Es ist nicht möglich (vom Einsteigen aus gesehen) z.B. links auszusteigen.

Hi, Leute! Ich habe in der Zwischenzeit herausgefunden, daß ich mit .OpenRecordset("Abfragename") weiterkomme: Man kann statt des Abfragenamens auch einen (zusammengebauten) SQL-String übergeben. Vielen Dank an alle!!!

Hi, redsywi! Dann bleibt nur noch eins: 1) Löschen der Sicherung unter Linux. 2) Aus Access alle Daten nach Linux rüberschaufeln. ;) ;) Bei den Vorgaben weiß ich jetzt so spontan auch nicht...

Hi, fireworker! Ich glaube .Show funktioniert nur mit UserForms. Ich habe aber ein "ganz normales".

Hi, Arthur Dent! Sehr schön. Mache aber nicht den Fehler, erst die Umwandlung vorzunehmen, sondern zerlege den Zahlentext, solange es noch ein Text ist! (Sonst hast Du oben geschildertes Problem.)

Hi, Leute! Folgende Sache: Ich habe ein Hauptformular (HF) mit einem Unterformular (UF). Auf dem HF befindet sich eine Schaltfläche, die mit Hilfe des Befehls Docmd.GotoControl "UF" DoCmd.GotoControl "FeldImUF" ein Feld im ersten Datensatz des UF fokussiert. Meine Frage: Ist es möglich, den Focus wieder auf ein Steuerelement des HF zu setzen, nachdem ich im UF war?

Hi, Arthur Dent! Ich habe für mich das gleiche Problem folgendermaßen gelöst: Die Herkunftstabelle bekommt ein weiteres Feld: Name: Archiviert Typ: Ja/Nein Standardwert: Nein Deine Anfügeabfrage bekommt im Feld 'Archiviert' das Kriterium 'Nein', aber kein Zuordnungsfeld in der Zieltabelle (Diese hat ja das Feld 'Archiviert auch gar nicht...). Du mußt nur noch eine Aktualisierungsabfrage schreiben: Feld: Archiviert Kriterium: Nein Aktualisieren: Ja (Das Kriterium kannst Du auch leer lassen; es sorgt aber für Geschwindigkeit, weil nur die notwendigen Datensätze aktualisiert werden!) Lasse beide Abfragen hintereinander laufen (Erst anfügen, dann aktualisieren).

Hi, Arthur Dent! Das Problem liegt einfach in dem begrenzten Speicherplatz, der für eine Zahl reserviert ist. M.E. hast Du schon beim Speichern deiner 19stelligen Zahlen Rundungsfehler, da nur 16(?) Stellen gespeichert werden (x,15Nachkommastellen) . D.h. Du bekommst einen Fehlerbereich +-500. Sollte ich mich irren: a) nicht auf einen Nicht-Mathematiker schimpfen... Korrigierende Texte erbeten! Auf jeden Fall kannst Du einmal folgendes probieren: Behauptung: Access speichert in einem Zahl/Double-Feld NICHT ALLE 19 Ziffern. - Erstelle eine Tabelle mit einem Feld (Zahl/Double/Primärschlüssel bzw. eindeutig) - Wechsel in die Datenblattansicht - Gebe eine Zahl mit 19 Stellen ein, markiere vor dem Verlassen des Feldes diese Zahl und kopiere sie - Füge in einem neuen Datensatz die Zahl aus der Zwischenablage ein und verändere vor dem Verlassen des Feldes eine Ziffer im Einer- oder Zehnerbereich - Beim Verlassen des Datensatzes sollte nun die Meldung über mehrfach vorkommende Werte im Index- oder Primärschlüsselfeld erscheinen q.e.d.

Hi, Poldi! Hast recht. Ein Stadtbummel ist ja schon teuer genug...

Hi, Leute! Was hat es mit 'Urlaub total' auf sich? Hier gesehen...

Hi, flooo! Verknüpfe einfach die Tabellen der DBn in die DB, von wo aus die Daten übertragen werden sollen. (Macht nur Sinn, wenn die Datenbanken feststehen) Dadurch kannst Du mit Hilfe einer Anfügeabfrage die Daten in die verknüpften Tabellen schreiben, so daß sie (die Daten) in den anderen DBn zur Verfügung stehen. Natürlich kannst Du auf diesem Wege auch eine verknüpfte Tabelle als "Datenquelle" und eine (andere) verknüpfte Tabelle als "Datenziel" benutzen!! Und das alles ohne eine einzige Zeile Code!

Hi, Leute! Es handelt sich hier um Auswahlabfragen? Kann ich statt eines Abfragenamens auch den SQL-Code einer Auswahlabfrage eintragen??

Hi, R-U! Hauptsache, die cbo-zugrundeliegende Abfrage liefert mehrere Felder. Dann gibt es die Einschaft (z.B. im Formularentwurf Einschaften der cbo) Spaltenanzahl. Vergiß nicht, die Spaltenbreiten auf die gewünschten Breiten zu setzen (z.B. 3;2;0;4 --> heißt hier: die dritte Spalte ist ausgeblendet). Als letztes noch ein bischen Kopfrechnen: Die Summe der einzelnen Spalten kommt als Gesamtsumme in die Eigenschaft Listenbreite. Mit nur Listeneinträge kannst Du verhindern, daß irgendetwas in die cbo geschrieben wird, das nicht in der Liste steht!

Hi, Baracuda! Ich nehme an, Du hast eine Tabelle mit den Läufern und deren Zeiten. Mit Sicherheit hast Du auch schon in einer Abfrage die Funktion 'Gruppieren' für die Läufer und 'Summe' für die Zeiten verwendet... Diese Abfrage verwendest Du als Grundlage für folgendes: _____ SELECT [a_1_SumZeit].[summe von x_Zeit] AS x_Zeit, DateDiff("d",#12/31/1899#,DateAdd("d",[x_Zeit],1))*24+DatePart("h",[x_Zeit]) & ":" & Format(DatePart("n",[x_Zeit]),"00") AS y_NoDay FROM a_1_SumZeit; _____ Setze für 'a_1_SumZeit' Deinen Abfrage-Namen ein. Setze für 'Summe von x_Zeit' den Text ein, der aus Deiner Abfrage resultiert und die Zeiten mit Tagesdatum (Das was Du nicht mehr haben möchtest.) enthält. Setze für 'y_NoDay' die Spaltenüberschrift, die Du haben möchtest. Fertig...

Hi, Baracuda! Ich nehme an, Du hast eine Tabelle mit den Läufern und deren Zeiten. Mit Sicherheit hast Du auch schon in einer Abfrage die Funktion 'Gruppieren' für die Läufer und 'Summe' für die Zeiten verwendet... Diese Abfrage verwendest Du als Grundlage für folgendes: (Kopiere einfach den folgenden SQL-String, nehme eine neue Abfrage in der Entwursansicht ohne eine Tabelle oder Abfrage hinzuzufügen, wechsel über das Icon Ansicht auf SQL, füge den Text ein, korrigiere unten beschriebene drei Punkte. Danach kannst Du die Abfrage ganz normal speichern bzw. Dir in der "normalen" Entwurfsansicht ansehen.) _____ SELECT [a_1_SumZeit].[summe von x_Zeit] AS x_Zeit, DateDiff("d",#12/31/1899#,DateAdd("d",[x_Zeit],1))*24+DatePart("h",[x_Zeit]) & ":" & Format(DatePart("n",[x_Zeit]),"00") AS y_NoDay FROM a_1_SumZeit; _____ Setze für 'a_1_SumZeit' Deinen Abfrage-Namen ein. Setze für 'Summe von x_Zeit' den Text ein, der aus Deiner Abfrage resultiert und die Zeiten mit Tagesdatum (Das was Du nicht mehr haben möchtest.) enthält. Setze für 'y_NoDay' die Spaltenüberschrift, die Du haben möchtest. Fertig... (Die Sekunden überlasse ich Dir... ) Jetzt kann man noch über die Eigenschaften (rechte Maustaste über dem Zielfeld mit den Stunden und Minuten das Format 'hh:nn' festlegen und hat (ohne Format-Verlust) die Zeiten rechtsbündig stehen.

Hi, Hironimo! Danke für den Code. 'Do Events' habe ich auch schon benutzt. Aber nicht in einer Schleife... Danke schön!!

Hi, Mercutio! Ich habs noch nicht ausprobiert und gesucht; die Möglichkeit hört sich aber vielversprechend an!!

Hi, Majoon! Noch schneller, wenn die Auswahl auf dem Formular erfolgen soll´, auf dem dann auch die Daten angezeigt werden: Im Formularentwurf den Zauberstab aktivieren, danach das Symbol für das Kombinationslistenfeld auswählen, auf dem Formular platzieren. Nun im Assistenten die dritte Option "Einen Datensatz ... suchen" wählen, das Feld mit den zu 'suchenden' Daten auswählen. Fertig.