Thema Datum  Von Nutzer Rating
Antwort
29.12.2021 22:43:36 Max
NotSolved
Blau Ausgabe des ersten Werts kleiner X in einer Spalte
30.12.2021 00:31:12 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
30.12.2021 00:31:12
Views:
446
Rating: Antwort:
  Ja
Thema:
Ausgabe des ersten Werts kleiner X in einer Spalte
Sub Makro1()
 Dim colA, i As Long
  colA = Intersect(ActiveSheet.UsedRange, Activesheet.Columns(1)).Resize(, 2)
  For i = 1 To UBound(colA)
    If colA(i, 2) < 150 Then
        MsgBox " Nach " & colA(i, 1) & " Sekunden lag der Messwert erstmals unter 150" ' & colA(i, 2)
        Exit For
  Next
End Sub

wie man so ein Makro aufruft, suchst du dir aber selbst raus.


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
29.12.2021 22:43:36 Max
NotSolved
Blau Ausgabe des ersten Werts kleiner X in einer Spalte
30.12.2021 00:31:12 ralf_b
NotSolved