piomode1

Hi, perdi! Und dann kommt da so ein Klug******er und muß seinen Senf dazu abgeben: n <> n^2, für alle n <> 0 und n <> 1

Hi, @all! Ich weiß nicht, ob es ihn schon irgendwo einmal gab, er ist nicht sehr sinnhaltig, aber er ist kurz und ging mir beim Schreiben einer PM durch den Kopf: "Ruinieren durch urinieren." Tja..., wie gesagt: Er ist nicht besonders sinnig, aber so steht es geschrieben. Hier und heute. Oder: "Es mußte einfach mal raus!"

ECHOES, Stimmen aus der Zwischenwelt

Hi, gabiy! Du weißt es sicherlich, trotzdem sei es der vollständigkeithalber erwähnt: Das Formular benötigt Steuerelemente (Textboxen, Chrckboxen, Kombinationslistenfelder, usw.), um die Daten überhaupt darstellen zu können. Ich habe auf die Schnelle nicht herausgefunden, wie man ein Objekt erstellen kann (Mit 'CreateObject ("Textbox")' rufe ich nur eine Fehlermeldung hervor. ). Und wenn Du es geschfft hast, entsprechende Elemente zu erzeugen, mußt Du noch mit 'Me.<Stuerlement>.ControlSource' festlegen, was die einzelnen Objekte anzeigen sollen. Ganz so einfach ist es imho also nicht, ich habe es bisher noch nicht gebraucht, interessieren würde es mich aber auch.

Hi, @all! Ich habe mich einmal etwas(!) mit SendKeys beschäftigt und wollte gleich einmal interessehalber ausprobieren, ob man den PC sperren kann. Meine Idee für den "Affengriff" sieht so aus: SendKeys "^(%{DELETE})", True (Evtl. auch noch runde Klammern um {DELETE}.) Es tut sich nichts. Hat jemand einen entsprechenden String? Oder ist diese Funktionalität ("Affengriff!") deaktiviert? Oder habe ich einfach nur eine Kleinigkeit übersehen?

Hi, Spooky23! Ist die Perspektive bei EE2 frei wählbar (hoch, runter, drehbar)?

Hi, Amstelchen! Ich würde es wirklich schade finden, wenn es das alte System nicht mehr gibt, denn die "alte" Software läut bei mir auf einem USB-Stick. Ohne reg-Einträge und sonstigen Ballast. Einfach den Ordner kopiert und los geht's. Auf jedem beliebigen PC, der über mind. einen freigegebenen USB-Anschluß verfügt. Kann die BOINC-Version das auch? Die Eigenschaften der Tools (Betrachtung der Eckdaten) habe ich mir noch nicht genauer angeschaut. (Danke für den Link! )

Hi, Amstelchen! Hi, @all! Ich bin gerade bei WU349... Auf dem Classic-Projekt. Warum ich hier anknüpfe: In der Vergangenheit habe ich die Eckdaten der WUs erfaßt. (Die 1,420...-Units sind ja größtenteils bereits nach ein paar Minuten ausgewertet.) Nun wurde ja alles auf die BOINC-Software umgestellt, bei der es imho nicht möglich ist, Daten wie Quell-Datum, Zeit, Frequenz usw. einzusehen. (Oder geht es doch und ich habe es nur noch nicht gesehen?) DER Grund, weshalb ich noch die Classic-Oberfläche verwende. (Der Download dieser Version ist mittlerweile ja nicht mehr möglich.) Nun habe ich mein Konto schon vor geraumer Zeit übertragen, mir die BOINC-Oberfläche angeschaut und als "unschön" empfunden. Weiß jemand von euch, ob die nach dem Transfer durchgerechneten Units in den Score bei BOINC mit einfließen? Oder sind diese "Punkte" verloren? Oder ist alles eine große Datenbank auf die nur über verschiedene Oberflächen zugegriffen wird? Zugegeben: Ich habe mich noch nicht so sehr mit BOINC befaßt...

Hi, Enno! Ich vermute, daß Dein Barcode-Extrakt als "String" vorliegt, Dein Barcode jedoch als Zahl. (Access meldet sich mit der folgenden Fehlermeldung) Wenn es so sein sollte, setze einfach eine Abfrage auf die Barcode-Tabelle und "berechnest" einen Text: SELECT x_Zahl, [x_Zahl] & "" AS y_Text FROM Tabelle1; Durch das Anfügen eines Leerstrings wird die Zeichenfolge nicht verändert, aber als Text behandelt und kann dadurch mit einem anderen Textfeld verknüpft werden: SELECT Abfrage1.x_Zahl, Tabelle2.x_Text FROM Abfrage1 INNER JOIN Tabelle2 ON Abfrage1.y_Text = Tabelle2.x_Text;

Hi, Enno! Nachfrage: Sehen die Barcode-Daten in der einen Tabelle so oder ähnlich aus? xxxxBARCODExxxxxxx Tip Du kannst in Abfragen Felder berechnen. (Du weißt wie das geht?) Extrahiere den Barcode aus den gegeben Informationen, so daß er Dir in einer (berecheneten) Spalte der Abfrage zur Verfügung steht. Dann erstellst Du eine weitere Abfrage, in die Du die oben erstellte Abfrage und das andere Objekt (in dem die Barcodes bereits für sich stehen) einbindest und eine Verknüpfung über das berechnete Feld des einen Objekts und dem Barcode-Feld des anderen Objekts erstellst. [Edit: Diese Verknüpfung ist noch nicht die, die Du benötigst, aber wenn Dir ersteinmal die nötigen Felder mit den entsprechenden Daten zur Verfügung stehen, wirst Du mit Amstelchens Hinweis ("Not In") weiterkommen.] Fertig.

Hi, @all! Bisher kannte ich die automatische Ergänzung in cbo's so: Der User hat angefangen Daten einzugeben, wenn es zu einer Übereinstimmung kommt wird der so Eintrag ergänzt, daß der Cursor an der aktuellen Einfügeposition steht und der Rest des Eintrags markiert ist, so daß er durch Neueingaben gelöscht wird. Kommt es nach der Eingabe weiterer Zeichen zu einer anderen Übereinstimmung, wird der Vorschlag geändert und markiert wie oben beschrieben. Mit der [Enter]-Taste wird der Vorschlag angenommen. Nun ist es in meiner DB so, daß sich das "Automatisch ergänzen" für ein Steuerelement (Felddatentyp: Text) bei mir so verhält: Die erste Übereinstimmung wird übernommen und der Cursor an das Ende des Feldes gesetzt. (Korrekturen sind nur mit der [Del]-Taste (o.ä.) möglich.) Ist es ein Bug in Access 2003? (Ich habe (anscheinend) nicht die nötigen Rechte ein Office-Update durchzuführen.) Oder soll es so sein? Oder liegt es daran, daß ich ein Eingabeformat vorgegeben habe? Oder daran, daß ich VBA-Code für "Bei nicht in Liste" eingefügt habe? (Wohl eher nicht!?!!) Oder gibt es irgendwo eine entsprechende Einstellmöglichkeit, so daß sich diese Eigenschaft "wie gewohnt" verhält? Vielen Dank schon einmal.

Hi! Aber vor dem "reinschreiben" der Daten .Edit nicht vergessen!

Hi, Vin! Ein Copy-Paste-Verhalten führt (auch nachträglich) zur Bewertung "ungenügend". Ich kann mir nicht vorstellen, daß der Abschluß mit einer "6" geschafft werden kann!?!

Hi, merenda! Und was meinst Du, wie er dann ausflippen wird! Vor allem, wenn er Dir nachweisen kannst, daß Dir Facharbeit.Plagiat = True bekannt war!! Mindestens. Und sorry, aber: "Na, hoffentlich!"

Hi, @all! Wer kennt sich mit dem Steuerelement "RecordNavigationControl" aus? (Bitte jetzt nicht die Antwort: "Ich!" ) Ich kann es zwar in der Entw.- und Form.-Ansicht sehen, aber die Verbindung zu den Daten(-sätzen) fehlt; die Farbe ist hellgrau, aktiviert ist es jedoch. (In den zugehörigen Eigenschaften kann ich nichts entsprechendes finden und die VBA-F1 schweigt sich dazu auch aus. )

Hi, ipu! Klappt! Danke!!! (Ich dachte immer, .requery sei nur für Kombinationslistenfelder zuständig...)

Hi, @all! Ich habe ein kleines Problem: Ein Formular ist geöffnet, und es wird vom User ein neuer Datensatz eingegeben. Dieser neue DS kann bewirken, daß weitere DS'e per VBA generiert werden und in der selben (dem Formular zugrundeliegenden) Tabelle gespeichert werden. Wenn ich per rec.AddNew ... rec.Update DS'e hinzufüge, sind diese (natürlich) auf dem Formular nicht sichtbar. Gibt es eine Form.-Methode, die dafür sorgt, daß diese neuen Daten angezeigt werden? (Formular schließen, öffnen, GotoRecord möchte ich vermeiden, weil später mit Sicherheit noch Subs für "Beim Öffnen" usw. eingebaut werden.)

Hi, The_red_one! Im Prinzip stimmt Deine Anmerkung. Wenn ich mir einen "Select" erstelle, bin ich faul: Dann muß eine Abfrage in der Entwurfsansicht herhalten, die ich mir dann im SQL-Format anzeigen lasse, den String, kopiere und bereinige. Und die langen Tabellennamen bieten den Vorteil, daß durch die alphabetische Sortierung die Tabellen in zusammengehörenden "Blöcken" gelistet werden. Die Möglichkeit, neue Gruppen zu erstellen, Links von den DB-Objekten dorthin zu ziehen und letztere dann auszublenden ist mir bekannt. Aber das finde ich i.d.R. noch umständlicher.

Hi, bastababe! Vielen Dank!! Das funktioniert ja wunderbar, und wenn man das Betziehungsfenster geöffnet läßt, während man der Tabelle wieder einen "aussagekräftigen" Namen gibt, wird dieser auch soweit ohne Probleme übernommen! Sind dabei Besonderheiten zu beachten? Sind Nebenwirkungen bekannt?

Hi, Leute! Ich habe ein Access2003-Beziehungsfenster vor mir und möchte zwischen zwei Tabellen eine Beziehung erstellen. So weit so gut. Und 10...0 mal gemacht. Nun erscheint beim Erstellen dieser Beziehung: "Das Datenbankmodul kann..." (nun folgen die beiden beteiligten Tabellennamen hintereinandergeschrieben(!)) "...nicht finden." Wenn ich eine Beziehung mit einer anderen Tabelle herstellen kann und in den Beziehungseigenschaften die Liste "Tabelle/Abfrage" öffne, erscheint der gewünschte Tabellenname überhaupt gar nicht erst. Es gibt diverse Beschränkungen, die Access in Form von Spezifikationen mitbekommen hat. So z.B., daß Objektnamen nur 63(?) Zeichen lang sein dürfen. In meinem Fall gilt für die eine Tabelle: Anzahl Zeichen im Tabellennamen: 28, Anz. Zeichen im Feldnamen: 25, zusammen: 53 Für die andere Tabelle gilt folgendes: Anz. Zeichen im Tab.namen: 53, Anz. Zeichen im Feldnamen: 38, zusammen: 91(!!!) Kann es daran liegen? Oder ist dieses Problem (und eine Lösung) bekannt? (Komprimieren und reparieren funktioniert nicht. Access neu starten auch nicht.) Wie geschrieben: Es handelt sich um Access 2003 (11.5612.5703) Danke schon einmal an dieser Stelle! :-)

Hi! Und API-Funktionen sind schon lange ein Graus für mich. Ich habe sie bisher einfach nicht verstanden... :confused: Ich muß hier mal suchen oder mich sonstwie schlau machen. Ausprobiret habe ich Deinen Tip noch nicht; wird aber nachgeholt. Vielen Dank schon / erst einmal.

Hi, Amstelchen! Hilft! :marine Super! Danke!! Trotzdem werde ich gleich noch ein weiteres Thema erstellen, in dem ich frage, wie man generell auf Excel-Funktionen aus Access heraus zugreift. (http://81.169.182.26/showthread.php?p=704448#post704448)

Hi, @all! Amstelchen hat mir meine Frage (nach den römischen Ziffern) hier schon beantwortet. Nochmal "Danke"! Aber es interessiert mich einfach für die Zukunft, ob es möglich ist, auf Excel-Funktionen zuzugreifen, ohne, daß Excel geöffnet werden muß.

Hi, @all! Ich brauche mal Hilfe: In einer Access-Datenbank soll eine Zahl (0 < x < 4000) in die römische Schreibweise umgewandelt werden (Z.B.: 123 --> CXXIII) Excel stellt eine entsprechende Funktion bereit: "Roman" ("Römisch" im Tabellenblatt.) Access (anscheinend) nicht. Mit folgendem Code kann ich auf die Excel-Funktion zugreifen, indem ich - die in meine Funktion übergebene Zahl und die Umwandlungsformel in ein neues Tabellenblatt schreibe, - den Wert in römischer Schreibweise auslese - und diesen dann zurückgebe. (Der entsprechende Verweis auf die "Excel-Object-Library" ist gesetzt.) ABER: Das muß doch auch einfacher gehen!? Die Laufzeit ist unerträglich lang. Und irgendwann wird sich ein User wundern, warum er "Mappe 4242" bekommt, wenn er manuell eine neue anlegt. Wenn überhaupt eine neue angelegt werden kann (<-- Speicher nicht aufgeräumt?) Hier erst einmal meine Lösung (ohne Test auf "Gültig(lngZahl)"): Function fktRoman(lngZahl As Long) As String Dim Excel2000 As Excel.Application Dim blnExcelIsRunning As Boolean 'Annahme: Excel ist geöffnet. '... = False, wenn Excel erst durch die ' Fehler-Routine gestartet wurde. ' Die entspr. Zuweisung erfolgt dort. blnExcelIsRunning = True On Error GoTo Fehler Set Excel2000 = GetObject(, "Excel.Application") On Error GoTo 0 With Excel2000 'Neue Mappe (<-- leer(!!)) .Workbooks.Add 'Zahl setzen, berechnen lassen, auslesen .Cells(1, 1) = lngZahl .Cells(1, 2) = "=Roman(A1)" fktRoman = .Cells(1, 2) '(Neue) Mappe schließen, nicht speichern .ActiveWorkbook.Close False 'Wenn Excel nicht geöffnet war ' dann schließen If Not blnExcelIsRunning Then .Quit End If End With 'Excel2000 Set Excel2000 = Nothing Exit Function Fehler: 'Excel war nicht geöffnet Set Excel2000 = CreateObject("Excel.Application") blnExcelIsRunning = False Resume Next End Function

Hi, @all! Viel Spaß an alle! Ich könnte wirklich k***en: "Jahrelang" habe ich freitagabends frei, bin also flexibel und denke, laß mal diejenigen machen, die zeitlich eingeschränkter sind. Vor kurzer Zeit wurde ein regelmäßiger Termin zielsicher auf diesen Abend umgelegt. Es besteht nur wenig Hoffnung, daß das "Meeting" ausfällt. Aber die Hoffnung bleibt bis zum Schluß! Traurig, traurig... Es scheint DAS Riesen-Treffen zu werden und ich werde keine Gelegenheit haben, zahlenmäßig etwas dazu beizutragen. Andererseits: Ich könnte ja noch so gegen 22:30Uhr dort aufschlagen und euch beim bezahlen zuschauen... (Und nun werdet ihr um 22:25 die Lokalität verlassen und sagen: "Wenn sich jemand nach uns erkundigt - er zahlt." :beagolisc ) Sollte sich etwas anderes ergeben und ich kann doch aus irgendeinem Grund entscheidend früher rufe ich an: Die MoNu u.a. von mixki und Chipmunky habe ich, bimei wird wohl nicht erscheinen, und was ist mit Mister A?