Recherche:

Salut

En effet je n'ai pas bien saisi non plus a vrai dire, on doit repousser l'erreur de calcul tellement loin avec le Double, qu'il n'est plus possible de l'afficher...
A++
Qwaz

Salut
Résultat des courses.
-> passage en Double on obtient

Option Explicit

Function Fact(Nombre) As Double
Dim Boucle As Integer
Fact = 1
If Int(Nombre) >= 2 Then

Salut
Pas de probleme avec Cible a 0.
Je te redonne le code avec lequel je tourne

Option Explicit

Function Fact(Nombre) As Single
Dim Boucle As Integer
Fact = 1
If Int(Nombre) >= 2 Then

Salut
:koi: Je suis plutôt surpris, si je breack dans la macro je n'ai pas ce type d'arrondi bizarre, ou prends tu ces valeurs?
J'ai fais le teste suivant, j'ai mis uniquement des 50% dans le...

Salut
Avant de modifier quoi que ce soit, j'aimerais que tu répondes à la question soulevée plus haut.
De quelle précision as tu besoin, je ne voudrait pas passer plus de temps que nécessaire a...

:weird: Je te l'ai donné juste au dessus...

Pour ce qui est de Double et Single as tu bien réfléchis a la précision nécessaire et au rendu que te fera la cellule excel étant donné sont niveau de...

Salut
Il est bien de l'avoir remarqué, mais la solution étant simple, un peu de creusage de tête t'aurais probablement permis de le réaliser toi même ;)


bPositif = True
SomX =...

Salut

Désolé je ne vois pas de quelle patrie du code tu parles, peux tu mettre un extrait de code


Alors en effet ces variables sont de type Single, si tu veux une précision au delà, utilise...

Salut
Voila un code qui reproduit les même résultat que le tien.
Par contre un bug apparait a partir de 63 Membres, je m'y pencherais peut être plus tard.
Bon teste

Option Explicit

Function...

Salut
Alors voila le principe


Function CalculProba(MaxN As Integer, NbrUplets As Integer)
'MaxN correspond a ton ancienne variable N
ReDim Xx(NbrUplets - 1) As Integer 'valeur de 0 à...

Salut
Petite réponse vite faite, comme je e l'ai dis je n'ai pas eu le temps de regarder le lien wiki, ni mm de pris le temps de bien lire tes dernières post.

J'avais edité un message et donc tu...

Salut
Je n'ai pas tout lu, je regarderai ce soir.
Mais je pense avoir une solution de boucle polyvalente (je savais bien que la nuit porte conseil :D), il faut laisser tomber les boucles for, je te...

Essais d'expliquer un peu plus le but du code, car perso j'ai du mal a mis retrouver dans toutes ces boucles.
Instinctivement au vu des résultat et de la structure des boucles, je dirais que seul la...

Re
Pour le debut

Private Sub Worksheet_Change(ByVal Target As Range) ' Marco57 de VeriTi.net, et R.Morineau, Mars2010
'la ligne suivante declare les dest de 1 a 14 en type variant et seulement...

Salut
Ce qui est claire a tes yeux par ce que tu as le nez collé sur ton problème, ne l'ai pas forcement pour nous qui te lisons.
Ceci etant dis

Pour ton 1er problème

Sub test1_Masamunai()...