Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
432to436
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
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Excel-Version

Excel-Version
29.05.2004 09:01:47
Erich
Hallo...
Habe gestern von Matthias eine perfekten Code
bekommen.
Kann es sein das dieser unter Excel 97 nicht läuft ?

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Replace(TextBox1.Text, ",", ":")
On Error GoTo Err
TextBox1.Value = FormatDateTime(TextBox1.Value, vbShortTime)
Exit Sub
Err:
MsgBox "Falsche Uhrzeit!"
Cancel = True
End Sub

Eine Antwort wäre prima.
Gruss Erich

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel-Version
29.05.2004 09:04:54
Matthias
Hallo Erich,
wo kommt denn der Fehler (gelbe Zeile)?
Matthias
AW: Excel-Version
29.05.2004 09:07:59
Erich
Hallo Matthias
Das Wort "Replace" wird blau makiert und
im Fenster steht "Sub oder Function nicht defeniert"
Gruss Erich
AW: Excel-Version
29.05.2004 09:42:10
Matthias
Hallo Erich,
du hast recht, geht mit Excel 97 nicht.
Dann mach so, das geht mit allen Versionen:
TextBox1.Text = WorksheetFunction.Substitute(TextBox1.Text, ",", ":")
Gruß Matthias
AW: Excel-Version
29.05.2004 09:48:20
Erich
Hallo Matthias
Klappt super
Gruss Erich
Danke, geschlossen - o.T.
29.05.2004 09:54:45
Matthias
-
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige