würde geren folgendes mit einem code lösen
wenn meine aktive zelle im bereich zwischen a1 umd e10 dann soll
in die zelle a11 die ziffer 1 geschrieben werden.
danke
Option Explicit
Public Sub test()
Range("A11") = (Not Intersect(ActiveCell, Range("a1:e11")) Is Nothing) * -1
End Sub
Range("A11") = (Not Intersect(ActiveCell, Range("a1:e11")) Is Nothing) * -(ActiveCell.Row)
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen