code ne fonctionne pas

[PHILIP]

Bonsoir à tous, j'ai un gros probleme car je suis débutant en vba
le code ci dessous et une mise en forme conditionnelle qui dit: je selectionne la cellule h6 alors que je voudrais l'appliquer a la rangée h3:h10000
qui dit que si la premiere lettre du nom ecrit dans L6 est un J et que si le chiffre en h6 appartient a la plage joy48hr ,alors il se met , en gras, et en bleu
mais quand je l'execute il me met " impossible de définir la propriete bold de la classe Font
pouvez vous m'aider ? Merci pour votre aide

Range(h6).Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=SI(GAUCHE(L6;1)=""j"";NB.SI(joy48hr;H6);"""")"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.Color = -1003520
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
End Sub

 

[Guest]

Re : code ne fonctionne pas

Bonsoir,

Ce serait pas du excel 2007 ça? Je crois bien.Alors post ta question ici

A+

 

[Roland_M]

Re : code ne fonctionne pas

bonsoir

j'ai essayé j'ai l'erreur ici > Range(h6).Select
il manque les ("") voir >>> Range("h6").Select

je n'ai pas le problème à bold !?