Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1624to1628
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
1624to1628
1624to1628
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

code für VBA

code für VBA
15.05.2018 11:44:18
Jürg
Hallo Forum
ich mochte diese Formel in ein VBA einabauen
kann mir jemand diese Formel als VBA für Excel 2010 anpassen
=WENN(L="";J-HEUTE();"")
Besten Dank
Freundliche Grüsse
Jürg

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

Betreff
Datum
Anwender
Anzeige
AW: code für VBA
15.05.2018 11:45:53
Jürg
Nachtrag
sorry
in K7 kommt diese Formel hin
=WENN(L7="";J7-HEUTE();"")
Gruss
Jürg
AW: code für VBA
15.05.2018 11:50:08
Hajo_Zi
ActiveCell.FormulaLocal = "=WENN(L="""";J-HEUTE();"""")"

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
oder englisch
15.05.2018 11:53:26
Hajo_Zi 

Sub n()
ActiveCell.FormulaLocal = "=WENN(L="""";J-HEUTE();"""")"
ActiveCell.Offset(0, 1).Formula = "=If(L="""",J-today(),"""")"
End Sub
Gruß Hajo
AW: code für VBA
15.05.2018 11:55:39
Sandra.B
Hallo Jürg,
Sub Jürg()
Range("K7").Activate
ActiveCell.FormulaR1C1 = "=IF(RC[1]="""",RC[-1]-TODAY(),"""")"
End Sub
Gruß Sandra
Anzeige
AW: code für VBA
15.05.2018 12:32:59
Jürg
Hallo Sandra und Hajo
vielen dank für eure prompte Hilfe
habe Sandra's Code verwendet und passt suppi
vielen Dank .
Schönen Tag noch
Grüsse Jürg

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige