Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Datum wenn Steuerelement aktiviert
#1
Hallo,
ich habe innerhalb eines Arbeitsblattes mehrer Positionen, die bestellt werden müssen. Zu jeder Position gibt es ein Steuerelement (Häkchen). Klickt man das Steuerelement an (Bestellung erledigt), so soll in der Nachbarzelle dann das heute Datum angezeigt werden. Das Datum soll aber nicht die Funktion =HEUTE() besitzen, sondern den Datumwert beim Setzen beibehalten.

Wie könnte das Makro aussehen, was ich zu jedem Steuerelement schreiben muss?

Vielen Dank für Eure Unterstützung
Beste Grüße


Angehängte Dateien Thumbnail(s)
   
to top
#2
Hi,

(13.04.2015, 10:00)krax007 schrieb: so soll in der Nachbarzelle dann das heute Datum angezeigt werden. Das Datum soll aber nicht die Funktion =HEUTE() besitzen, sondern den Datumwert beim Setzen beibehalten.

hast Du schon mal
Range("O4") = Date()
getestet?
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#3
Danke für die Antwort,
wo bzw. wie ist dieser Ausdruck einzutragen? Im Makro des Kontrollkästchens?

Sub Kontrollkästchen66_Klicken()
Range("O4") = Date
End Sub

Sorry, bin da noch nicht so fit drin.
to top
#4
Hi,

(13.04.2015, 11:34)krax007 schrieb: Danke für die Antwort,
wo bzw. wie ist dieser Ausdruck einzutragen? Im Makro des Kontrollkästchens?

vielleicht so:
Option Explicit

Sub test()
   If CheckBox1.Value = True Then
       Range("O1") = Date
   Else
       Range("O1") = ""
   End If
End Sub


VBA/HTML - CodeConverter für Office-Foren, AddIn für Excel/Word 2000-2013 - komplett in VBA geschrieben von Lukas Mosimann. Projektbetreuung durch mumpel

Code erstellt und getestet in Office 15

Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#5
Hi,

(13.04.2015, 11:34)krax007 schrieb: Danke für die Antwort,
wo bzw. wie ist dieser Ausdruck einzutragen? Im Makro des Kontrollkästchens?

Dann wird aber bei jedem Klick auf die CheckBox das aktuelle Datum erneut in die Zelle geschrieben.

Sonst vielleicht so:
Option Explicit

Sub test()
   If CheckBox1.Value = True Then
       Range("O1") = Date
   Else
       Range("O1") = ""
   End If
End Sub


VBA/HTML - CodeConverter für Office-Foren, AddIn für Excel/Word 2000-2013 - komplett in VBA geschrieben von Lukas Mosimann. Projektbetreuung durch mumpel

Code erstellt und getestet in Office 15

Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  relative Makroaufzeichnung aktiviert oder nicht DietmarD 2 97 16.10.2016, 08:29
Letzter Beitrag: DietmarD
  Wenn Spalte E nicht leer dann Datum in Spalte O VBA BadHabiit 4 225 20.09.2016, 14:49
Letzter Beitrag: BadHabiit
  wenn Zelle leer dann nichts wenn aber Zelle Datum enthält dann nickita 1 170 03.09.2016, 06:03
Letzter Beitrag: schauan
  Benötige dringend Hilfe / wenn Formel Datum LiRo 2 198 23.08.2016, 09:24
Letzter Beitrag: LiRo
  Datum - Differenz in WENN-Funktion MrLinux 6 316 06.07.2016, 12:15
Letzter Beitrag: BoskoBiati
  Steuerelement soll Form einfügen "Skizze" starten Frnak_Castle 10 572 08.04.2016, 12:20
Letzter Beitrag: Frnak_Castle
  Summe wenn Datum+Zahlungsziel bonnie 10 847 20.01.2016, 15:02
Letzter Beitrag: BoskoBiati
  Wenn Datum gleich addieren Didi 18 1.218 20.12.2015, 11:33
Letzter Beitrag: Didi
  Wenn Datum->Heute->Dann vrolok 7 1.643 12.12.2015, 06:50
Letzter Beitrag: schauan
  Wenn Funktion bezug auf Datum und KW Nino78 9 1.370 30.08.2015, 21:09
Letzter Beitrag: shift-del

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste