Discussion :

[laminedu63]

bonjour à tous,

J'ai fait une function qui fait la somme des éléments d'un tableau. Mon problème est que cette fonction fait la somme de la somme des éléments. C'est à dire:
1er passage : j'ai appui(1)=valeur de appui(1).
2ième passage : j'ai appui(2)=appui(1)+appui(2) alors que je veux juste appui(2)=valeur de appui(2).
3ième passage : j'ai appui(3)=appui(1)+appui(2)+appui(3) alors que je veux juste appui(3)=valeur de appui(3).
et ainsi de suite

voici la partie du code en question

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
20
21
22
23
24
    m = 1
    Do While m <= n
 
        For k = 1 To m
            If 2 * k <> m And 2 * k <= 2 * m Then
            m1 = matrice(2 * k, m) + m1
            ElseIf 2 * k = m Then
            m1 = matrice(2 * k, m) + m1
            Else: m1 = 0
            End If
        Next k
 
        For k = m To n - 1
            If (2 * k + 1) >= m Then
            m2 = matrice(2 * k + 1, m + 1) + m2
            Else
            m2 = 0
            m = m + 1
            End If
        Next k
 
    appui(m) = m1 + m2
    m = m + 1
    Loop

MErci pour vos aides.

[Marc-L]

Bonjour.

1er passage : j'ai appui(1)=valeur de appui(1).

En clair ?

_________________________________________________________________________________________________________
Je suis Paris, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[laminedu63]

En clair la valeur calculée par la function est correcte pour le premier passage mais c a partir du 2ieme passage que jai appui (2)=appui (2)+appui(1). Par exemple :
Si jai appui (1)=10 et que je devais appui(2)=15.
Ma function va afficher appui (1)=10 et appui(2)=10+15=25.

[laminedu63]

Bonjour,
Personne n'a une idée pour mon problème.

[a_diard]

je crois que les + m1 et + m2 sont en trop:

Code :

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

1
2
3
4
5
6
 
            m1 = matrice(2 * k, m) + m1
 
            m1 = matrice(2 * k, m) + m1
 
            m2 = matrice(2 * k + 1, m + 1) + m2

ou alors je n'ai rien compris

bonne soirée

[laminedu63]

Bonsoir,

si je ne mets pas les +m1 dans ce cas je n'aurai pas la somme des m1 ni des m2 afin de mieux clarifier mon idée pour faciliter la compréhension c'est fait l'algo que je fais à la fin (image ci-dessous)


Dans le cas je ne devrais pas mettre les +m1 alors je n'aurai pas la somme???
Avez vous d'autres orientations pour traduire mon algo?

merci de vos aides

[unparia]

Bonjour

Avez vous d'autres orientations pour traduire mon algo?

Quel "algo" ?
Je ne vois personnellement que des équations successives

[Marc-L]

Sans une présentation digne de ce nom, c'est à dire claire et exhaustive accompagnée
d'un exemple concret et détaillé tel que cela aurait dû être présenté dès la création de cette discussion,
aucune aide possible car nous ne perdrons pas de temps à chercher hypothétiquement à décrypter.

En somme :
Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)

[laminedu63]

Bonjour,

Appelons les des équations successives merci pour la précision. Mais je pense que algorithme veut dire selon google "Un algorithme est une suite finie et non ambiguë d’opérations ou d'instructions permettant de résoudre un problème ou d'obtenir un résultat" et comme tu dis Unparia je ne donne que des suites d'équations donc un algo bref comme vous préférez ce n'est pas le plus important.

Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)

Je suis entierement d'accord avec toi sauf que si je concevais bien la VBA je serai la pour aider mais pas pour demander de l'aide.

ET franchement j'espère que personne ne s'énervera ou se sentira visé mais c'est difficile de concilier :
1- le fait de parler à des experts en VBA (donc parfois on essaie d'expliquer clairement sur son problème dans le codage si le mot codage convient bien sur à tout le monde)
2- d'être clair sur son problème tout en essayant de ne pas embeter les gens avec des formules mathématiques ou physique
3- de faire des schémas ou des équations successives pour expliquer ce que je veux faire

N'est il pas plus simple de poser des questions pour comprendre que la personne veut faire bien entendu si l'on souhaite ?????
MArc mon post 3 ne répondait-il pas à ton post 2?

Soyez un peu plus indulgent. Surtout UNPARIA et désolé d'avance ......

[Marc-L]

Si le post #3 avait dégagé le brouillard initial, une solution aurait évidemment déjà été proposée !

Nous ne parlons pas de VBA, nous attendons une explication de A à Z, claire donc et complète.

Exemple enfantin : appliquer un taux de tva de 20% : 100€ est multiplié par 0,2 = 20€

Ce n'est pas plus compliqué que cela … Sans explication convenable de tes calculs, nous ne les devinerons pas !
Si tu cherches un algorithme, tu t'es trompé de forum, vaut mieux migrer vers un forum dédié aux mathématiques.

[unparia]

Je vais résumer, laminedu63
- toi, tu dis ne pas t'y connaître suffisamment en développement et ne trouver donc d'autres moyens, pour te faire comprendre, que de nous montrer une succession d'équations mathématiques
- je vais te répondre alors que moi, je ne connais rien aux mathématiques et ne sais donc pas transformer en algorithme (puis en code) des équations qui ne me "disent" rien.
On va où, selon toi, ainsi ?
Voilà tout.

[laminedu63]

Je ne cherche pas de l'aide pour un algorithme mais pour un problème de VBA et afin de repondre a la proposition d'enlever les +m1 jai repondu dans ce sens en proposant ma base de reflexion pour faire function qui certes ne marche pas

[unparia]

Me voilà donc maintenant en mesure de répondre avec clarté à ton message N° 4, à savoir :

Personne n'a une idée pour mon problème.

Non. Pas moi. Je n'en ai pas.

[Marc-L]

Oublie le VBA ‼   Explique donc juste les calculs, ce n'est pas compliqué si tu maitrises ton sujet !

Sinon voici ma réponse :   effectuer une boucle sur le nécessaire si besoin …

[laminedu63]

Bonjour A tous,

MArc pour expliciter mes calculs:
J'ai un tableau de taille (14lignes et 7 colonnes) que j'appelle dans la suite de l'explication M(). Je veux calculer appui(m) avec m qui varie de 1 à 7.
donc

appui(1)=M(2,1)+M(3,2)+M(5,2)+M(7,2)+M(9,2)+M(11,2)+M(13,2)

Appui(2)=M(2,2)+M(4,2)+M(5,3)+M(7,3)+M(9,3)+M(11,3)+M(13,3)

Appui(3)=M(2,3)+M(4,3)+M(6,3)+M(7,4)+M(9,4)+M(11,4)+M(13,4)

Appui(4)=M(2,4)+M(4,4)+M(6,4)+M(8,4)+M(9,5)+M(11,5)+M(13,5)

Appui(5)=M(2,5)+M(4,5)+M(6,5)+M(8,5)+M(10,5)+M(11,6)+M(13,6)

Appui(6)=M(2,6)+M(4,6)+M(6,6)+M(8,6)+M(10,6)+M(12,6)+M(13,7)

etc...


En ce qui concerne le code que j'ai fait :
Il donne la bonne valeur de pour appui(1). Mais pour le calcul de appui(2) il donne la valeur de appui(2)+la valeur de appui(1).
En terme numérique : si appui(1)=10 et que appui(2)=15 par exemple
mon code renvoie :
appui(1)=10 et appui(2)=25 (il fait la somme de 10+15).

Merci beaucoup pour vos aides.

[Marc-L]

Sans information du pourquoi du changement de numéro de colonnes / lignes dans les indices selon m,

utilise par exemple tout simplement l'instruction Select Case sur la valeur de m et

pour chacune de ses valeurs effectuer le calcul comme présenté dans le post précédent …

[laminedu63]

le changement de numéro de colonnes / lignes dans les indices selon m découle de mon tableau (2*n,n)
et s'il faut faire des select case sur m et faire les calculs dans ce cas, le tableau de résultats serait-il variable?

Je pense à faire une autre boucle pour soustraire les valeurs des appui(m-1).

[Marc-L]

Non, le résultat ne peut être variable tel que présenté avec ton tableau de sept colonnes.

Pour qu'il soit variable, déduis-en au moins l'algorithme nécessaire et présente-le nous
tel que cela aurait dû être fait lors de la création de cette discussion !
Vu ton post #15 cela devrait t'apparaître clairement si tu connais ton sujet
et là il ne s'agit pas de VBA mais juste de pure logique …

[laminedu63]

Alors à défaut de mieux j'ai fait une autre boucle pour avoir les valeurs souhaitées voici le code définitif

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
    m = 1
    Do While m <= n
 
        For k = 1 To m
            If 2 * k <> m And 2 * k <= 2 * m Then
            m1 = matrice(2 * k, m) + m1
            ElseIf 2 * k = m Then
            m1 = matrice(2 * k, m) + m1
            Else: m1 = 0
            End If
        Next k
 
        For k = m To n - 1
            If (2 * k + 1) >= m Then
            m2 = matrice(2 * k + 1, m + 1) + m2
            Else
            m2 = 0
            End If
        Next k
 
    appui(m) = m1 + m2
    m = m + 1
    Loop
 
 
 
If k = 1 Then
appui(k) = appui(1)
Else
For k = 2 To n + 1
appui(k) = appui(k + 1) - appui(k)
    Debug.Print (k); (appui(k))
 
Next

Merci beaucoup a tous de votre sollicitude mention spéciale a MARC.

[Marc-L]

Apparemment le fait de coucher sur le papier ton besoin t'a bien aidé ‼
En général il est nécessaire de commencer par cette étape avant d'écrire la première ligne de code !

Pour continuer vers du mieux - vu le bout de code incomplet ! - il faudra déjà que l'on sache comment
la matrice est créée et vis à vis du post #15 tu présentes juste un code pour créer appui(1) et un autre pour appui(2) …
Tout dépend aussi de ce qui a été clairement demandé dans l'énoncé de ton exercice, là aussi on ne le devinera pas !

_________________________________________________________________________________________________________

Heureux l'étudiant qui, comme la rivière, suit son cours sans quitter son lit …