Problème de condition

[Daniel]

Bonjour à tous,

J'ai un petit problème pour la mise en oeuvre dans mon tableau :

je dois réaliser un échantillonnage suivant un nombre de pièces produites.

entre 11 pièces et 25 je dois contrôler 8 pcs
entre 26 et 50, je dois contrôler 10 pcs
entre 51 et 90, je dois contrôler 13 pcs etc.....

je pense utiliser des if, mais je ne sais pas comment faire pour lui dire que ente tel et tel donné il doit me dire 8 etc...


Merci d'avance

[file name=T&a test_20050425145034.zip size=6650]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/T&a test_20050425145034.zip[/file]

 

[Hervé]

Bonjour

Tu en dis pas lourd, donc une proposition à finaliser en pièce jointe :

Public Sub vev()
Dim c As Range

For Each c In Range('l7:l' & Range('l65536').End(xlUp).Row)
Select Case c.Value
Case 11 To 25: c.Offset(0, 1) = 8
Case 26 To 50: c.Offset(0, 1) = 10
Case 51 To 90: c.Offset(0, 1) = 13
'etc.....
Case Else: c.Offset(0, 1) = 0
End Select
Next c
End Sub

salut
[file name=T&a test_20050425150130.zip size=8391]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/T&a test_20050425150130.zip[/file]