Discussion :

[Invité]

Bonjour à tous,

Mon problème est le suivant:

J'ai un tableur excel avec dans une colonne une chaine de caractere de type :
"élèment>sous-élement>mon objet>ma pièce"
Et selon la valeur de "mon objet" je souhaite mettre la cellule suivante à une certaine valeur

Voici mon code cba pour le moment, mais il ne fonctionne pas, j'ai créer une fonction que je lance à partir d'un bouton :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function Secteur()
    For i = 3 To Sheets("PA2011").Range("A" & Rows.Count).End(xlUp).Row
        Select Case Sheets("PA2011").Cells(i, 10).Value
            Case "entrepôt>Production>piece A32"
                Sheets("PA2011").Cells(i, 15).Value = "PA"
            Case "entrepôt>Production"
                Sheets("PA2011").Cells(i, 15).Value = "production"
            Case "entrepôt>Production>Pièce B*"
                Sheets("PA2011").Cells(i, 15).Value = "AMG DC"
            Case "*maintenance"
                Sheets("PA2011").Cells(i, 15).Value = "maintenance"        
        End Select
    Next
End Function

Pour les deux premier cas, celà fonctionne car j'ai mis la chaine de caractère en entier. Mais je voudrais effectuer le select case uniquement sur une partie de la chaine, comme les cas 3 et 4 par exemple ... qui pour le moment ne fonctionne pas.

Merci d'avance pour votre aide!