Thema Datum  Von Nutzer Rating
Antwort
25.07.2016 09:14:09 Gast2704
NotSolved
25.07.2016 10:22:30 Crazy Tom
NotSolved
25.07.2016 12:07:34 Gast2704
NotSolved
25.07.2016 12:38:45 Crazy Tom
NotSolved
Rot Zeilenposition von Maximalwert bestimmen
 25.07.2016 13:24:36 Gast10650
NotSolved
25.07.2016 13:32:36 Crazy Tom
NotSolved
25.07.2016 14:19:50 Gast2704
NotSolved

Ansicht des Beitrags:
Von:
Gast10650		 Datum:
25.07.2016 13:24:36		 Views:
659		 Rating:
     
Antwort:
  Ja
Thema:
Zeilenposition von Maximalwert bestimmen
Wenn ich die zum Maximum zugehörige Zeilennummer als String-Variable erhalten möchte, dann funktioniert dein Code bei mir nicht.
Der ZeilenWERT entspricht dem Maximum, das funktioniert einwandfrei. Ich suche aber die zugehörige ZeilenNUMMER.
Ich möchte die Zeilennummer als Variable wie folgt weiterverwenden:
 
Dim Zeilennummer As Single
Dim FolgeWert As Single
FolgeWert = ActiveSheet.Range("B" & Zeilennummer).Value
 
Wenn ich deinen Code versuche anzupassen folgt: 
Sub test()
    Dim ZeileMax As Double
    Dim c As Range
    Dim t As Single   't soll die ZeilenNUMMER als Single Variable sein
    ZeileMax = WorksheetFunction.Max(Range("F:F"))
    Set c = Columns(6).Find(ZeileMax, LookIn:=xlValues, lookat:=xlWhole)
    If Not c Is Nothing Then
        t = c.Row
    End If
ActiveSheet.Range("B2").Offset(0, 0) = ZeileMax
ActiveSheet.Range("C2").Offset(0, 0) = t

End Sub
 

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
25.07.2016 09:14:09 Gast2704
NotSolved
25.07.2016 10:22:30 Crazy Tom
NotSolved
25.07.2016 12:07:34 Gast2704
NotSolved
25.07.2016 12:38:45 Crazy Tom
NotSolved
Rot Zeilenposition von Maximalwert bestimmen
 25.07.2016 13:24:36 Gast10650
NotSolved
25.07.2016 13:32:36 Crazy Tom
NotSolved
25.07.2016 14:19:50 Gast2704
NotSolved