Access: Calendar auf aktuelles Datum setzen

• Access: Calendar auf aktuelles Datum setzen von Jan vom 08.10.2003 17:17:58
  • AW: Access: Calendar auf aktuelles Datum setzen - von Hajo_Zi am 08.10.2003 17:24:07
    • AW: Access: Calendar auf aktuelles Datum setzen - von Jan am 08.10.2003 17:46:33

Betrifft: Access: Calendar auf aktuelles Datum setzen
von: Jan

Geschrieben am: 08.10.2003 17:17:58

Hi!

Ich habe in Access 97 eine Form mit einem Kalender (Calendar Control 8.0, ActiveX Component). Diesen Kalender moechte ich gerne auf das aktuelle Datum setzen. Wie mache ich das???

Ich bin mir bewusst, dass das hier kein Access Forum ist. Mir wurde es dennoch empfohlen. Solltet ihr ein gutes Access Forum kennen, lasst es mich wissen :-)!

Gruesse

Jan


Betrifft: AW: Access: Calendar auf aktuelles Datum setzen
von: Hajo_Zi
Geschrieben am: 08.10.2003 17:24:07

hallo Jan

warum nicht einfach
Calendar1.Value = Date



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/





Betrifft: AW: Access: Calendar auf aktuelles Datum setzen
von: Jan
Geschrieben am: 08.10.2003 17:46:33

Hi Hajo!

Vielen Dank fuer Deine schnelle Antwort. Es klappt! Habe es bisher mit der today Methode probiert, was nicht funktionierte.

Gruesse

jan

Excel-Beispiele zum Thema " Access: Calendar auf aktuelles Datum setzen"

Beim Öffnen der Arbeitsmappe auf aktuelles Datum prüfen		Farbpalette auf Graustufen setzen
Menüs zurücksetzen		Einige Zeilen in einer sequentiellen Datei ersetzen
Alle nichtnumerischen Werte auf Null setzen		AutoFilter über mehrere Arbeitsblätter setzen
Bedingte Übergabe des Focus und Setzen der Schreibmarke im Dialog		Vor eine Aufzählung Punkte setzen
Bis zur 12. Zeile Cursor nach unten, dann nächste Spalte ansetzen		Focus nach Klick auf einen Frame nicht dorthin setzen
Alle #DIV/0!-Fehlerwerte in Tabelle durch 0 ersetzen		Zellkontextmenü durch Jahreskalender ersetzen
Arbeitsmappe nach Ausfüllen der Eingabezellen auf ReadOnly setzen		Suchen in 2. Tabelle und Ersetzen der Quelldaten
Blattschutz für eine Serie von Tabellen setzen und aufheben		Tabellen vergleichen und Zeilen ersetzen
Hintergrund setzen, wenn mehr als 9 Einträge		Blattschutz beim Speichern setzen
Errechneten Wert durch nächsthöheren ersetzen		Filter vor Speichern zurücksetzen
Wert aus Gültigkeitsliste durch eine Zahl ersetzen		Bild bei Klick vergrößern und zurücksetzen
Setzen der Hintergrundfarbe nach Wertevergleich		VBA-Aktion über "Rückgängig"-Schaltfläche zurücksetzen
Blattschutz setzen und dennoch mit AutoFiltern		Blattschutz aufheben, Daten eintragen, Blattschutz setzen
Auf UserForm-Schaltflächendruck Focus auf Tabelle setzen		Blattschutz mit und ohne Passwort aufheben und setzen
Zeitabhängige Zellmarkierungen über bedingte Formatierung setzen		UserForm-Optionsfelder über eine Schleife zurücksetzen
Bundesländernamen durch Abkürzungen ersetzen		Telefonnumern mit Liste vergleichen und durch Namen ersetzen
Linien setzen und löschen		Bei der Auswahl eines doppelt vorkommenden Wertes Farbe setzen
In einer Namensliste Großbuchstaben einsetzen		Berechnungsmodus ändern und beim Schließen zurücksetzen.
Notepad aufrufen und Routine nach Beenden fortsetzen		Doppelt vorkommende Anführungszeichen in Textdatei ersetzen
Wenn Wert vorhanden, Wert in Klammern setzen		Beim Öffnen der Arbeitsmappe ComboBox-Wert setzen
Zeichenfolgen in Textdatei suchen und ersetzen		Für ausgewählten Bereich per VBA Gültigkeitskriterien setzen
Drucker auswählen und nach dem Drucken zurücksetzen		Zeilenumbrüchen über VBA setzen
Blattschutz für alle Arbeitsblätter setzen oder aufheben		Hyperlinks setzen, wenn Zieldatei gefunden wurde