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

Jahr(heute()) deklarieren in VBA

Jahr(heute()) deklarieren in VBA
27.11.2004 17:06:47
Korl
Hallo,
im nachfolgenden Code befindet sich in "Range(K1") das heutige Jahr.
Also =Jahr(heute())
If Worksheets("Tabelle1").Range("C1") Range("K1") Then
Wie muß ich es im VBA deklarieren.
Gruß Korl

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jahr(heute()) deklarieren in VBA
27.11.2004 17:13:05
Frank
Hallo Korl,
versuchs mal so
Dim MDat As date
MDat = Range("K1").value
If Worksheets("Tabelle1").Range("C1").value MDat Then
...
ungetestet.
Gruß
Frank
AW: Jahr(heute()) deklarieren in VBA
27.11.2004 18:09:53
Korl
Hallo Frank,
entschuldige bitte, ich habe mich falsch ausgedrückt.
Ich möchte mir die Zelle Range("K1")ersparen und diese im VBA-Code ersetzen durch
"Jahr(heute())" ?
Also im VBA-Code soll Range(C1") gleich verglichen werden mit "Jahr(heute())"
Insgesamt sieht mein Test-Code so aus:

Sub Versuch()
If Worksheets("Tabelle1").Range("C1") <> Range("K1") Then
MsgBox ("Bedigung für den Test nicht erfüllt")
End If
If Worksheets("Tabelle1").Range("C1") = Range("K1") Then
ActiveCell.FormulaR1C1 = "'Versuch"
MsgBox ("Test wurde ausgeführt")
End If
End Sub

Anzeige
Year(Date)
Kurt
...das wäre mit einem bischen Guten Willen auch selbstständig ermittelbar gewesen !
...und Tschüss Kurt
Danke Frank und Kurt
27.11.2004 18:37:30
Korl
Hallo Frank und Kurt,
Danke für Eure Hilfe, war eigentlich schon na dran, aber, aber...
wünsche Euch einen schönen 1. Advent!
Gruß Korl

23 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige