Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Formel zu einem VBA umwandeln

Forumthread: Formel zu einem VBA umwandeln

Formel zu einem VBA umwandeln
11.07.2006 11:09:33
Manfred
Hallo liebe Excelfreunde,
ich komme wieder mal nicht weiter und benötige erneut eure Hilfe.
Wie kann ich folgende Formel in eine VBA Zeile bringen.
GANZZAHL(E11) = HEUTE()
Wenn ich das so ins VBA übernehme, bekomme ich eine Meldung: "Sub oder Function nicht definiert"
Gruss Manfred
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel zu einem VBA umwandeln
11.07.2006 11:15:50
IngGi
Hallo Manfred,
du musst die englischen Bezeichnungen verwenden:
INT(E11) = TODAY()
Gruß Ingolf
AW: Formel zu einem VBA umwandeln
11.07.2006 11:18:25
Manfred
Hallo Ingolf,
damit bekomme ich die gleiche Fehlermeldung und das Wort "TODAY" ist markiert. Wie vorher auch bei "HEUTE".
Gruss Manfred
Anzeige
AW: Formel zu einem VBA umwandeln
11.07.2006 11:19:02
UweD
Hallo
Verstehe nicht ganz, was du machen möchtest
Heute() liefert bereits eine "ganze Zahl" (38909)
..
ich vermute du möchtest das hier
Range("E11") = CLng(Date)
Gruß UweD
(Rückmeldung wäre schön)
noch falsches Ergebnis
11.07.2006 11:27:10
Manfred
Hallo UweD,
damit läuft das VBA zumindest schon mal durch, aber das Ergebnis ist das falsche.
sub Prüfen()
IF Range("E11") = CLng(Date) Then 'in der Zelle steht "11.07.2006 07:48"
Cells(11,3) = "erledigt"
Else Cells(11,3) = "noch offen"
End if
Gruss Manfred
Anzeige
AW: noch falsches Ergebnis
11.07.2006 11:45:26
UweD
Hallo
so klappt es...

Sub Prüfen()
If DateValue(Cells(11, 5)) = Date Then 'in der Zelle steht "11.07.2006 07:48"
Cells(11, 3) = "erledigt"
Else: Cells(11, 3) = "noch offen"
End If
End Sub

Gruß UweD
(Rückmeldung wäre schön)
Danke UweD das wars. o.w.T.
11.07.2006 11:51:07
Manfred
...

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige