Bon jour le forum j'aimerai m'aider de vos lumières.
J'ai un bout de code très simple mais visiblement il y a un problème.
Je n'ai pas d’erreur mais la macro ne se lance pas.
Pour faire simple :
J'ai une cellule avec le jour d'aujourd’hui qui est la référence.
Je souhaite que si cette cellule contient "vendredi" par exemple, que la selection T160:t258 soit copier puis collé à partir de "o160".
J'ai fais ça pour chaque jour de la semaine ensuite ...
Mais je n'ai aucune action ...
If Range("r155") = "vendredi" Then
Range("T160:T258").Select
Selection.Copy
Range("O160").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
J'ai tenter aussi comme cela :
If Range("r155").Value Like "VENDREDI" Then
Range("T160:T258").Select
Selection.Copy
Range("O160").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
Sans le bloc if ça fonctionne alors c'est ma condition qui ne fonctionne pas.
Merci d'avance !