-
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
-
m.zmrzlina
senior tag
válasz motinka #17208 üzenetére
Itt értekeztünk hasonló dolgokról.
Annyi különbséggel, hogy ott a betűszín volt az összegzés kritériuma nem a háttérszín, és nem a cellák számát határozta meg hanem a tartalmukat összegezte.
Az alábbi fv ennek a módosítása:
Function SZINESÖSSZEG(minta As Range, tartomany As Range)
Dim cella As Range, osszeg As Double
szin = minta.Interior.ColorIndex
For Each cella In tartomany
If cella.Interior.ColorIndex = szin Then
osszeg = osszeg + 1
End If
Next cella
SZINESÖSSZEG = osszeg
End Function[ Szerkesztve ]
Új hozzászólás Aktív témák
- Game Pass Ultimate előfizetések 1 - 19 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- AKCIÓ! - STEAM kulcsok / Aragami, Transformers, Oddworld, stb. - 2024.08.08.
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
Állásajánlatok
Cég: Ozeki Kft
Város: Debrecen
Cég: Ozeki Kft
Város: Debrecen