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

• #48669 bteebi veterán lappy #48668

  Új Válasz 2022-03-09 12:06:32 #48669

  Ú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

  

  bteebi

  veterán

  válasz lappy #48668 üzenetére

  Ha úgy próbáltam, hogy Zscore = WorksheetFunction.Norm_S_Inv((WorksheetFunction.Rank(score, cnt, 1)_
_ - 0.5) / WorksheetFunction.Count(cnt)), akkor már legalább számolt valamit... de nem jót. Aztán átírtam a Long-ot Double-re, és jó lett. Szóval köszi! Tehát:

  Function Zscore(score As Variant, cnt As Range) As Double
Zscore = WorksheetFunction.Norm_S_Inv((WorksheetFunction.Rank(score, cnt, 1)_
- 0.5)/WorksheetFunction.Count(cnt))
End Function

  Mondjuk az még érdekes, hogy WorksheetFunction nélkül hogy lehetne szebben/rövidebben.

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