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

• #45367 Delila_1 veterán KBaj #45365

  Új Válasz 2020-11-20 08:02:24 #45367

  Ú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 KBaj #45365 üzenetére

  Szerintem a feltételt kellene megadnod a ciklusban, ami színezi a cellákat.

  Function FeltetelesDarabszam(Tartomany As Range)
Dim CV As Range, db As Integer
Application.Volatile
db = 0
For Each CV In Tartomany
If CV > 40 Then db = db + 1
Next CV
FeltetelesDarabszam = db
End Function

• #45366 Fferi50 Topikgazda KBaj #45365

  Új Válasz 2020-11-19 23:23:53 #45366

  Ú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

  

  Fferi50

  Topikgazda

  válasz KBaj #45365 üzenetére

  Szia!
  Nemrég volt egy hasonló "házi" problémám, most "emlékeztettél" rá.
  Sajnos úgy néz ki, hogy függvénnyel nem lehet megoldani a problémát, mert a DisplayFormat tulajdonságot ebben a formában nem tudja "megemészteni" a VBA.
  Normál eljárással (SUB) megy, de akkor meg kell oldani a paraméter átadást.
  Már későre jár, ezért inkább holnap folytatnám.
  Üdv.

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