Probleme de formule sous VBA dans Excel

Résolu
Grobibi34 Messages postés 83 Date d'inscription   Statut Membre Dernière intervention   -  
Grobibi34 Messages postés 83 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je suis en train de taper un code en VBA sous excel et je rencontre un petit soucis sur une formule:

Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=JOURSEM(C$8;2)<3"

Sur certaines versions d'excel se code créé un bug. Il vien s'inscrire dans un segment de code me permettant de griser les jours qui sont des w-e:

Cells.Select
ActiveWindow.SmallScroll Down:=-21
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=JOURSEM(C$8;2)<3"
Selection.FormatConditions(1).Interior.Pattern = xlGray16

J'ai un peu de difficulté le problème car sur ma version d'excel sous Window XP il n'y a aucun soucis, et quand je passe sous WIndows 2000 le fichier m'affiche le message d'erreur suivant:

Erreur d'execution '5':
Argument ou appel de procédure incorrect

Merci d'avance pour toutes vos réponses ou remarques.

Cordialement,

GroBiBi
A voir également:

2 réponses

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
bonjour

Je n'ai pas 2K pour tester mais je pencherai pour le problème du ";" à remplacer par
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=JOURSEM(C$8,2)<3" 
0
Grobibi34 Messages postés 83 Date d'inscription   Statut Membre Dernière intervention   30
 
Salut, désolé pour ma réponse tardive.

Bon Merci en effet tu as tout à fait raison il fallait modifier le ";" par une ",".

Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=JOURSEM(C$8,2)<3"

Je trouve que le code est plutot fragile, faire planter tout le programme pour un problème de virgule ou de point virgule en fonction de la version...

Encore merci pour ta précieuse aide.

Cordialement,

Grobibi
0