XL 2013 Ucase

fil28

XLDnaute Nouveau
Bonjour le forum,

Je sollicite votre aide
J'ai le code suivant qui me dit que si ma cellule contient VarStock alors dans une autre cellule j'obtiens Cadrage Stock Var
VB:
If Feuil13.Cells(i, Memo).Value Like "*Var Stock*" Then Feuil13.Cells(i, OdManuel).Value = "Cadrage Stock Var"
Jusque là ca fonctionne

Le problème c'est que Var Stock peut des fois être en minuscule ou majuscule, j'ai donc mis UCASE pour éviter ce problème
VB:
If Ucase(Feuil13.Cells(i, Memo).Value) Like "*VAR STOCK*" Then Feuil13.Cells(i, OdManuel).Value = "Cadrage Stock Var"
Mais là ca ne fonctionne pas

Auriez vous une idée
Merci
Philippe
 

Gégé-45550

XLDnaute Accro
Bonjour le forum,

Je sollicite votre aide
J'ai le code suivant qui me dit que si ma cellule contient VarStock alors dans une autre cellule j'obtiens Cadrage Stock Var
VB:
If Feuil13.Cells(i, Memo).Value Like "*Var Stock*" Then Feuil13.Cells(i, OdManuel).Value = "Cadrage Stock Var"
Jusque là ca fonctionne

Le problème c'est que Var Stock peut des fois être en minuscule ou majuscule, j'ai donc mis UCASE pour éviter ce problème
VB:
If Ucase(Feuil13.Cells(i, Memo).Value) Like "*VAR STOCK*" Then Feuil13.Cells(i, OdManuel).Value = "Cadrage Stock Var"
Mais là ca ne fonctionne pas

Auriez vous une idée
Merci
Philippe
Bonjour,
essayez de remplacer
Code:
 Like "*VAR STOCK*"
par
VB:
Like "*" & "VAR STOCK" & "*"
Cordialement,
 

Discussions similaires

Statistiques des forums

Discussions
312 321
Messages
2 087 245
Membres
103 498
dernier inscrit
FAHDE