Faire un test sur cellules vides dans une fonction perso

lebarbo

XLDnaute Occasionnel
Bonjour,

J'ai un souci actuellement de mémoire sur des fonctions personnalisées. En effet, je souhaite que mes fonctions calculent un résultat sur une plage même si une cellule est vide (car division par 0 impossible). J'effectue donc un test avec If macellule<> "" then calcul mais apparemment cela prend un temps fou pour faire le calcul.
Auriez vous une autre astuce pour tester les cellules vides ou même savez vous comment les fonctions d'Excel sont programmées pour cela ?

Merci,
 

lebarbo

XLDnaute Occasionnel
Re : Faire un test sur cellules vides dans une fonction perso

Bonjour Pierrot93,

Voilà pour le code avec les conditions If qui font ralentir Excel :
Function Volatilite(Serie As Range, pas As Integer) As Variant
Dim TabResult As Variant
Dim L As Long

ReDim TabResult(1 To Fonds.Count - 1)
For L = 2 To Fonds.Count
If Serie(L - 1).Value <> "" Then
If Serie(L).Value <> "" Then
TabResult(L - 1) = Application.Ln(Serie(L).Value / Serie(L - 1).Value)
End If
End If
Next L
Volatilite = Application.StDev(TabResult) * Sqr(pas)
End Function

Comment les fonctions déjà intégrées dans Excel font-elles pour ne pas prendre en compte les champs vides ?

Merci,
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 206
Messages
2 086 203
Membres
103 157
dernier inscrit
youma