=er oder nächstliegender Wert auslesen

Forumthread: =er oder nächstliegender Wert auslesen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: =er oder nächstliegender Wert auslesen

22.02.2018 11:23:33

urs

Guten Morgen
Zu einem errechneten Wert (360/7*5) suche ich in (B19-B56) den nächst liegenden Wert.
Tritt eine Übereinstimmung auf wird dieser Wert übernommen. Liegt der errechnete Wert genau in der Mitte zweier Werte, so soll der kleinere Wert ausgewählt ansonsten der Wert mit der kleinsten Differenz zum errechneten Wert.
Danke für Eure Hilfe. Gruss Urs

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: =er oder nächstliegender Wert auslesen

22.02.2018 11:36:52

Burak
That's the Way I like it

22.02.2018 17:39:41

urs

AW: =er oder nächstliegender Wert auslesen

22.02.2018 11:36:52

Burak


Sub test()
Dim i As Long, kleiner As Long
Range("A1").Value = 360 / 7 * 5
For i = 19 To 56
If Range("B" & i).Value

That's the Way I like it

22.02.2018 17:39:41

urs

Hallo Burak
Vielen Dank für Deinen Skript. Er hat mir das nötigste gezeigt, sodass ich den Rest gut hinbekommen habe. Das Programm läuft. Jetzt kommt noch der Feinschliff. Gruss Urs