Bonjour
j'aimerais savoir s'il est possible de simplifier ce code qui par ailleurs marche très bien
If Range("B1") = "48" Then
Extraction48
ElseIf Range("B1") = "47" Then
Extraction47
ElseIf Range("B1") = "46" Then
Extraction46
ElseIf Range("B1") = "45" Then
Extraction45
ElseIf Range("B1") = "44" Then
Extraction44
ElseIf Range("B1") = "43" Then
Extraction43
ElseIf Range("B1") = "42" Then
Extraction42
ElseIf Range("B1") = "41" Then
Extraction41
ElseIf Range("B1") = "40" Then
Extraction40
ElseIf Range("B1") = "39" Then
Extraction39
ElseIf Range("B1") = "38" Then
Extraction38
ElseIf Range("B1") = "37" Then
Extraction37
ElseIf Range("B1") = "36" Then
Extraction36
End If
etc.....
quelque chose de ce style est il possible ou non ?
' 'executer la macro extraction en fonction du numero en B1
numero = range("b1")
call extraction & numero
j'ai bien essayé mais ca ne marche pas sinon je v etre obligé de me taper 300 lignes de code...