-
Fototrend
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
-
Delila_1
veterán
válasz
pentium4
#8296
üzenetére
Írtam rá egy függvényt.
Function Minimum(sor As Integer) As Double
Dim tomb(3), tomb_1(3)
Dim b As Integer, s As Integer
tomb(0) = Cells(sor, 7)
tomb(1) = Cells(sor, 12)
tomb(2) = Cells(sor, 17)
tomb(3) = Cells(sor, 22)
For b = 0 To 3
If tomb(b) > 0 Then
tomb_1(s) = tomb(b)
s = s + 1
End If
Next
Minimum = Application.Min(tomb_1(0), tomb_1(s - 1))
End FunctionA szépséghibája, hogy egy üres oszlopba az adatok mellé be kell vinni az =SOR() függvényt, és a Minimum függvényben erre a cellára kell hivatkozni.
Pl. ha a sor() függvények az AA oszlopban vannak, és a W5-ben akarod megtudni az 5. sor minimumát, akkor a W5-be ezt kell írnod: =minimum(AA5), vagy =minimum(5). Az utóbbinál az a baj, hogy a képlet lemásolásakor az 5-öt minden cellában át kellene írni az aktuális sor számára. Az előbbi képlet "lehúzható".
Remélem, ezen valaki tud majd javítani. Ha nem, marad a SOR() függvény. -
motinka
tag
válasz
pentium4
#8296
üzenetére
azaz mégis csak bármit írhatsz a 0 forintos termékekhez csak 0-t nem , így ugye nem számitja azt bele a legjobb árba.
Ellenben ha a további cellákba egy olyan képletet írsz ami először megvizsgálja, hogy az adott cella értéke nem szám akkor 0 legyen az érték, amennyiben szám akkor meg végezze el a műveletet.
pl egy ilyen:
Új hozzászólás Aktív témák
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Deep Purple - 1 ÉV GARANCIA -Kártyafüggetlen, MS4279
- iPhone 14 Pro 128GB Space Black -1 ÉV GARANCIA - Kártyafüggetlen, MS4266
- Apple iPhone 15 Pro 256GB, Kártyafüggetlen, 1 Év Garanciával
- GYÖNYÖRŰ iPhone 14 Pro Max 128GB Space Black -1 ÉV GARANCIA - Kártyafüggetlen, MS4400, 100% Akkumulá
- Sony ULT FIELD 1 bluetooth hangszoró
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

Fferi50
