Új hozzászólás Aktív témák

• #34030 Delila_1 veterán Savaria90 #34024

  Új Válasz 2017-01-31 15:33:01 #34030

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Savaria90 #34024 üzenetére

  Bocsi! Nem figyeltem, hogy megadtad a számokat tartalmazó oszlopot (C).
  Ennek megfelelően átírtam a makrót, az eredmények a D és E oszlopokba kerülnek.

  Sub MinMax()
Dim sor As Long, KepletHelye As Long
KepletHelye = 2
For sor = 2 To 600000 Step 1440
Cells(KepletHelye, "D") = "=min(C" & sor & ":C" & sor + 1439 & ")"
Cells(KepletHelye, "E") = "=max(C" & sor & ":C" & sor + 1439 & ")"
KepletHelye = KepletHelye + 1
Next
End Sub

• #34028 Delila_1 veterán Savaria90 #34024

  Új Válasz 2017-01-31 15:24:54 #34028

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Savaria90 #34024 üzenetére

  Nálam a 600000 sor az A oszlopban van. A MIN értékeket az egyes tartományokra a B oszlopba-, a MAX-okat a C-be írja egymás alá a makró. Modulba másold be – lásd hozzá a összefoglaló leírását.

  Sub MinMax()
Dim sor As Long, KepletHelye As Long
KepletHelye = 2
For sor = 2 To 600000 Step 1440
Cells(KepletHelye, "B") = "=min(A" & sor & ":A" & sor + 1439 & ")"
Cells(KepletHelye, "C") = "=max(A" & sor & ":A" & sor + 1439 & ")"
KepletHelye = KepletHelye + 1
Next
End Sub

• #34026 lappy őstag Savaria90 #34024

  Új Válasz 2017-01-31 15:23:59 #34026

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lappy

  őstag

  válasz Savaria90 #34024 üzenetére

  nálam nem múködik de talán próbáld ki mert elvileg jónak kell lennie
  a min és max függvényeket használod 1439 soronként így a képletbe kell beleteni ezt a számot
  alapból a képlet min(b2 : b1441)
  helyette a min("b"&sor(b2) : "b"&(sor(b2)+1439))
  ha egymás alá gyűjtöd akkor be kell szorozni a sor -1-el

Új hozzászólás Aktív témák