Rechercher : dans
Par :

Probleme de formule sous VBA dans Excel

Dernière réponse le 29 mai 2008 à 08:24:23 Grobibi34, le 26 mai 2008 à 14:44:21 
 Signaler ce message aux modérateurs

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

Configuration: Windows 2000
Internet Explorer 6.0

1

gbinforme, le 26 mai 2008 à 18:45:39

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" 

Toujours zen

Répondre à gbinforme

2

 Grobibi34, le 29 mai 2008 à 08:24:23

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

Répondre à Grobibi34