Discussion :

[dlight]

Bonjour à tous.

Je débute un nouveau projet et j'ai déjà un petit problème...

Le code fera une boucle sur les cellules de la colonne A et effectura certaines opérations selon la valeur des 4 premières lettres de chaque cellules.

J'ai donc besoin d'obtenir la valeur dans une variable pour les 4 premères lettres de la cellule active.

J'ai utilisé l'enregistreur de marco mais je n'arrive pas à appliqué cela dans mon contexte.

Merci à l'avance

DLIGHT

[ESVBA]

Avec un code du genre de la ligne 2 :

Code :

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

1
2
3
4
5
6
7
8
Dim sVar as String
sVar = Left(Activecell.Value, 4)
Select Case UCASE(sVar)  'Tout en majuscules Attention Accent
    case "ACCE"
    Case "GRAP"
    Case else
 
End Select

ESVBA

[dlight]

Si simple... parfois, je vais dans la mauvaise direction et je coule...

Merci à vous ESVBA de m'avoir aidé

Dlight