Macro d'après certains caractères

[Jean-François]

Comment faire exécuter une action d'après certains caractères d'une cellule. Par exemple : si les 5 premiers caractères des cellules d'une plage donnée sont "TOTAL", alors exécuter telle action ?

 

[Eric]

Tu te rèpètes - Soluce quelques posts plus bas --

A ++

Eric

 

[schmail]

Hé Jf, tu nous dérange

Moa t'a conseillé de lire la charte...le résultat : toujours pas le mininum de coutoisie et de plus tu doubles tes posts...

Attention car avec une telle attitude, il y a peu de chance que tu obtiennes des renseignements sur ce forum ni sur aucun autre (la Netétiquette est valable sur de nombreux forums)

2 posts à lire (en plus de la charte)
celui la : <http://www.excel-downloads.com/html/French/forum/messages/1_42861_42861.htm>
Et un spécial Jf : <http://www.excel-downloads.com/html/French/forum/messages/1_63067_63067.htm>

 

[JMG]

bonjour à tous

un peu d'indulgence car il ne sais pas !

tu m'avais déjà posé cette question par mail !

si tu ecris TOTAL12364 en cellule a1

Sub essai()
Dim AnyString, MyStr 'déclare les variables
AnyString = Range("a1").Value ' Définit la chaîne.
MyStr = Left(AnyString, 5) ' Renvoie "TOTAL".
If Left(AnyString, 5) = "TOTAL" Then 'extrait 5 caracteres à gauche
MsgBox "total" 'action à produire
End If
End Sub


amicalement
A+

JMG