Calcul dans un triangle

[JJ1]

Bonjour,

J'ai un tableau Excel rempli de nombres. Je souhaiterais, après avoir saisi les coordonnées de 2 points (en jaune) comptabiliser le nombre de nombres dans le triangle et sur la droite.
Je n'ai rien trouvé sur le Forum à ce sujet.
Si vous avez une idée, merci.
Bonne soirée

 

[Habitude]

Re : Calcul dans un triangle

Bonjour,

J'ai un tableau Excel rempli de nombres. Je souhaiterais, après avoir saisi les coordonnées de 2 points (en jaune) comptabiliser le nombre de nombres dans le triangle et sur la droite.
Je n'ai rien trouvé sur le Forum à ce sujet.
Si vous avez une idée, merci.
Bonne soirée

Tu veux donc comptabiliser le nombre de chiffres dans le triangle.
Sur la droite ??
tu veux dire le nombre de chiffre à droite du triangle ?

ET qu'est-ce que "NB ligne (hypothénuse)"

 

[JJ1]

Re : Calcul dans un triangle

Bonjour,
oui je souhaite les nombres dans le triangle bleu (défini par les coordonnées saisies en plage jaune) et sur la droite opposée à l'angle droit (il y en a 4 dans mon exemple)
merci

 

[mécano41]

Re : Calcul dans un triangle

Bonjour,

Tu prends quelles cellules pour l'hypoténuse si les deux coordonnées données sont par ex. H13 et K3 ?

Si l'hypoténuse se fait toujours par décalage de ligne de 1 comme dans ton exemple, il vaudrait mieux donner H13 et M13.

Cordialement

 

[Eric 45]

Re : Calcul dans un triangle

Bonsoir à tous

Tu peux essayer ceci :

Option Explicit

Sub compte_h()
Dim c As Integer, i As Integer
Dim compte As Integer, nb_total As Integer

For i = Range(Range("Q3")).Column To Range(Range("R3")).Column Step -1
    If Cells(Range(Range("Q3")).Row + c, Range(Range("Q3")).Column - c) <> 0 Then
        compte = compte + 1
    End If
    nb_total = nb_total + Application.WorksheetFunction.CountA(Range(Cells(Range(Range("Q3")).Row + c, Range(Range("Q3")).Column - c), Cells(Range(Range("Q3")).Row + c, Range(Range("Q3")).Column)))
    c = c + 1
Next
MsgBox "NB ligne " & compte & vbCr & "NB plage " & nb_total

End Sub

Eric

 

[Habitude]

Re : Calcul dans un triangle

Regarde ceci

Le triangle ce dessine est les données sont calculés

Attention il calcul d'après un tableau fixe

Si les coordonnées ne sont pas bonne, le triangle ne se dessine pas...

 

[JJ1]

Re : Calcul dans un triangle

Bonjour à tous,
Je viens de prendre connaissance de vos réponses-merci
j'ai ouvert le fichier d'Habitude, il y a une petite erreur au niveau du comptage ligne, (voir exemple) sinon le code est parfait.
Le triangle se dessine parfaitement.
Merci et bon WE à tous.

 

[Habitude]

Re : Calcul dans un triangle

Ok je viens de comprendre ce nombre ligne hypothénuse

Ca n'est pas ca du tout que je calcul

je calcul tout les chiffres du coté opposé à l'hypothénuse qui ne sont pas dans le triangles.

Donc voici