Discussion :

[kenzo1245]

Bonjour, j'ai trouvé une fonction pour le problème de la "somme de sous-ensembles" ou "subset sum" qui fonctionne bien.
Je ne comprend pas très bien ce qu'est le with_v dans le code. J'aimerais le convertir pour du VBA sur excel.
Si vous avez une idée? Merci d'avance!

Voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
def subsetsum(array,num):
 
    if num == 0 or num < 1:
        return None
    elif len(array) == 0:
        return None
    else:
        if array[0] == num:
            return [array[0]]
        else:
            with_v = subsetsum(array[1:],(num - array[0])) 
            if with_v:
                return [array[0]] + with_v
            else:
                return subsetsum(array[1:],num)
 
 
 
print(subsetsum([5,1,3,25,33,55,88,77,33,4,22],10))

le résultat ici donne : [5,1,4]

[plxpy]

Bonjour,

with_v est le résultat de la recherche d'un sous-ensemble A PARTIR de l'élément d'indice 1 du tableau courant dont la somme fait num-(valeur de l'élément d'indice 0). Si il y a une solution (différent de None) à cette "sous"-recherche, on met à jour la liste des éléments (solution) avec le premier élément

Pour rechercher dans [5,1,3,25,33,55,88,77,33,4,22] un sous-ensemble de somme 10, on recherche dans [1,3,25,33,55,88,77,33,4,22] un sous-ensemble de somme 10-5, et pour ... etc ...

Après, toute la batterie de tests, c'est pour gérer tes appels récursifs à subsetsum et s'arrêter quand/où il faut.

[kenzo1245]

Bonjour,

Merci pour la réponse et pour la rapidité.

Pouvez-vous me dire ce que signifie: " if with_v:" à la ligne 12. C'est une condition mais il n'y à aucune comparaison, rien.
Avez-vous une idée de ce que le code pourrais donner en VBA?.

Merci.

[plxpy]

Pouvez-vous me dire ce que signifie: " if with_v:" à la ligne 12. C'est une condition mais il n'y à aucune comparaison, rien.

Quel que soit le langage, c'est souvent synonyme de "... ne vaut pas l'élément nul", dans le sens le plus large : 0, 0.0, liste vide, chaine vide, ... ou aussi, en Python, None.

Ici, c'est strictement identique à "if with_v is not None:", vu ce que retourne la fonction.

Sinon, je ne pense pas que ce soit une bonne idée de traduire "mot à mot" un truc, de Python en VBA. Il faut un minimum comprendre l'algo. Sinon, gare au "sky, my husband !", incompréhensible pour les anglo-saxons !

[kenzo1245]

OK, merci beaucoup pour toutes ces précisions.J'ai testé le code pas a pas et je pense l'avoir plus ou moins compris.
Mais pour faire pareil en VBA ça va pas être du gâteau.

merci et à la prochaine!