Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
25.04.2024 11:49:37
Array verwenden
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1572to1576
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1572to1576
1572to1576
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

aktuelles Datum in Schaltfläche anzeigen lassen

aktuelles Datum in Schaltfläche anzeigen lassen
07.08.2017 16:44:45
Marco
Servus alle zusammen,
ich habe mir eine Schaltfläche erstellt in der ich gerne das aktuelle Datum anzeigen lassen möchte. Wie es in einer Zelle geht weiß ich, aber ich würde mir das Datum gerne in der Schaltfläche anzeigen lassen. Kann mir dabei vll jemand bitte weiterhelfen. Vielen Dank. Schon mal.
Gruß Marco

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
mit VBA so.
07.08.2017 16:53:19
Tino
Hallo,
Tabelle1 ist die Tabelle wo die Schaltfläche liegt
Schaltfläche 1 ist der Name dieser Schaltfläche
With ThisWorkbook.Sheets("Tabelle1").Shapes("Schaltfläche 1")
.OLEFormat.Object.Text = Format(Date, "dd/mm.yyyy")
End With
Gruß Tino
AW: mit VBA so.
07.08.2017 17:06:54
Marco
hm ich glaube Schaltfläche war die falsche Beschreibung. Ich habe ein Rechteck erstellt und dem würde ich dann gerne das Datum anzeigen lassen. Leider kam jetzt die Meldung außerhalb der prozedur
Lade bitte Bsp. hoch oT
07.08.2017 17:12:37
Tino
AW: mit VBA so.
07.08.2017 17:39:47
Dieter(Drummer)
Hallo Marco,
dann ersetze im Makro von Tino "("Schaltfläche 1")" durch "("Rechteck 1"), wenn dein Rechteck die 1 hat, sonst eben eine entprechend andere Nummer.
Gruß, Dieter(Drummer)
Anzeige
AW: mit VBA so.
08.08.2017 13:11:14
Marco
Danke Dieter, das habe ich gestern selber schon versucht anzupassen aber es hat nicht funktioniert. Ich kann bzw. brauch auch keine Datei hochladen weil die Datei nichts enthält außer ein leeres Rechteck.
Ich habe einfach nur ein Rechteck gezeichnet und möchte das beim öffnen der Datei das aktuelle Datum mit der Zeit in dem Rechteck drin steht. Und der Code funktioniert nicht oder ich habe irgendwas vergessen. eigentlich geht doch jeder Code mit Sub....... los oder ist das da anders?
AW: Hier eine Testdatei zur Info
08.08.2017 13:54:34
Dieter(Drummer)
Hallo Marco,
hier ist mal eine Testdatei. Du kannts dort folgendes machen:
1) Das rote Rechteck anklicken, dann wird das aktuelle Datum eingefügt
2) Gliechzeitig wird im Rechteck, unten rechts, ein kleiner schwarzer Punkt sichtbar.
3) Wenn du auf den schwarzen Punkt klickst, wird das Datum aus dem Rechteck entfernt und der Punkt ist nicht mehr sichtbar.
Evtl. hilft dir dies schon weiter.
Gruß, Dieter(Drummer)
Dartei: https://www.herber.de/bbs/user/115338.xlsm
Anzeige
AW: Beim öffnen der Datei ...
08.08.2017 14:08:34
Dieter(Drummer)
... wird das Datum direkt ins Rechteck eingetragen, wenn du in meiner Datei, im Modul unter "DieseArbeitsmappe", folgenden Code einfügst: 
Private Sub Workbook_Open()
Call Rechteck1_Klicken
End Sub

Datei dann schliessen und dann wieder aufrufen und das Datum ist im Rechteck.
Gruß, Dieter(Drummer)
AW: Danke =)
08.08.2017 16:29:30
Marco
Ich habe es jetzt hinbekommen danke =)
AW: Freut mich. Danke für Rückmeldung. owT.
08.08.2017 16:42:50
Dieter(Drummer)

308 Forumthreads zu ähnlichen Themen

Datum nach Prüfung mehrer Bedingungen anzeigen
Wilfried

Hallo, brauche dringend Hilfe !!
In einer Tabelle mit Kundendaten wird in Spalte C2:C350 zu Prüfzwecken ein "x" eingetragen. In Spalte AB2:AB350 erfolgt der Eintrag "N" wenn der Kunde nicht erschienen ist. In Spalte Z2:Z350 steht das dazugehörige Datum. Ich benötige eine Formel, welche mi...
28.08.2008 13:27:54
Thread-ID: 1005419
18 Beiträge
Anzeige
Seitenfeld mit Datum in Pivottabelle
Peter

Hallo zusammen,
ich habe folgendes problem mit einer Pivottabelle:
in den Ursprungsdaten stehen u.a. Datumsangaben. Diese sollen in der Pivottabelle im Seitenfeld verwendet werden. Allerdings möchte ich nicht, dass jeder Datumswert dort angezeigt wird sondern eine Zusammenfassung der Mo...
08.10.2008 11:17:51
Thread-ID: 1014965
4 Beiträge
Pivot Tabellen Elemente anzeigen
thomas

Hallo,
hat einer von euch ein Beispiel für die Funktion "Ausgeblendete Elemente in Gruppierungsfunktionen anzeigen" in Pivottabellen. Ich schaffe es nicht das Icon zu aktivieren bzw. die Funktion zu nutzen
Ich krieg es auch nicht hin die Auswirkungen der Option "Elemente ohne Daten anze...
02.12.2008 14:46:51
Thread-ID: 1029521
3 Beiträge
Anzeige
Teil des Datums in anderer Zelle als Zahl anzeigen
Karsten

Hallo,
in A1 steht bei mir 07.09.2009. Ich möchte, dass in B1 von diesem Datum nur die 7 als "normale" Zahl - nicht im Datumformat, angezeigt wird. Ich brauche diese Zahl zum weiterverarbeiten. Da sich das Datum auch ändert kann es auch eine andere Zahl außer der 7 sein.
Kann mir dabei...
05.09.2009 17:51:23
Thread-ID: 1100792
3 Beiträge
Datum in Pivot gruppieren
Bernd

Ich möchte in einer Pivottab nach Datum gruppieren und bekomme die Meldung "Kann den markierten Bereich nicht gruppieren". Die Daten kommen aus einer importierten Textdatei. Das Datum-Format in der Textdatei ist TT.MM.JJ hh:mm Nach dem Import steht in Zelle das Datum auch im Format TT.MM.JJ h...
12.04.2002 10:06:29
Thread-ID: 112689
2 Beiträge
Nach Farben in unterschiedlichen Zellen filtern
Helmut

liebe vba'ler,
ich hätte eine frage zum filtern von zellfarben. dazu habe ich hier einen code gefunden, der lautet:
Sub nach_farbe_filtern() Dim s As Integer Dim x As Integer s = ActiveSheet.UsedRange.Columns.Count + 1 x = 2 Cells(1, s) = "Farbindex" Do While Not IsEmpty(Cells(x, 1)) Ce...
02.04.2010 12:15:49
Thread-ID: 1149968
3 Beiträge
Pivot nach aktuellem Feld Filtern
jens

Hallo Excel-Profis,
ich habe ein paar Makros erstellt, die Pivotdatenfilter zurücksetzen:
Sub Test_Aufraeumen_Click() On Error Resume Next Dim f As PivotField, i As PivotItem Application.ScreenUpdating = False With ActiveSheet.PivotTables(1) For Each f In .PageFields f.CurrentPage = "(A...
13.08.2010 01:54:40
Thread-ID: 1171999
5 Beiträge
Pivot Tabellen Bestwerte anzeigen
Friedhelm

Hallo,
ich habe eine Tabelle mit Ergebnissen von Läufern und möchte in den Altergruppen und den verschiedenen Laufstrecken die Bestzeiten der Läufer darstellen.
Als Beispiel habe ich eine Tabelle beigefügt, die soweit den Pivot Auszug darstellt. Hier möchte ich in den Lauflängen nur die...
13.09.2010 11:02:06
Thread-ID: 1177216
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
17
4
3
2
1
2
1
2
4
7
2
3
4
7
1
4
9
2
1
5
1
3
2
4
2