Pb tableau

sandrine74

XLDnaute Nouveau
Bonjour!
voilà j'ai un ti pb... si qq'un pouvait m'aider ça me ferait trés plaisir.
Je vous envoie mon fichier.

J'ai un tableau et dans le 1ère colonne je rentre le débit souhaité, dans la 2ème je choisis un diamètre selon un tableau et dans la 3ième je calcule la vitesse et le pb arrive ds la 4ième colonne. je ne veux pas une vitesse supre à 2 or ce n'est pas le cas pr tte les cases je dois dc changer le diamètre choisis.
Donc pour la 4ième colonne si ma vitesse est 2.
Pour la e7 il me faudrait 260.4 alors que j'avais 231.
si qq'un peut m'aider!!!
merci bcp [file name=autrepb.zip size=3388]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/autrepb.zip[/file]
 

Pièces jointes

  • autrepb.zip
    3.3 KB · Affichages: 16

porcinet82

XLDnaute Barbatruc
SAlut Sandrine,

Une petite réponse vite fait par macro mais a tester plus dans le details et surement a pofiner. Si ta valeur est supérieur a 2, alors une recherche est faite dans la liste de ton tableau, et remplacer par la valeur supérieure.

Code:
Sub test()
Dim i As Integer

For i = 2 To Range('B65536').End(xlUp).Row
     If Cells(i, 4).Value > 2 Then
        For Each cel In Range('I2:' & Range('I65536').End(xlUp).AddressLocal(0, 0))
            If cel = Cells(i, 3).Value Then
                Cells(i, 3).Value = cel.Offset(1, 0).Value
                Exit For
            End If
        Next cel
     End If
Next i
End Sub

@+
 

Gorfael

XLDnaute Barbatruc
Salut à tous
Aimant me faire des noeuds aux boyeaux de la tête, j'ai pris le problème à l'envers. J'ai recopié le tableau B1:E7 en B18:E24 pour conserver la référence de départ
C19 = :eek:
=SI(B19/(2,77385352552384*(RECHERCHEV(B19;$H$2:$J$24;2))^2)>2;INDEX($H$2:$J$24;SI(EQUIV(RACINE(B19/(2*2,77385352552384));$I$2:$I$24;1)>22;23;EQUIV(RACINE(B19/(2*2,77385352552384));$I$2:$I$24;1)+1);2);RECHERCHEV(B19;$H$2:$J$24;2))

en clair : tu parts du débit, et tu recherches dans ton tableau correspondant. Après, tu vérifies que la valeur trouvée ne donne pas une vitesse > 2m/s

Moi, je calcule la vitesse que me donne le damètre choisit d'après le débit.
Si elle est < 2m/s, j'applique ta formule
Sinon je calcule le diamètre que me donne la valeur de la vitesse de 2m/s.
Là, comme Excel me donne la ligne du diamètre immédiatement inférieur, je rajoute 1 à la ligne touvée
Je bloque à la dernière ligne du tableau pour pas avoir d'erreur.

2,77385352552384 correspond à la valeur calculée de : 3600*981,05*PI()/(4*1000*1000)

en gros, la formule de la vitesse :
V = Débit /(Contante *(Diamètre)^2)
et je transforme ça en
Diamètre = racine^2(Débit/(constante*Vitesse) avec vitesse=2

A+
 

Discussions similaires

Réponses
9
Affichages
165

Statistiques des forums

Discussions
312 229
Messages
2 086 426
Membres
103 206
dernier inscrit
diambote