Autor: Losch

Makros
Öffnen	Bericht im RTF-Format weitergeben
Öffnen	Datei per Makro löschen

Module
Öffnen	basBerichtAnzeigen
Öffnen	basWaitObjects ( Formular / Bericht unterbrechen)
Öffnen	basWinDialoge (Bild dynamisch einladen)
Öffnen	ClpBrd (Zugriff auf die Zwischenablage per API)
Öffnen	clsShellExec (Dateien in Datenbanken einbinden)
Öffnen	modAdressen (Zugriff auf die Zwischenablage per API)
Öffnen	modAngAnw (Angemeldete Anwender auslesen)
Öffnen	modDruckFunktion (Standarddrucker automatisch zurücksetzen)
Öffnen	modDSVerschieben (Datensätze verschieben)
Öffnen	modFlashWindow (Titelleiste eines Formulares blinken lassen)
Öffnen	modFormPos (Fensterposition speichern und wiederherstellen)
Öffnen	modInpBox (Inputbox für Anwendungen)
Öffnen	modOutlSubs (Die wichtigsten Grundlagen zur VBA-Steuerung von Oulook)
Öffnen	modPopup (Flexible Popup-Menüs für Formulare)
Öffnen	modSecureForms (Anzeige von Feldern gezielt schützen)
Öffnen	modShutdownFunctions (Rechner per VBA herunterfahren)
Öffnen	modSnapshot (Bericht als Snapshot speichern)
Öffnen	modSubs (Löschbestätigung selbstgemacht)
Öffnen	modUserlist (Angemeldete Useriste auslesen)
Öffnen	terminnachoutlook (Termin nach Outlook)

Berichte
Öffnen	2 Felder in einem
Öffnen	Auswertung nach Quartalen und Kalenderwochen
Öffnen	Berichtausgabe bremst Rechner aus
Öffnen	Bericht als Snapshot speichern
Öffnen	Bericht maximiert anzeigen
Öffnen	Berichtszeilen abwechselnd formatieren
Öffnen	Daten in Bericht hervorheben
Öffnen	Ja/Nein-Felder mit beliebigen Zeichen ausgeben
Öffnen	Laufende Nummerierung für Berichte
Öffnen	Mehrseitige Berichte effektiver nutzen
Öffnen	Öffnen eines Berichtes
Öffnen	Zeitpläne als Diagramm drucken

Abfragen
Öffnen	2 Felder in einem
Öffnen	Abfragen nach Monaten ausgeben (Format-Befehl)
Öffnen	Abfragefilter von einem Formularfeld
Öffnen	Aussagekräftige Beschriftungen in Ihren Abfragen
Öffnen	Auswertungen mit Kreuztabellen
Öffnen	Berechnungsfelder in einer Abfrage
Öffnen	Daten nach Monaten auswerten
Öffnen	Datensätze automatisch archivieren
Öffnen	Datumsfeld als Tag, Monat oder Jahr anzeigen lassen
Öffnen	Die richtigen Funktionen und Operatoren
Öffnen	Fehl- und Urlaubstage per Abfrage auswerten
Öffnen	Feldeigenschaften in einer Abfrage
Öffnen	Feldinhalte verändern z.B.: Kundennummern
Öffnen	Feldinhalte nachträglich trennen
Öffnen	Format-Befehl
Öffnen	Letzten Datensätze per Abfrage selektieren
Öffnen	Öffnen einer Abfrage
Öffnen	Schließen eines Formulars, Tabelle oder Abfrage
Öffnen	Wochentage als Abfragekriterium verwenden
Öffnen	Zufällige Datensätze von gesamten Datenbestand

Tabellen
Öffnen	Öffnen einer Tabelle
Öffnen	Tabellen importieren

Frage:Wie kann ich den aktuellen Datensatz in einem Formular per Schaltfläche löschen? Der Steuerelemente-Assistent scheint mit dieser einfachen Aufgabe überfordert zu sein.

Antwort: Dazu verwenden Sie in der Ereignisprozedur „Beim Klicken“ der Schaltfläche zum Beispiel folgende Anweisungen:

Private Sub btnDSLoeschen_Click() If MsgBox(„Datensatz wirklich löschen?“, _ vbExclamation + vbYesNo) = vbNo Then
Exit Sub
End If
DoCmd.RunCommand
acCmdSelectRecord
DoCmd.RunCommand
acCmdDeleteRecord
End Sub

Diese Anweisungen zeigen zunächst eine mit Ja oder Nein zu beantwortende Sicherheitsabfrage an, markieren dann den aktuellen Datensatz und löschen ihn.
Wenn Sie die Sicherheitsabfrage nicht benötigen, lassen Sie die ersten drei Zeilen weg.

	Formulare
Öffnen	Aktuellen Datensatz per Schaltfläche löschen
Öffnen	Aktuelles Feld farblich hervorheben
Öffnen	Angemeldete User auslesen (1)
Öffnen	Angemeldete User auslesen (2)
Öffnen	Anzeige aktualisieren
Öffnen	Anzeige von Feldern gezielt schützen
Öffnen	Bild dynamisch einladen
Öffnen	Dateien in Datenbanken einbinden
Öffnen	Dateneingabe ohne Datensatzwechsel
Öffnen	Datensatz löschen
Öffnen	Datensätze mit Details kopieren
Öffnen	Datensatznavigation
Öffnen	Datensätze verschieben
Öffnen	Datum: Alter ermitteln
Öffnen	Datum mit
Öffnen	Datumseingaben prüfen Gültigkeitsregeln)
Öffnen	Dialogbox
Öffnen	Differenz von Wochen und Tagen
Öffnen	Doppelte Datensätze bei der Eingabe vermeiden
Öffnen	Drucker - Bericht gezielt auf einem bestimmten Drucker ausgeben
Öffnen	Drucker - Berichte über verschiedene Druckerschächte ausgeben
Öffnen	Drucker - Formular im Querformat drucken
Öffnen	Drucker - Spezialdrucker für Berichte mit Access 2007 nutzen
Öffnen	Drucker - Spezialfunktionen von Druckern nutzen
Öffnen	Drucker - Standarddrucker automatisch zurücksetzen
Öffnen	Drucker - Standarddrucker per Formular wechseln
Öffnen	Drucker bestimmen
Öffnen	Eingabe in einem Feld erzwingen (Gültigkeitsregeln)
Öffnen	Eingaben ohne Datensatzwechsel
Öffnen	ESC-Taste im Memofeld deaktivieren
Öffnen	Feld aus einem Unterformular übernehmen
Öffnen	Felder per Kennwort schützen
Öffnen	Feldinhalte prüfen
Öffnen	Fensterposition speichern und wiederherstellen
Öffnen	Filter entfernen
Öffnen	Filter komfortabel definieren
Öffnen	Filterkriterien aus dem Formular an einem Bericht übergeben
Öffnen	Flexible Popup-Menüs für Formulare
Öffnen	Formeln
Öffnen	Forms!-Befehl
Öffnen	Formular als Start-Fenster
Öffnen	Formular automatisch schließen
Öffnen	Formulare und Datenbanken automatisch schließen
Öffnen	Formular / Bericht unterbrechen
Öffnen	Gehe zu Steuerelement
Öffnen	Gültigkeitsregeln
Öffnen	Haupt- und Detaildatensätze löschen
Öffnen	Inputbox für Anwendungen
Öffnen	Kalender aufrufen mit Doppelklick
Öffnen	Kalender mit Termineingabe
Öffnen	Kombinationsfelder automatisch öffnen
Öffnen	Kombinationsfeld automatisch aufklappen
Öffnen	Kombinationsfeld: Suchfelder eintragen (Column-Befehl)
Öffnen	Kombinationsfelder mit Komfort
Öffnen	Leere Felder kenntlich machen (Bedingte Formatierung)
Öffnen	Löschbestätigung selbst gemacht
Öffnen	Makro starten
Öffnen	Mausrad in Formularen abstellen
Öffnen	Mit Doppelklick auf ein Feld ein anderes Formular öffnen
Öffnen	Nachrichtenaustausch in Multiuser-Datenbanken
Öffnen	Öffnen eines Formulares
Öffnen	PLZ prüfen
Öffnen	Rechnen mit leeren Feldern
Öffnen	Rechner per VBA herunterfahren
Öffnen	Roter Rand bei aktiviertem Filter
Öffnen	Runden von Zahlen
Öffnen	Schließen
Öffnen	Sendkeys Anweisungen
Öffnen	SQL-Konsole zur effektiven Datenbankverwaltung
Öffnen	Elemente ein- / ausblenden
Öffnen	Termin ins Outlook eintragen
Öffnen	Titelleiste eines Formulares blinken lassen
Öffnen	Uhrzeit berechnen
Öffnen	Unterformulare sperren und automatisch freigeben
Öffnen	Vorhergehenden Feldinhalt ermitteln
Öffnen	Zwischenablage per API

Diese Internetseiten sollen nur für die Mitglieder der Allianz “ Lustige Drachenhöhle“ sein. Hier könnt ihr die Titanen nach Herzenslust verhauen. Trotzdem würde ich es begrüßen, wenn ihr keinen Streit vom Zaun brecht, euch gegenseitig respektiert und nicht streitet. Wenn wir uns untereinander helfen, verstärken wir unser Team. Konkurrenz gibt es im Team nicht.

Wir haben gemeinsame Ziele:
– Titanen verhauen
– selber weiterkommen
– und viel Spaß haben

Preis	Stückzahl	Preis pro Juwel
4,99 €	400	1,2 Cent
9,99 €	850	1,2 Cent
19,99 €	1.800	1,1 Cent
29,99 €	2.800	1,1 Cent
49,99 €	4.800	1,0 Cent
99,99 €	10.000	1,0 Cent
Angebote
0,99 €	200	0,5 Cent
19,99 €	2.000 + eine epische Heldenmünze	0,9 Cent