-
GAMEPOD.hu
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
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[ Szerkesztve ]
Bámulatos hol tart már a tudomány!
-
Delila_1
Topikgazda
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[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
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 SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Autós kamerák
- Android alkalmazások - szoftver kibeszélő topik
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Ukrajnai háború
- Videó stream letöltése
- Gaming notebook topik
- Motorola Moto G24 Power - hol van az erő?
- Milyen videókártyát?
- Helldivers 2 (PC, PS5)
- Xbox Series X|S
- További aktív témák...
- Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.